Symbol Description Uses
zetaMaxC 4



File Line number Procedure Code
./pkg/seaice/seaice_evp.F 312 SEAICE_EVP
             zetaMaxC = ecc2*zetaC(I,J)*(deltaC(I,J)-ep(I,J))/etaDenC
./pkg/seaice/seaice_evp.F 324 SEAICE_EVP
             eta(I,J,bi,bj) = MIN(zetaC(I,J),zetaMaxC)*recip_ecc2
./pkg/seaice/seaice_evp.F 329 SEAICE_EVP
             seaice_tension(I,J) = 2. _d 0*MIN(zetaC(I,J),zetaMaxC)
./pkg/seaice/seaice_evp.F 91 SEAICE_EVP
      _RL etaDenC, zetaMaxC, etaDenZ, zetaMaxZ