Symbol Description Uses
LENB 40



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1906 CLOUD
      LENB = LENA
./pkg/fizhi/fizhi_moist.F 1910 CLOUD
         LENB = LENB + 1
./pkg/fizhi/fizhi_moist.F 1911 CLOUD
         I1(LENB)  = IA(I)
./pkg/fizhi/fizhi_moist.F 1912 CLOUD
         I2(LENB)  = I
./pkg/fizhi/fizhi_moist.F 1913 CLOUD
         TX1(LENB) = WFN(I)
./pkg/fizhi/fizhi_moist.F 1914 CLOUD
         TX2(LENB) = QS1(IA(I))
./pkg/fizhi/fizhi_moist.F 1915 CLOUD
         TX4(LENB) = TX6(I)
./pkg/fizhi/fizhi_moist.F 1919 CLOUD
      IF (LENB .LE. 0) THEN
./pkg/fizhi/fizhi_moist.F 1937 CLOUD
      DO 516 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1943 CLOUD
      DO 517 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1946 CLOUD
      DO 520 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1956 CLOUD
      DO 530 I=LENA1,LENB
./pkg/fizhi/fizhi_moist.F 1969 CLOUD
      DO 620 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1975 CLOUD
      DO 621 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1982 CLOUD
      DO 630 I=1,LENB
./pkg/fizhi/fizhi_moist.F 1990 CLOUD
      DO I=1,LENB
./pkg/fizhi/fizhi_moist.F 2000 CLOUD
      DO 690 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2012 CLOUD
         DO 750 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2029 CLOUD
      CALL RNCL(LENB, TX2, TX1, CLF)
./pkg/fizhi/fizhi_moist.F 2031 CLOUD
      DO 770 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2037 CLOUD
      DO 790 I=LENA1, LENB
./pkg/fizhi/fizhi_moist.F 2042 CLOUD
      DO 800 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2056 CLOUD
      DO 830 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2068 CLOUD
         DO 840 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2079 CLOUD
      DO 850 I=LENA1,LENB
./pkg/fizhi/fizhi_moist.F 2083 CLOUD
      DO 860 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2091 CLOUD
         DO 870 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2095 CLOUD
         DO 880 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2102 CLOUD
            DO 890 I=LENA1,LENB
./pkg/fizhi/fizhi_moist.F 2106 CLOUD
         DO 900 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2114 CLOUD
      DO 920 I=LENA1,LENB
./pkg/fizhi/fizhi_moist.F 2143 CLOUD
      DO 970 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2172 CLOUD
      DO I=1,LENB
./pkg/fizhi/fizhi_moist.F 2193 CLOUD
      DO 980 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2216 CLOUD
      DO 995 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2226 CLOUD
      DO 1010 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2233 CLOUD
      DO 1020 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2238 CLOUD
      DO 1030 I=1,LENB
./pkg/fizhi/fizhi_moist.F 2247 CLOUD
      DO 1040 I=1,LENB