| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/slprs.F |
5 |
SLPRS |
subroutine SLPRS (PHIS,PLE,THZ,lwmask,im,jm,lm,SLP) |
|
./pkg/fizhi/slprs.F |
67 |
SLPRS |
TM(I) = TM(I) * (PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G) |
|
./pkg/fizhi/slprs.F |
69 |
SLPRS |
TM(I) = THZ(I,LM)*(PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G) |
|
./pkg/fizhi/slprs.F |
73 |
SLPRS |
SLP(I) = PLE(I,LM+1) * EXP( SLP(I) ) |
|
./pkg/fizhi/fizhi_moist.F |
333 |
MOISTIO |
CALL STRIP ( plegather, PLE ,im*jm,ISTRIP,lm+1,NN ) |
|
./pkg/fizhi/fizhi_moist.F |
393 |
MOISTIO |
TMP1(I,2) = TMP1(I,2) + (PLE(I,L+1)-PLE(I,L))*TH (I,L)/sp(i) |
|
./pkg/fizhi/fizhi_moist.F |
394 |
MOISTIO |
TMP1(I,3) = TMP1(I,3) + (PLE(I,L+1)-PLE(I,L))*SHL(I,L)/sp(i) |
|
./pkg/fizhi/fizhi_moist.F |
398 |
MOISTIO |
TMP1(I,4) = 1. / ( (PLE(I,lm+1)-PLE(I,NSUBCL))/sp(I) ) |
|
./pkg/fizhi/fizhi_moist.F |
416 |
MOISTIO |
TMP1(I,2) = TMP1(I,2)+(PLE(I,L+1)-PLE(I,L))*UL(I,L,NT)/sp(i) |
|
./pkg/fizhi/fizhi_moist.F |
429 |
MOISTIO |
TMP4(I,L) = PLE(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
441 |
MOISTIO |
TMP4(I,lm+1) = PLE (I,lm+1) |
|
./pkg/fizhi/fizhi_moist.F |
445 |
MOISTIO |
TMP4(I,NSUBCL+1) = PLE (I,lm+1) |
|
./pkg/fizhi/fizhi_swrad.F |
71 |
SWRIO |
_RL PLE(ISTRIP,lm+1) |
|
./pkg/fizhi/fizhi_turb.F |
1373 |
TRBFLX |
SUBROUTINE TRBFLX (NN,TH,THV,SH,U,V,QQ,PL,PLE,PLK,PLKE,DPSTR, |
|
./pkg/fizhi/fizhi_turb.F |
1426 |
TRBFLX |
_RL PL(irun,NLEV),PLE(irun,NLEV+1),PLK(irun,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1720 |
TRBFLX |
RHODZ2(I,1) = PLE(I,2) / RHODZ2(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1731 |
TRBFLX |
FLXFPK(I,1) = PLE(I,2) - PLE(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1849 |
TRBFLX |
4 PLKE(1,NLEVP1),PLE(1,NLEVP1),Z0, |
|
./pkg/fizhi/fizhi_turb.F |
2295 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,Lp+2)) + |
|
./pkg/fizhi/fizhi_turb.F |
2299 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,2)) + |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
71 |
SWRIO |
_RL PLE(ISTRIP,lm+1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1373 |
TRBFLX |
SUBROUTINE TRBFLX (NN,TH,THV,SH,U,V,QQ,PL,PLE,PLK,PLKE,DPSTR, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1426 |
TRBFLX |
_RL PL(irun,NLEV),PLE(irun,NLEV+1),PLK(irun,NLEV) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1720 |
TRBFLX |
RHODZ2(I,1) = PLE(I,2) / RHODZ2(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1731 |
TRBFLX |
FLXFPK(I,1) = PLE(I,2) - PLE(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1849 |
TRBFLX |
4 PLKE(1,NLEVP1),PLE(1,NLEVP1),Z0, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2277 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,Lp+2)) + |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2281 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,2)) + |