Symbol Description Uses
zetaMaxC 4



File Line number Procedure Code
./pkg/seaice/seaice_evp.F 138 SEAICE_EVP
      _RL etaDenC, zetaMaxC, etaDenZ, zetaMaxZ
./pkg/seaice/seaice_evp.F 518 SEAICE_EVP
             zetaMaxC = ecc2*zetaC(I,J)
./pkg/seaice/seaice_evp.F 522 SEAICE_EVP
             eta(I,J,bi,bj) = MIN(zetaC(I,J),zetaMaxC)*recip_ecc2
./pkg/seaice/seaice_evp.F 527 SEAICE_EVP
             seaice_tension(I,J) = 2. _d 0*MIN(zetaC(I,J),zetaMaxC)