Symbol Description Uses
DELT1 4



File Line number Procedure Code
./pkg/seaice/lsr.F 202 LSR
          DELT1=(e11loc**2+e22loc**2)*(1. _d 0+ECM2)
./pkg/seaice/lsr.F 205 LSR
          IF ( DELT1 .LE. SEAICE_EPS_SQ ) THEN
./pkg/seaice/lsr.F 208 LSR
             DELT2=SQRT(DELT1)
./pkg/seaice/lsr.F 63 LSR
      _RL ECM2, DELT1, DELT2