| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
1135 |
LSR |
CVV(J)=CV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
113 |
LSR |
_RL CVV (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
1140 |
LSR |
CVV(J)=CVV(J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
1142 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
1147 |
LSR |
VRT(J1)=VRT(J1)-CVV(J1)*VRT(J2) |
|
./pkg/seaice/lsr.F |
118 |
LSR |
_RL VRT(1-OLy:sNy+OLy), CVV(1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
581 |
LSR |
CVV(I,J)=CV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
583 |
LSR |
CVV(I,1)=CVV(I,1)/BV(I,1,bi,bj) |
|
./pkg/seaice/lsr.F |
587 |
LSR |
CVV(I,J)=CVV(I,J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
589 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
594 |
LSR |
VRT(I,J1)=VRT(I,J1)-CVV(I,J1)*VRT(I,J2) |
|
./pkg/seaice/seaice_lsr.F |
1789 |
SEAICE_LSR_TRIDIAGV |
_RL CVV(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1798 |
SEAICE_LSR_TRIDIAGV |
CVV(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1833 |
SEAICE_LSR_TRIDIAGV |
CVV(I,J)=CV(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1843 |
SEAICE_LSR_TRIDIAGV |
CVV(I,jMin)=CVV(I,jMin)/BV(I,jMin,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1866 |
SEAICE_LSR_TRIDIAGV |
bet = BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM) |
|
./pkg/seaice/seaice_lsr.F |
1867 |
SEAICE_LSR_TRIDIAGV |
CVV(I,J) = CVV(I,J)/bet |
|
./pkg/seaice/seaice_lsr.F |
1886 |
SEAICE_LSR_TRIDIAGV |
VRT(I,JM)=VRT(I,JM)-CVV(I,JM)*VRT(I,JM+1) |