Symbol Description Uses
e12Csqr 5


File Line number Procedure Code
./pkg/seaice/seaice_calc_viscosities.F 107 SEAICE_CALC_VISCOSITIES 
           e12Csqr(i,j) = 0.25 _d 0 * recip_rA(I,J,bi,bj) *
./pkg/seaice/seaice_calc_viscosities.F 119 SEAICE_CALC_VISCOSITIES 
     &         + 4. _d 0*ecm2*e12Csqr(i,j)
./pkg/seaice/seaice_calc_viscosities.F 154 SEAICE_CALC_VISCOSITIES 
     &          + 4. _d 0*e12Csqr(i,j)
./pkg/seaice/seaice_calc_viscosities.F 70 SEAICE_CALC_VISCOSITIES 
      _RL e12Csqr(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/seaice/seaice_calc_viscosities.F 99 SEAICE_CALC_VISCOSITIES 
           e12Csqr(i,j) = tmp*tmp