| File |
Line number |
Procedure |
Code |
|
./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 |
1427 |
TRBFLX |
_RL PLKE(irun,NLEV+1),DPSTR(irun,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1663 |
TRBFLX |
ADZ1(I,1) = (CP/GRAV)*(PLKE(I,2)-PLKE(I,1)) |
|
./pkg/fizhi/fizhi_turb.F |
1718 |
TRBFLX |
TEMP(I,1) = PLKE(I,2) * ADZ2(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1721 |
TRBFLX |
RHOZPK(I,1) = RHODZ2(I,1) * PLKE(I,2) |
|
./pkg/fizhi/fizhi_turb.F |
1739 |
TRBFLX |
IF (IWATER(I).EQ.0 ) FLXFPK(I,NLEVP1) = 1. / PLKE(I,NLEVP1) |
|
./pkg/fizhi/fizhi_turb.F |
1849 |
TRBFLX |
4 PLKE(1,NLEVP1),PLE(1,NLEVP1),Z0, |