Symbol Description Uses
recip_astar 4


File Line number Procedure Code
./pkg/seaice/seaice_prepare_ridging.F 175 SEAICE_PREPARE_RIDGING 
       recip_astar = 1. _d 0 / SEAICEaStar
./pkg/seaice/seaice_prepare_ridging.F 176 SEAICE_PREPARE_RIDGING 
       tmp = 1. _d 0 / ( 1. _d 0 - EXP( -recip_astar ) )
./pkg/seaice/seaice_prepare_ridging.F 181 SEAICE_PREPARE_RIDGING 
         gSum(i,j,k)     = EXP(-gSum(i,j,k)*recip_astar) * tmp
./pkg/seaice/seaice_prepare_ridging.F 187 SEAICE_PREPARE_RIDGING 
          gSum(i,j,k)     = EXP(-gSum(i,j,k)*recip_astar) * tmp