Symbol Description Uses
recip_etaR reciprocal of range interval in eta space 6



File Line number Procedure Code
./pkg/seaice/seaice_itd_remap.F 434 SEAICE_ITD_REMAP_LINEAR
      _RL recip_etaR, etaNoR
./pkg/seaice/seaice_itd_remap.F 458 SEAICE_ITD_REMAP_LINEAR
         recip_etaR = 0. _d 0
./pkg/seaice/seaice_itd_remap.F 461 SEAICE_ITD_REMAP_LINEAR
     &        recip_etaR = 1. _d 0 / (hR(i,j) - hL(i,j))
./pkg/seaice/seaice_itd_remap.F 463 SEAICE_ITD_REMAP_LINEAR
         etaNoR     = (hActual(i,j) - hL(i,j))*recip_etaR
./pkg/seaice/seaice_itd_remap.F 464 SEAICE_ITD_REMAP_LINEAR
         auxCoeff   = 6. _d 0 * area(i,j)*recip_etaR
./pkg/seaice/seaice_itd_remap.F 467 SEAICE_ITD_REMAP_LINEAR
         g1(i,j) = 2. _d 0 * auxCoeff*recip_etaR*( etaNoR - 0.5 _d 0 )