File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1382 |
TRBFLX |
_RL FLXFAC (irun,nlev+1) |
./pkg/fizhi/fizhi_turb.F |
1647 |
TRBFLX |
FLXFAC(I,L) = FLXFPK(I,L) * PLK(I,L) |
./pkg/fizhi/fizhi_turb.F |
1651 |
TRBFLX |
FLXFAC(I,NLEVP1) = FLXFPK(I,NLEVP1) |
./pkg/fizhi/fizhi_turb.F |
2171 |
TRBFLX |
CALL TRBDIF(SH,DELSH,RHOKDZ,FLXFAC,DTHL,DELTHL,NLEV, |
./pkg/fizhi/fizhi_turb.F |
2209 |
TRBFLX |
CALL TRBDIF(U,V,RHOKDZ,FLXFAC,DTHS,DELTHS,NLEV,3,0. _d 0,irun) |
./pkg/fizhi/fizhi_turb.F |
3894 |
TRBDIF |
SUBROUTINE TRBDIF ( XX1,XX2,RHOKDZ,FLXFAC,DXX1G,DXX2G,NLEV, |
./pkg/fizhi/fizhi_turb.F |
3932 |
TRBDIF |
_RL RHOKDZ(irun,NLEV),FLXFAC(irun,NLEV+1) |
./pkg/fizhi/fizhi_turb.F |
3951 |
TRBDIF |
CC(I,L+1) = RHOKDZ(I,L) * FLXFAC(I,L+1) |
./pkg/fizhi/fizhi_turb.F |
3956 |
TRBDIF |
BB(I,L) = RHOKDZ(I,L) * FLXFAC(I,L) |