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 |
2618 |
SRCLOUDS |
_RL plke(irun,irise+1) |
./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 |
2691 |
CTEI |
k = 1.0 + cpoel*plke(i,L)*( th(i,L)-th(i,L-1) ) / dq |
./pkg/fizhi/fizhi_moist.F |
700 |
MOISTIO |
call SRCLOUDS (saveth,saveq,plk,pl,plke,clsbth,cldlz,istrip,lm, |
./pkg/fizhi/fizhi_turb.F |
1835 |
TRBFLX |
1 BB(I,1)*plke(I,2)*DTH(I,1)) |
./pkg/fizhi/fizhi_turb.F |
1844 |
TRBFLX |
1 BB(I,L)*plke(I,L)*DTH(I,L-1)) |
./pkg/fizhi/fizhi_turb.F |
1849 |
TRBFLX |
1 BB(I,L)*plke(I,L+1)*DTH(I,L)) |
./pkg/fizhi/fizhi_turb.F |
1868 |
TRBFLX |
1 * (CLH/plke(I,L+1)) - VRT1CON * TH(I,L) |