Symbol Description Uses
STRT 21



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1373 TRBFLX
      _RL DPK(irun,nlev), STRT(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1896 TRBFLX
        STRT(I,L) = CP * DTHV(I,L) * DPK(I,L)
./pkg/fizhi/fizhi_turb.F 1899 TRBFLX
        RI(I,L) = STRT(I,L) / DW2(I,L)
./pkg/fizhi/fizhi_turb.F 1952 TRBFLX
       CALL TRBLEN(STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL,QXLM,
./pkg/fizhi/fizhi_turb.F 1959 TRBFLX
        CALL TRBL20(RI(1,LMIN),STRT(1,LMIN),DW2(1,LMIN),XL(1,LMIN),
./pkg/fizhi/fizhi_turb.F 1973 TRBFLX
        CALL TRBLEN(STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL,QXLM,
./pkg/fizhi/fizhi_turb.F 2014 TRBFLX
       CALL TRBL25(Q(1,LMINQ),XL(1,LMINQ),STRT(1,LMINQ),DW2(1,LMINQ),
./pkg/fizhi/fizhi_turb.F 3338 TRBLEN
      SUBROUTINE TRBLEN (STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL,
./pkg/fizhi/fizhi_turb.F 3376 TRBLEN
      _RL STRT(irun,NLEV),DW2(irun,NLEV),DZ3(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3420 TRBLEN
         STBFCN(I,L) = STRT(I,L) - RICR * DW2(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 3732 TRBL20
      _RL RI(irun*NLEV,1),STRT(irun*NLEV,1),DW2(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 3788 TRBL20
       QE(I,1) = ZKM(I,1)*DW2(I,1) - ZKH(I,1)*STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3808 TRBL25
      SUBROUTINE TRBL25(Q,XL,STRT,DW2,INTSTB,INTQ,ZKM,ZKH,P3,NLEV,
./pkg/fizhi/fizhi_turb.F 3833 TRBL25
      _RL Q(irun*NLEV,1),XL(irun*NLEV,1),STRT(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 3870 TRBL25
      STRT(I,1) = XQ(I,1)  *   STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3872 TRBL25
        F2(I,1) = 1.+FF2  *   STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3873 TRBL25
        F3(I,1) = 1.+FF3  *   STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3874 TRBL25
        F4(I,1) = 1.+FF4  *   STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3882 TRBL25
        P3(I,1) = ZKH(I,1)*STRT(I,1) + B3