Symbol Description Uses
old_AREA hold sea-ice fraction field before any seaice-thermo update 4



File Line number Procedure Code
./pkg/seaice/seaice_growth.F 113 SEAICE_GROWTH
      _RL old_AREA     (1:sNx,1:sNy)
./pkg/seaice/seaice_growth.F 199 SEAICE_GROWTH
           old_AREA(i,j) = AREA(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 939 SEAICE_GROWTH
           IF ( AREA(i,j,bi,bj) .LT. old_AREA(i,j) ) THEN
./pkg/seaice/seaice_growth.F 942 SEAICE_GROWTH
     &         *AREA(i,j,bi,bj)/old_AREA(i,j)