Symbol Description Uses
resnorm 6


File Line number Procedure Code
./pkg/seaice/seaice_lsr.F 135 SEAICE_LSR 
      _RL resnorm, EKnorm, counter
./pkg/seaice/seaice_lsr.F 852 SEAICE_LSR 
       resnorm = 0. _d 0
./pkg/seaice/seaice_lsr.F 860 SEAICE_LSR 
           resnorm = resnorm + 0.5 _d 0 *
./pkg/seaice/seaice_lsr.F 875 SEAICE_LSR 
       _GLOBAL_SUM_RL( resnorm, myThid )
./pkg/seaice/seaice_lsr.F 882 SEAICE_LSR 
     &      ipass, sqrt(resnorm), EKnorm