File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1047 |
MOISTIO |
cldtmp(i,1) = cldtmp(i,1) + cldnow*pkzgather(i,L) |
./pkg/fizhi/fizhi_moist.F |
269 |
MOISTIO |
pkzgather(indx,L) = pkl(pblindex(indx),1,L) |
./pkg/fizhi/fizhi_moist.F |
330 |
MOISTIO |
CALL STRIP ( pkzgather, PLK ,im*jm,ISTRIP,lm,NN ) |
./pkg/fizhi/fizhi_moist.F |
762 |
MOISTIO |
call BACK2GRD ( pkzgather(1,L),pblindex, pkzgather(1,L) ,im*jm) |
./pkg/fizhi/fizhi_moist.F |
79 |
MOISTIO |
_RL pkzgather(im*jm,lm) |
./pkg/fizhi/fizhi_moist.F |
850 |
MOISTIO |
tmpdiag(i,j)=(dtmoist(i,j,L)*sday*pkzgather(indgath,L)/pz(i,j)) |