File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1267 |
TRBFLX |
SUBROUTINE TRBFLX (NN,TH,THV,SH,U,V,QQ,PL,PLE,PLK,PLKE,DPSTR, |
./pkg/fizhi/fizhi_turb.F |
1316 |
TRBFLX |
_RL U(irun,NLEV+1),V(irun,NLEV+1),QQ(irun,NLEV) |
./pkg/fizhi/fizhi_turb.F |
1759 |
TRBFLX |
CALL SFCFLX(NN,U(1,NLEV),V(1,NLEV), |
./pkg/fizhi/fizhi_turb.F |
1796 |
TRBFLX |
DV(I,L) = ( V(I,L)- V(I,L+1) ) * ADZ2(I,L) |
./pkg/fizhi/fizhi_turb.F |
1886 |
TRBFLX |
DV(I,NLEV) = V(I,NLEV) * DU(I,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 |
2214 |
TRBFLX |
WV(I,L) = WV(I,L) + RHOKDZ(I,L) * ( V(I,L+1) - V(I,L) ) |