Symbol Description Uses
residU 9


File Line number Procedure Code
./pkg/seaice/seaice_lsr.F 1014 SEAICE_RESIDUAL 
     O                  residU, residV, uRes, vRes,
./pkg/seaice/seaice_lsr.F 1059 SEAICE_RESIDUAL 
      _RL residU, residV
./pkg/seaice/seaice_lsr.F 1078 SEAICE_RESIDUAL 
      residU = 0.
./pkg/seaice/seaice_lsr.F 1104 SEAICE_RESIDUAL 
            residU = residU + uRes(i,j,bi,bj)*uRes(i,j,bi,bj)
./pkg/seaice/seaice_lsr.F 1120 SEAICE_RESIDUAL 
       _GLOBAL_SUM_RL( residU, myThid )
./pkg/seaice/seaice_lsr.F 1123 SEAICE_RESIDUAL 
       IF ( residU.GT.0. ) residU = SQRT(residU/globalArea)