| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
107 |
MOISTIO |
_RL PLKE(ISTRIP,lm+1) |
|
./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 |
2374 |
RNEVP |
. TEMP2(IRUN,NLAY),PLKE(IRUN,NLAY+1), |
|
./pkg/fizhi/fizhi_moist.F |
355 |
MOISTIO |
CALL STRIP ( pkegather, PLKE ,im*jm,ISTRIP,lm+1,NN ) |
|
./pkg/fizhi/fizhi_moist.F |
461 |
MOISTIO |
TMP5(I,L) = PLKE(I,L)*P0KINV |
|
./pkg/fizhi/fizhi_moist.F |
466 |
MOISTIO |
TMP5(I,lm+1) = PLKE(I,lm+1)*P0KINV |
|
./pkg/fizhi/fizhi_moist.F |
470 |
MOISTIO |
TMP5(I,NSUBCL+1) = PLKE(I,lm+1)*P0KINV |
|
./pkg/fizhi/fizhi_moist.F |
475 |
MOISTIO |
tmp2(i,1) = TH(i,NSUBCL) * PLKE(i,NSUBCL)/P0KAPPA |
|
./pkg/fizhi/fizhi_moist.F |
654 |
MOISTIO |
CALL RNEVP (NN,ISTRIP,lm,TL,SHL,PCPEN,PL,CLFRAC,SP,DP,PLKE, |
|
./pkg/fizhi/fizhi_turb.F |
1267 |
TRBFLX |
SUBROUTINE TRBFLX (NN,TH,THV,SH,U,V,QQ,PL,PLE,PLK,PLKE,DPSTR, |
|
./pkg/fizhi/fizhi_turb.F |
1318 |
TRBFLX |
_RL PLKE(irun,NLEV+1),DPSTR(irun,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1554 |
TRBFLX |
ADZ1(I,L) = (CP/GRAV)*(PLKE(I,L+1)-PLKE(I,L)) |
|
./pkg/fizhi/fizhi_turb.F |
1619 |
TRBFLX |
TEMP(I,L) = PLKE(I,L+1) * ADZ2(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
1622 |
TRBFLX |
RHOZPK(I,L) = RHODZ2(I,L) * PLKE(I,L+1) |
|
./pkg/fizhi/fizhi_turb.F |
1643 |
TRBFLX |
IF (IWATER(I).EQ.0 ) FLXFPK(I,NLEVP1) = 1. / PLKE(I,NLEVP1) |
|
./pkg/fizhi/fizhi_turb.F |
1763 |
TRBFLX |
4 PLKE(1,NLEVP1),PLE(1,NLEVP1),Z0, |