Symbol Description Uses
denomU 7


File Line number Procedure Code
./pkg/seaice/seaice_evp.F 145 SEAICE_EVP 
      _RL sumNorm, denomU, denomV
./pkg/seaice/seaice_evp.F 862 SEAICE_EVP 
            denomU = seaiceMassU(I,J,bi,bj)*betaFacP1U
./pkg/seaice/seaice_evp.F 869 SEAICE_EVP 
            denomU = denomU + areaW(I,J,bi,bj)
./pkg/seaice/seaice_evp.F 874 SEAICE_EVP 
            IF ( denomU .EQ. 0. _d 0 ) denomU = 1. _d 0
./pkg/seaice/seaice_evp.F 882 SEAICE_EVP 
     &           + stressDivergenceX(I,J,bi,bj) ) / denomU