| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1547 |
TRBFLX |
_RL QQINIT(irun,nlev), RHOKDZ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2467 |
TRBFLX |
RHOKDZ(I,L) = RHODZ1(I,L) * QXLM(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2470 |
TRBFLX |
CALL TRBDIF(QQ(1,LMINQ1),P3(1,LMINQ1),RHOKDZ(1,LMINQ1), |
|
./pkg/fizhi/fizhi_turb.F |
2575 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2583 |
TRBFLX |
CALL TRBDIF(SH,DELSH,RHOKDZ,FLXFAC,DTHL,DELTHL,NLEV, |
|
./pkg/fizhi/fizhi_turb.F |
2622 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KM(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2625 |
TRBFLX |
CALL TRBDIF(U,V,RHOKDZ,FLXFAC,DTHS,DELTHS,NLEV,3,0. _d 0,irun) |
|
./pkg/fizhi/fizhi_turb.F |
2635 |
TRBFLX |
WU(I,L) = WU(I,L) + RHOKDZ(I,L) * ( U(I,L+1) - U(I,L) ) |
|
./pkg/fizhi/fizhi_turb.F |
2636 |
TRBFLX |
WV(I,L) = WV(I,L) + RHOKDZ(I,L) * ( V(I,L+1) - V(I,L) ) |
|
./pkg/fizhi/fizhi_turb.F |
4447 |
TRBDIF |
SUBROUTINE TRBDIF ( XX1,XX2,RHOKDZ,FLXFAC,DXX1G,DXX2G,NLEV, |
|
./pkg/fizhi/fizhi_turb.F |
4489 |
TRBDIF |
_RL RHOKDZ(irun,NLEV),FLXFAC(irun,NLEV+1) |
|
./pkg/fizhi/fizhi_turb.F |
4516 |
TRBDIF |
CC(I,L+1) = RHOKDZ(I,L) * FLXFAC(I,L+1) |
|
./pkg/fizhi/fizhi_turb.F |
4525 |
TRBDIF |
BB(I,L) = RHOKDZ(I,L) * FLXFAC(I,L) |