File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1388 |
TRBFLX |
_RL QQE (irun,nlev-1), QE (irun,nlev-1) |
./pkg/fizhi/fizhi_turb.F |
1922 |
TRBFLX |
QQE(I,L) = 0. |
./pkg/fizhi/fizhi_turb.F |
1960 |
TRBFLX |
1 KM(1,LMIN),KH(1,LMIN),QE(1,LMIN),QQE(1,LMIN),IBITSTB(1,LMIN), |
./pkg/fizhi/fizhi_turb.F |
1968 |
TRBFLX |
QQ(I,L) = QQE(I,L) |
./pkg/fizhi/fizhi_turb.F |
2000 |
TRBFLX |
TEMP(I,L) = 0.01 * QQE(I,L) |
./pkg/fizhi/fizhi_turb.F |
2027 |
TRBFLX |
TEMP(I,L) = QQE(I,L) * P3(I,L) |
./pkg/fizhi/fizhi_turb.F |
2028 |
TRBFLX |
XQ(I,L) = QQE(I,L) - QQ(I,L) |
./pkg/fizhi/fizhi_turb.F |
2038 |
TRBFLX |
5 P3(I,L) = XQ(I,L) / QQE(I,L) |
./pkg/fizhi/fizhi_turb.F |
3706 |
TRBL20 |
SUBROUTINE TRBL20 (RI,STRT,DW2,XL,ZKM,ZKH,QE,QQE,INTSTB,NLEV, |
./pkg/fizhi/fizhi_turb.F |
3734 |
TRBL20 |
_RL QE(irun*NLEV,1),QQE(irun*NLEV,1) |
./pkg/fizhi/fizhi_turb.F |
3800 |
TRBL20 |
QQE(I,1) = 0.5 * QE(I,1) * QE(I,1) |