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 |
1823 |
H2OEXPS |
h2oexp(i,j,k,1) = exp(-xh*xkw(ib)) |
./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 |
643 |
IRRAD |
data xkw / 29.55 , 4.167e-1, 1.328e-2, 5.250e-4, |