File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lwrad.F |
1140 |
IRRAD |
call H2OEXPS(ib,m,n,np,dh2o,pa,dt,xkw,aw,bw,pm,mw,h2oexp) |
./pkg/fizhi/fizhi_lwrad.F |
1763 |
H2OEXPS |
subroutine H2OEXPS(ib,m,n,np,dh2o,pa,dt,xkw,aw,bw,pm,mw,h2oexp) |
./pkg/fizhi/fizhi_lwrad.F |
1799 |
H2OEXPS |
_RL xkw(9),aw(9),bw(9),pm(9) |
./pkg/fizhi/fizhi_lwrad.F |
1818 |
H2OEXPS |
1 * ( 1.+(aw(ib)+bw(ib)* dt(i,j,k))*dt(i,j,k) ) |
./pkg/fizhi/fizhi_lwrad.F |
585 |
IRRAD |
_RL xkw(9),aw(9),bw(9),pm(9),fkw(6,9),gkw(6,3),xke(9) |
./pkg/fizhi/fizhi_lwrad.F |
661 |
IRRAD |
data aw/ 0.0021, 0.0140, 0.0167, 0.0302, |