File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1580 |
TRBFLX |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2066 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2085 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3402 |
TRBLEN |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3448 |
TRBLEN |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3486 |
TRBLEN |
STBFCN(I,1) = STRT(I,1) - RICR * DW2(I,1) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3488 |
TRBLEN |
IF( STBFCN(I,1).LE.0. ) INT1(I,1) = 1 |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3518 |
TRBLEN |
CALL TRBITP ( STBFCN(1,LMIN1),INT2(1,LMIN1),DTHV(1,LMIN1), |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3599 |
TRBLEN |
XL0(I,LMINQ) = STBFCN(I,LMINQ) + XL0(I,LMINQ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3655 |
TRBITP |
SUBROUTINE TRBITP ( STBFCN,INTCHG,DTHV,DPK,DU,DV,DZITRP,NLEV, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3683 |
TRBITP |
_RL STBFCN(irun,NLEV+1) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3719 |
TRBITP |
AAA(I,1) = STBFCN(I,1) + STBFCN(I,2) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3720 |
TRBITP |
BBB(I,1) = STBFCN(I,1) - STBFCN(I,2) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3725 |
TRBITP |
. - 4. * (STBFCN(I,2) * STBFCN(I,1) ) |
./pkg/fizhi/fizhi_turb.F |
1540 |
TRBFLX |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./pkg/fizhi/fizhi_turb.F |
2026 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
2045 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
3363 |
TRBLEN |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
3409 |
TRBLEN |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./pkg/fizhi/fizhi_turb.F |
3447 |
TRBLEN |
STBFCN(I,1) = STRT(I,1) - RICR * DW2(I,1) |
./pkg/fizhi/fizhi_turb.F |
3449 |
TRBLEN |
IF( STBFCN(I,1).LE.0. ) INT1(I,1) = 1 |
./pkg/fizhi/fizhi_turb.F |
3479 |
TRBLEN |
CALL TRBITP ( STBFCN(1,LMIN1),INT2(1,LMIN1),DTHV(1,LMIN1), |
./pkg/fizhi/fizhi_turb.F |
3560 |
TRBLEN |
XL0(I,LMINQ) = STBFCN(I,LMINQ) + XL0(I,LMINQ) |
./pkg/fizhi/fizhi_turb.F |
3616 |
TRBITP |
SUBROUTINE TRBITP ( STBFCN,INTCHG,DTHV,DPK,DU,DV,DZITRP,NLEV, |
./pkg/fizhi/fizhi_turb.F |
3644 |
TRBITP |
_RL STBFCN(irun,NLEV+1) |
./pkg/fizhi/fizhi_turb.F |
3680 |
TRBITP |
AAA(I,1) = STBFCN(I,1) + STBFCN(I,2) |
./pkg/fizhi/fizhi_turb.F |
3681 |
TRBITP |
BBB(I,1) = STBFCN(I,1) - STBFCN(I,2) |
./pkg/fizhi/fizhi_turb.F |
3686 |
TRBITP |
. - 4. * (STBFCN(I,2) * STBFCN(I,1) ) |