Symbol | Description | Uses |
XXZETA | 7 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_turb.F | 1401 | TRBFLX |
_RL ARG(irun,NLEV),XXZETA(irun),QBYU(irun) |
./pkg/fizhi/fizhi_turb.F | 1730 | TRBFLX |
XXZETA(I) = XX(I)-ZETA(I) |
./pkg/fizhi/fizhi_turb.F | 1731 | TRBFLX |
IF(XXZETA(I).LT.0.1*XX(I)) XXZETA(I)=0.1*XX(I) |
./pkg/fizhi/fizhi_turb.F | 1732 | TRBFLX |
IF(XXZETA(I).LE.0.) XXZETA(I)=0.1 |
./pkg/fizhi/fizhi_turb.F | 1733 | TRBFLX |
QBYU(I) =QBUSTR * XXZETA(I) ** ONETHRD |