Symbol Description Uses
zetaMaxC 4



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