| Symbol | Description | Uses |
| recip_e2 | 5 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/seaice_calc_viscosities.F | 128 | SEAICE_CALC_VISCOSITIES |
deltaCsq = ep*ep+recip_e2*(em*em+4. _d 0*e12Csq(i,j)) |
| ./pkg/seaice/seaice_calc_viscosities.F | 168 | SEAICE_CALC_VISCOSITIES |
eta (I,J,bi,bj) = recip_e2*zeta(I,J,bi,bj) |
| ./pkg/seaice/seaice_calc_viscosities.F | 73 | SEAICE_CALC_VISCOSITIES |
_RL recip_e2, deltaCreg, deltaCsq, deltaMinSq, tmp, ep, em |
| ./pkg/seaice/seaice_calc_viscosities.F | 87 | SEAICE_CALC_VISCOSITIES |
recip_e2=0. _d 0 |
| ./pkg/seaice/seaice_calc_viscosities.F | 88 | SEAICE_CALC_VISCOSITIES |
IF ( SEAICE_eccen .NE. 0. _d 0 ) recip_e2=ONE/(SEAICE_eccen**2) |