File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
105 |
MOISTIO |
_RL TL(ISTRIP,lm) , SHL(ISTRIP,lm) |
./pkg/fizhi/fizhi_moist.F |
2365 |
RNEVP |
SUBROUTINE RNEVP(NN,IRUN,NLAY,TL,QL,RAIN,PL,CLFRAC,SP,DP,PLKE, |
./pkg/fizhi/fizhi_moist.F |
2372 |
RNEVP |
_RL TL(IRUN,NLAY),QL(IRUN,NLAY),RAIN(IRUN,NLAY), |
./pkg/fizhi/fizhi_moist.F |
2471 |
RNEVP |
TEMP1(I,3) = TL(I,L) |
./pkg/fizhi/fizhi_moist.F |
2528 |
RNEVP |
TL(I,L) = TL(I,L)-(iceevap(i)+watevap(i))*TEMP3(I,L)*ELOCP |
./pkg/fizhi/fizhi_moist.F |
2562 |
RNEVP |
TL(I,L) = TL(I,L)-rainmax(I)*TEMP3(I,L)*ELOCP |
./pkg/fizhi/fizhi_moist.F |
2577 |
RNEVP |
TL(I,L) = TL(I,L)-TEMP1(I,7)*TEMP3(I,L)*ELOCP |
./pkg/fizhi/fizhi_moist.F |
648 |
MOISTIO |
TL(I,L) = TH(I,L)*PLK(I,L) |
./pkg/fizhi/fizhi_moist.F |
654 |
MOISTIO |
CALL RNEVP (NN,ISTRIP,lm,TL,SHL,PCPEN,PL,CLFRAC,SP,DP,PLKE, |
./pkg/fizhi/fizhi_moist.F |
670 |
MOISTIO |
TMP1(I,L) = sp(i) * ((TL(I,L)/PLK(I,L))-saveth(i,l)) * tminv |
./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_turb.F |
1397 |
TRBFLX |
_RL TL(irun,NLEV),DTH(irun,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1717 |
TRBFLX |
TL(I,NLEV) = TH(I,NLEV)*PLK(I,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1722 |
TRBFLX |
BB(I,NLEV) = FACEPS*SHSAT(I,NLEV)/(TL(I,NLEV)*TL(I,NLEV)) |
./pkg/fizhi/fizhi_turb.F |
1815 |
TRBFLX |
TL(I,L) = TH(I,L)*PLK(I,L) |
./pkg/fizhi/fizhi_turb.F |
1825 |
TRBFLX |
BB(I,L) = FACEPS*SHSAT(I,L)/(TL(I,L)*TL(I,L)) |