Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
rxsnow | Module: | File: RAD_UTILS.f |
Author : A. Lacis (modified by G. Schmidt)
Version:
Declaration:
subroutine rxsnow(rbsno, xcosz, ggsno, rxsno)
- rbsno :
real*8, intent(in)
- diffuse albedo
- xcosz :
real*8, intent(in)
- zenith angle
- ggsno :
real*8, intent(in)
- Asymmetry parameter for snow
- rxsno :
real*8, intent(out)
- direct albedo
- ndbls :
integer
- nn :
integer
- xxg :
real*8
- xxt :
real*8
- ggsn :
real*8
- rbsn :
real*8
- frtop :
real*8
- tau :
real*8
- tausn :
real*8
- gpff :
real*8
- pr :
real*8
- pt :
real*8
- dbls :
real*8
- secz :
real*8
- xanb :
real*8
- xanx :
real*8
- tanb :
real*8
- tanx :
real*8
- rasb :
real*8
- rasx :
real*8
- bnorm :
real*8
- xnorm :
real*8
- rarb :
real*8
- rarx :
real*8
- xatb :
real*8
- denom :
real*8
- db :
real*8
- dx :
real*8
- ub :
real*8
- ux :
real*8
- drbrat :
real*8
- rbbout :
real*8