File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
2585 |
SRCLOUDS |
subroutine SRCLOUDS (th,q,plk,pl,plke,cloud,cldwat,irun,irise, |
./pkg/fizhi/fizhi_moist.F |
2621 |
SRCLOUDS |
_RL cldwat(irun,irise) |
./pkg/fizhi/fizhi_moist.F |
2668 |
SRCLOUDS |
call CTEI ( th,q,cloud,cldwat,pl,plk,plke,irun,irise ) |
./pkg/fizhi/fizhi_moist.F |
2673 |
CTEI |
subroutine CTEI ( th,q,cldfrc,cldwat,pl,plk,plke,im,lm ) |
./pkg/fizhi/fizhi_moist.F |
2676 |
CTEI |
_RL th(im,lm),q(im,lm),plke(im,lm+1),cldwat(im,lm) |
./pkg/fizhi/fizhi_moist.F |
2689 |
CTEI |
dq = q(i,L)+cldwat(i,L)-q(i,L-1)-cldwat(i,L-1) |
./pkg/fizhi/fizhi_moist.F |
2709 |
CTEI |
cldwat(i,L) = cldwat(i,L)*f |