| 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 |
1817 |
H2OEXPS |
xh = dh2o(i,j,k)*(pa(i,j,k)/500.)**pm(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 |
666 |
IRRAD |
data pm/ 1.0, 1.0, 1.0, 1.0, 1.0, 0.77, 0.5, 1.0, 1.0/ |