File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lwrad.F |
1073 |
IRRAD |
if (cldwater) then |
./pkg/fizhi/fizhi_lwrad.F |
215 |
LWRIO |
. cldwater,cwc,tauc,reff,clro,mid_level,low_level, |
./pkg/fizhi/fizhi_lwrad.F |
348 |
IRRAD |
* cldwater,cwc,taucl,reff,fcld,ict,icb, |
./pkg/fizhi/fizhi_lwrad.F |
575 |
IRRAD |
logical cldwater,high,trace |
./pkg/fizhi/fizhi_lwrad.F |
80 |
LWRIO |
logical high, trace, cldwater |
./pkg/fizhi/fizhi_lwrad.F |
85 |
LWRIO |
data cldwater /.false./ |
./pkg/fizhi/fizhi_lwrad.F |
945 |
IRRAD |
if (cldwater) then |
./pkg/fizhi/fizhi_moist.F |
1050 |
MOISTIO |
watnow = cldwater(i,j,L) |
./pkg/fizhi/fizhi_moist.F |
1073 |
MOISTIO |
watnow = cldwater(i,j,L) |
./pkg/fizhi/fizhi_moist.F |
124 |
MOISTIO |
_RL cldlz(istrip,lm), cldwater(im,jm,lm) |
./pkg/fizhi/fizhi_moist.F |
714 |
MOISTIO |
call PASTE ( cldlz,cldwater,istrip,im*jm,lm,nn ) |
./pkg/fizhi/fizhi_moist.F |
785 |
MOISTIO |
call BACK2GRD (cldwater(1,1,L),pblindex,cldwater(1,1,L) ,im*jm) |