| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
114 |
LSR |
_RL URT (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
117 |
LSR |
_RL URT(1-OLx:sNx+OLx), CUU(1-OLx:sNx+OLx) |
|
./pkg/seaice/lsr.F |
511 |
LSR |
URT(I,J)=rhsU(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
520 |
LSR |
URT(I,J)=URT(I,J)* UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
527 |
LSR |
URT(1,J)=URT(1,J)/BU(1,J,bi,bj) |
|
./pkg/seaice/lsr.F |
539 |
LSR |
URT(I,J)=(URT(I,J)-AU(I,J,bi,bj)*URT(IM,J)) |
|
./pkg/seaice/lsr.F |
550 |
LSR |
URT(J1,J)=URT(J1,J)-CUU(J1,J)*URT(J2,J) |
|
./pkg/seaice/lsr.F |
554 |
LSR |
& +WFAU*(URT(I,J)-uTmp(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
879 |
LSR |
URT(I)=rhsU(I,J,bi,bj)+AA3 |
|
./pkg/seaice/lsr.F |
882 |
LSR |
URT(I)=URT(I)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
888 |
LSR |
URT(1)=URT(1)/BU(1,J,bi,bj) |
|
./pkg/seaice/lsr.F |
892 |
LSR |
URT(I)=(URT(I)-AU(I,J,bi,bj)*URT(IM)) |
|
./pkg/seaice/lsr.F |
898 |
LSR |
URT(J1)=URT(J1)-CUU(J1)*URT(J2) |
|
./pkg/seaice/lsr.F |
902 |
LSR |
& +WFAU*(URT(I)-UTMP(I,J,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
1634 |
SEAICE_LSR_TRIDIAGU |
_RL URT(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1643 |
SEAICE_LSR_TRIDIAGU |
URT(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1658 |
SEAICE_LSR_TRIDIAGU |
URT(I,J)=rhsU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1662 |
SEAICE_LSR_TRIDIAGU |
URT(I,J)=URT(I,J)* seaiceMaskU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1669 |
SEAICE_LSR_TRIDIAGU |
URT(iMin,J)=URT(iMin,J)/BU(iMin,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1693 |
SEAICE_LSR_TRIDIAGU |
URT(I,J) = (URT(I,J)-AU(I,J,bi,bj)*URT(IM,J))/bet |
|
./pkg/seaice/seaice_lsr.F |
1711 |
SEAICE_LSR_TRIDIAGU |
URT(IM,J)=URT(IM,J)-CUU(IM,J)*URT(IM+1,J) |
|
./pkg/seaice/seaice_lsr.F |
1715 |
SEAICE_LSR_TRIDIAGU |
& +WFAU*(URT(I,J)-uTmp(I,J,bi,bj)) |