| 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 |
2616 |
SRCLOUDS |
_RL plk(irun,irise) |
|
./pkg/fizhi/fizhi_moist.F |
2647 |
SRCLOUDS |
temp = th(i,L)*plk(i,L) |
|
./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 |
2677 |
CTEI |
_RL plk(im,lm),pl(im,lm),cldfrc(im,lm) |
|
./pkg/fizhi/fizhi_moist.F |
2693 |
CTEI |
t = th(i,L)*plk(i,L) |
|
./pkg/fizhi/fizhi_moist.F |
677 |
MOISTIO |
TMP1(I,L) = ((TL(I,L)/PLK(I,L))-saveth(i,l))*plk(i,l)*sday*tminv |
|
./pkg/fizhi/fizhi_moist.F |
700 |
MOISTIO |
call SRCLOUDS (saveth,saveq,plk,pl,plke,clsbth,cldlz,istrip,lm, |
|
./pkg/fizhi/fizhi_moist.F |
744 |
MOISTIO |
if (saveth(i,l)*plk(i,l).le. tice ) then |
|
./pkg/fizhi/fizhi_turb.F |
1724 |
TRBFLX |
BB(I,NLEV) = BB(I,NLEV) * AA(I,NLEV) * plk(I,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1745 |
TRBFLX |
1 ( TH(I,NLEV) + CLH * SHL(I,NLEV) * (1./plk(i,nlev)) ) |
|
./pkg/fizhi/fizhi_turb.F |
1747 |
TRBFLX |
1 * (1./plk(i,nlev)) * CLH - VRT1CON * TH(I,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1866 |
TRBFLX |
1 ( TH(I,L) + (CLH/plk(I,L)) * SHL(I,L) ) |
|
./pkg/fizhi/fizhi_turb.F |
1871 |
TRBFLX |
1 BB(I,L)*plk(i,L) * FCC(I,L) * BETAL(I,L) |