Symbol Description Uses
d_HEFFbyNEG 13



File Line number Procedure Code
./pkg/seaice/SEAICE.h 145 NO PROCEDURE
      COMMON/SEAICE_REG_NEG/d_HEFFbyNEG,d_HSNWbyNEG
./pkg/seaice/SEAICE.h 148 NO PROCEDURE
      _RL d_HEFFbyNEG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/seaice/seaice_growth.F 1989 SEAICE_GROWTH
          tmpscal1 = d_HEFFbyNEG(I,J,bi,bj) + d_HEFFbyOCNonICE(I,J) +
./pkg/seaice/seaice_growth.F 2206 SEAICE_GROWTH
     &           + d_HEFFbyNEG(I,J,bi,bj)
./pkg/seaice/seaice_growth.F 2266 SEAICE_GROWTH
     &       + d_HEFFbyNEG(I,J,bi,bj)+ d_HSNWbyNEG(I,J,bi,bj)*SNOW2ICE )
./pkg/seaice/seaice_growth.F 2367 SEAICE_GROWTH
     &             +d_HEFFbyNEG(I,J,bi,bj)
./pkg/seaice/seaice_reg_ridge.F 104 SEAICE_REG_RIDGE
          d_HEFFbyNEG(I,J,bi,bj)    = 0.0 _d 0
./pkg/seaice/seaice_reg_ridge.F 165 SEAICE_REG_RIDGE
           d_HEFFbyNEG(I,J,bi,bj)=d_HEFFbyNEG(I,J,bi,bj)+tmpscal1
./pkg/seaice/seaice_reg_ridge.F 186 SEAICE_REG_RIDGE
          d_HEFFbyNEG(I,J,bi,bj)=MAX(-HEFF(I,J,bi,bj),0. _d 0)
./pkg/seaice/seaice_reg_ridge.F 187 SEAICE_REG_RIDGE
          HEFF(I,J,bi,bj)=HEFF(I,J,bi,bj)+d_HEFFbyNEG(I,J,bi,bj)
./pkg/seaice/seaice_reg_ridge.F 230 SEAICE_REG_RIDGE
          d_HEFFbyNEG(I,J,bi,bj)=d_HEFFbyNEG(I,J,bi,bj)+tmpscal1