File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1431 |
TRBFLX |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./pkg/fizhi/fizhi_turb.F |
1954 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
1975 |
TRBFLX |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
3340 |
TRBLEN |
2 DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun) |
./pkg/fizhi/fizhi_turb.F |
3381 |
TRBLEN |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
./pkg/fizhi/fizhi_turb.F |
3420 |
TRBLEN |
STBFCN(I,L) = STRT(I,L) - RICR * DW2(I,L) |
./pkg/fizhi/fizhi_turb.F |
3422 |
TRBLEN |
IF( STBFCN(I,L).LE.0. ) INT1(I,L) = 1 |
./pkg/fizhi/fizhi_turb.F |
3458 |
TRBLEN |
CALL TRBITP ( STBFCN(1,LMIN1),INT2(1,LMIN1),DTHV(1,LMIN1), |
./pkg/fizhi/fizhi_turb.F |
3548 |
TRBLEN |
XL0(I,L) = STBFCN(I,L) + XL0(I,L) |
./pkg/fizhi/fizhi_turb.F |
3619 |
TRBITP |
SUBROUTINE TRBITP ( STBFCN,INTCHG,DTHV,DPK,DU,DV,DZITRP,NLEV, |
./pkg/fizhi/fizhi_turb.F |
3643 |
TRBITP |
_RL STBFCN(irun,NLEV+1) |
./pkg/fizhi/fizhi_turb.F |
3682 |
TRBITP |
AAA(I,L) = STBFCN(I,L) + STBFCN(I,L+1) |
./pkg/fizhi/fizhi_turb.F |
3683 |
TRBITP |
BBB(I,L) = STBFCN(I,L) - STBFCN(I,L+1) |
./pkg/fizhi/fizhi_turb.F |
3688 |
TRBITP |
& - 4. * (STBFCN(I,L+1) * STBFCN(I,L) ) |