| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1377 |
TRBFLX |
_RL QQINIT(irun,nlev), RHOKDZ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2081 |
TRBFLX |
RHOKDZ(I,L) = RHODZ1(I,L) * QXLM(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2084 |
TRBFLX |
CALL TRBDIF(QQ(1,LMINQ1),P3(1,LMINQ1),RHOKDZ(1,LMINQ1), |
|
./pkg/fizhi/fizhi_turb.F |
2163 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2171 |
TRBFLX |
CALL TRBDIF(SH,DELSH,RHOKDZ,FLXFAC,DTHL,DELTHL,NLEV, |
|
./pkg/fizhi/fizhi_turb.F |
2206 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KM(I,L) |
|
./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 |
2213 |
TRBFLX |
WU(I,L) = WU(I,L) + RHOKDZ(I,L) * ( U(I,L+1) - U(I,L) ) |
|
./pkg/fizhi/fizhi_turb.F |
2214 |
TRBFLX |
WV(I,L) = WV(I,L) + RHOKDZ(I,L) * ( V(I,L+1) - V(I,L) ) |
|
./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) |