Symbol Description Uses
J1 20



File Line number Procedure Code
./pkg/seaice/lsr.F 318 LSR
          J1=sNx-I
./pkg/seaice/lsr.F 319 LSR
          J2=J1+1
./pkg/seaice/lsr.F 320 LSR
          URT(J1)=URT(J1)-CUU(J1)*URT(J2)
./pkg/seaice/lsr.F 567 LSR
          J1=sNy-J
./pkg/seaice/lsr.F 568 LSR
          J2=J1+1
./pkg/seaice/lsr.F 569 LSR
          VRT(J1)=VRT(J1)-CVV(J1)*VRT(J2)
./pkg/seaice/seaice_lsr.F 565 SEAICE_LSR
          J1=sNx-I
./pkg/seaice/seaice_lsr.F 566 SEAICE_LSR
          J2=J1+1
./pkg/seaice/seaice_lsr.F 567 SEAICE_LSR
          URT(J1,J)=URT(J1,J)-CUU(J1,J)*URT(J2,J)
./pkg/seaice/seaice_lsr.F 812 SEAICE_LSR
          J1=sNy-J
./pkg/seaice/seaice_lsr.F 813 SEAICE_LSR
          J2=J1+1
./pkg/seaice/seaice_lsr.F 814 SEAICE_LSR
          VRT(I,J1)=VRT(I,J1)-CVV(I,J1)*VRT(I,J2)