File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
1104 |
MOISTIO |
cldtmp(i,j) = cldtmp(i,j) + cldnow*pkzgather(i,L) |
./pkg/fizhi/fizhi_moist.F |
286 |
MOISTIO |
pkzgather(indx,L) = pkl(i,j,L) |
./pkg/fizhi/fizhi_moist.F |
354 |
MOISTIO |
CALL STRIP ( pkzgather, PLK ,im*jm,ISTRIP,lm,NN ) |
./pkg/fizhi/fizhi_moist.F |
786 |
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 |
874 |
MOISTIO |
tmpdiag(i,j)=(dtmoist(i,j,L)*sday*pkzgather(indgath,L)/pz(i,j)) |