Symbol Description Uses
NLEVM1 32


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3437 TRBLEN 
      NLEVM1 = NLEV - 1
./pkg/fizhi/fizhi_turb.F 3440 TRBLEN 
      ISTNM1 = irun * NLEVM1
./pkg/fizhi/fizhi_turb.F 3492 TRBLEN 
      INT2(I,NLEVM1) = INT1(I,NLEV)
./pkg/fizhi/fizhi_turb.F 3507 TRBLEN 
      IF(LMINP.GT.NLEVM1) GOTO 550
./pkg/fizhi/fizhi_turb.F 3508 TRBLEN 
      DO 500 L = LMINP,NLEVM1
./pkg/fizhi/fizhi_turb.F 3515 TRBLEN 
      IF(LMIN.GT.NLEVM1) GOTO 600
./pkg/fizhi/fizhi_turb.F 3517 TRBLEN 
      IF( INT1(I,NLEVM1).EQ.1 .AND. INT1(I,NLEV).EQ.1 ) THEN
./pkg/fizhi/fizhi_turb.F 3518 TRBLEN 
      XL0(I,NLEV) = XL0(I,NLEV) + XL0(I,NLEVM1)
./pkg/fizhi/fizhi_turb.F 3524 TRBLEN 
              L   = NLEVM1 + LMIN - LL