| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
308 |
LSR |
CUU(I)=CU(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
313 |
LSR |
CUU(I)=CUU(I)/(BU(I,J,bi,bj)-AU(I,J,bi,bj)*CUU(IM)) |
|
./pkg/seaice/lsr.F |
315 |
LSR |
& /(BU(I,J,bi,bj)-AU(I,J,bi,bj)*CUU(IM)) |
|
./pkg/seaice/lsr.F |
320 |
LSR |
URT(J1)=URT(J1)-CUU(J1)*URT(J2) |
|
./pkg/seaice/lsr.F |
64 |
LSR |
_RL URT(1-Olx:sNx+Olx), CUU(1-Olx:sNx+Olx) |
|
./pkg/seaice/seaice_lsr.F |
102 |
SEAICE_LSR |
_RL CUU (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/seaice/seaice_lsr.F |
542 |
SEAICE_LSR |
CUU(I,J)=CU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
555 |
SEAICE_LSR |
CUU(I,J)=CUU(I,J)/(BU(I,J,bi,bj)-AU(I,J,bi,bj)*CUU(IM,J)) |
|
./pkg/seaice/seaice_lsr.F |
557 |
SEAICE_LSR |
& /(BU(I,J,bi,bj)-AU(I,J,bi,bj)*CUU(IM,J)) |
|
./pkg/seaice/seaice_lsr.F |
567 |
SEAICE_LSR |
URT(J1,J)=URT(J1,J)-CUU(J1,J)*URT(J2,J) |