Symbol Description Uses
AREANm1 53


File Line number Procedure Code
./pkg/seaice/seaice_growth.F 218 SEAICE_GROWTH 
          areaLoc      = MAX(A22,AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth.F 437 SEAICE_GROWTH 
          GHEFF(I,J)=-SEAICE_deltaTtherm*FICE(I,J)*AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 448 SEAICE_GROWTH 
          IF(FICE(I,J).LT.ZERO.AND.AREANm1(I,J,bi,bj).GT.ZERO) THEN
./pkg/seaice/seaice_growth.F 464 SEAICE_GROWTH 
     &           SEAICE_deltaTtherm/AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 482 SEAICE_GROWTH 
          FHEFF(I,J)= FICE(I,J)  * AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 483 SEAICE_GROWTH 
     &              + QNETO(I,J) * (ONE-AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth.F 531 SEAICE_GROWTH 
     &          (ONE-AREANm1(I,J,bi,bj))*GAREA(I,J)/HO_south
./pkg/seaice/seaice_growth.F 532 SEAICE_GROWTH 
     &          +HALF*HCORR(I,J)*AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 536 SEAICE_GROWTH 
     &          (ONE-AREANm1(I,J,bi,bj))*GAREA(I,J)/HO
./pkg/seaice/seaice_growth.F 537 SEAICE_GROWTH 
     &          +HALF*HCORR(I,J)*AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 562 SEAICE_GROWTH 
     &                      FICE(I,J)*recip_QI*AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 583 SEAICE_GROWTH 
     &            PRECIP(I,J,bi,bj)*AREANm1(I,J,bi,bj)*SDF
./pkg/seaice/seaice_growth.F 594 SEAICE_GROWTH 
     &            -PRECIP(I,J,bi,bj)*AREANm1(I,J,bi,bj)*
./pkg/seaice/seaice_growth.F 655 SEAICE_GROWTH 
     &         * ( ONE - AREANm1(I,J,bi,bj) )
./pkg/seaice/seaice_growth.F 673 SEAICE_GROWTH 
     &           *( ONE - AREANm1(I,J,bi,bj) )
./pkg/seaice/seaice_growth.F 688 SEAICE_GROWTH 
     &         *( ONE - AREANm1(I,J,bi,bj) )
./pkg/seaice/seaice_growth.F 770 SEAICE_GROWTH 
          QNET(I,J,bi,bj) = QNETI(I,J) * AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 771 SEAICE_GROWTH 
     &                     +QNETO(I,J) * (ONE-AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth.F 772 SEAICE_GROWTH 
          QSW(I,J,bi,bj)  = QSWI(I,J)  * AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 773 SEAICE_GROWTH 
     &                     +QSWO(I,J)  * (ONE-AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth_if.F 1118 SEAICE_GROWTH_IF 
     &                 AREANm1(I,J,bi,bj),
./pkg/seaice/seaice_growth_if.F 303 SEAICE_GROWTH_IF 
                  AREANm1(I,J,bi,bj) = AREA(I,J,bi,bj)
./pkg/seaice/seaice_growth_if.F 328 SEAICE_GROWTH_IF 
                  AREANm1(I,J,bi,bj) = MAX(0. _d 0,AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth_if.F 352 SEAICE_GROWTH_IF 
                      AREANm1(I,J,bi,bj) = 0.0 _d 0
./pkg/seaice/seaice_growth_if.F 356 SEAICE_GROWTH_IF 
                  IF (AREANm1(I,J,bi,bj) .EQ. 0.0) THEN
./pkg/seaice/seaice_growth_if.F 363 SEAICE_GROWTH_IF 
                  IF (AREANm1(I,J,bi,bj) .GT. 0.) THEN
./pkg/seaice/seaice_growth_if.F 365 SEAICE_GROWTH_IF 
     &                  HEFFNm1(I,J,bi,bj)/AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth_if.F 368 SEAICE_GROWTH_IF 
     &                  AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth_if.F 637 SEAICE_GROWTH_IF 
     &                 NetExistingIceGrowthRate(I,J)*AREANm1(I,J,bi,bj)+
./pkg/seaice/seaice_growth_if.F 638 SEAICE_GROWTH_IF 
     &                 (1. -AREANm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 645 SEAICE_GROWTH_IF 
                   S_hsnow(I,J) =     AREANm1(I,J,bi,bj)* (
./pkg/seaice/seaice_growth_if.F 677 SEAICE_GROWTH_IF 
                        S_a_from_IGROW(I,J) = (ONE-AREANm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 680 SEAICE_GROWTH_IF 
                        S_a_from_IGROW(I,J) = (ONE-AREANm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 684 SEAICE_GROWTH_IF 
                     IF (AREANm1(I,J,bi,bj) .GT. 0.) THEN
./pkg/seaice/seaice_growth_if.F 695 SEAICE_GROWTH_IF 
     &                 (AREANm1(I,J,bi,bj).GT. 0.) .AND.
./pkg/seaice/seaice_growth_if.F 699 SEAICE_GROWTH_IF 
     &                    + AREANm1(I,J,bi,bj)/(2.0*HEFFNm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 701 SEAICE_GROWTH_IF 
     &                    (1-AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth_if.F 708 SEAICE_GROWTH_IF 
     &                 (AREANm1(I,J,bi,bj).GT. 0.) .AND.
./pkg/seaice/seaice_growth_if.F 712 SEAICE_GROWTH_IF 
     &                    + AREANm1(I,J,bi,bj)/(2.0*HEFFNm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 721 SEAICE_GROWTH_IF 
     &                 (AREANm1(I,J,bi,bj).GT. 0.) .AND.
./pkg/seaice/seaice_growth_if.F 725 SEAICE_GROWTH_IF 
     &                   + AREANm1(I,J,bi,bj)/(2.0*HEFFNm1(I,J,bi,bj))*
./pkg/seaice/seaice_growth_if.F 726 SEAICE_GROWTH_IF 
     &                  NetExistingIceGrowthRate(I,J)*AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth_if.F 758 SEAICE_GROWTH_IF 
                  AREA(I,J,bi,bj) = AREANm1(I,J,bi,bj) +
./pkg/seaice/seaice_growth_if.F 851 SEAICE_GROWTH_IF 
     &                 QSWI(I,J)  * (     AREANm1(I,J,bi,bj)) +
./pkg/seaice/seaice_growth_if.F 852 SEAICE_GROWTH_IF 
     &                 QSWO(I,J)  * (1. - AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth_if.F 890 SEAICE_GROWTH_IF 
     &               (AREANm1(I,J,bi,bj) *
./pkg/seaice/seaice_growth_if.F 892 SEAICE_GROWTH_IF 
     &         +     (1.0 - AREANm1(I,J,bi,bj)) *
./pkg/seaice/seaice_growth_if.F 931 SEAICE_GROWTH_IF 
     &                 * ( ONE - AREANm1(I,J,bi,bj) )
./pkg/seaice/seaice_growth_if.F 933 SEAICE_GROWTH_IF 
     &                     AREANm1(I,J,bi,bj)
./pkg/seaice/seaice_growth_if.F 961 SEAICE_GROWTH_IF 
     &            -(QNET(I,J,bi,bj)-QSWO(I,J))*(1. -AREANm1(I,J,bi,bj))
./pkg/seaice/seaice_growth_if.F 965 SEAICE_GROWTH_IF 
     &             -F_io_net(I,J)*AREANm1(I,J,bi,bj)*FLUX_TO_DELTA_TEMP
./pkg/seaice/seaice_growth_if.F 968 SEAICE_GROWTH_IF 
     &             -F_ia_net(I,J)*AREANm1(I,J,bi,bj)*FLUX_TO_DELTA_TEMP