| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1389 |
TRBFLX |
_RL P3 (irun,nlev-1), XQ (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1924 |
TRBFLX |
P3(I,L) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2006 |
TRBFLX |
IF(IBITSTB(I,L).EQ.1 ) P3(I,L) = (2.*B3) * |
|
./pkg/fizhi/fizhi_turb.F |
2016 |
TRBFLX |
2 P3(1,LMINQ),NLEVML,nlev,irun) |
|
./pkg/fizhi/fizhi_turb.F |
2026 |
TRBFLX |
P3(I,L) = P3(I,L) * DTAU / XL(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2027 |
TRBFLX |
TEMP(I,L) = QQE(I,L) * P3(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2038 |
TRBFLX |
5 P3(I,L) = XQ(I,L) / QQE(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 |
3808 |
TRBL25 |
SUBROUTINE TRBL25(Q,XL,STRT,DW2,INTSTB,INTQ,ZKM,ZKH,P3,NLEV, |
|
./pkg/fizhi/fizhi_turb.F |
3836 |
TRBL25 |
_RL ZKM(irun*NLEV,1),ZKH(irun*NLEV,1),P3(irun*NLEV,1) |
|
./pkg/fizhi/fizhi_turb.F |
3882 |
TRBL25 |
P3(I,1) = ZKH(I,1)*STRT(I,1) + B3 |
|
./pkg/fizhi/fizhi_turb.F |
3883 |
TRBL25 |
P3(I,1) = 2. * ( ZKM(I,1)*DW2(I,1) - P3(I,1) ) |
|
./pkg/fizhi/fizhi_turb.F |
3884 |
TRBL25 |
P3(I,1) = P3(I,1)*Q(I,1) |