| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
104 |
LSR |
_RL etaU (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
281 |
LSR |
etaU(I,J) = 0.5 _d 0 * ( |
|
./pkg/seaice/lsr.F |
309 |
LSR |
UYY(I,J) = _dxC(I,J,bi,bj) * etaU(I,J) |
|
./pkg/seaice/lsr.F |
312 |
LSR |
UYM(I,J) = _dxC(I,J,bi,bj) * etaU(I,J) |
|
./pkg/seaice/lsr.F |
329 |
LSR |
VYY(I,J) = _dxC(I,J,bi,bj) * (zetaU(I,J)+etaU(I,J)) |
|
./pkg/seaice/lsr.F |
332 |
LSR |
VYM(I,J) = _dxC(I,J,bi,bj) * (zetaU(I,J)-etaU(I,J)) |
|
./pkg/seaice/lsr.F |
439 |
LSR |
& (zetaU(I,J)-etaU(I,J)) |
|
./pkg/seaice/lsr.F |
442 |
LSR |
& + (zetaU(I,J)+etaU(I,J))*k2atU(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
445 |
LSR |
sig21(I,J) = etaU(I,J) |
|
./pkg/seaice/lsr.F |
448 |
LSR |
& - etaU(I,J) * k1AtU(I,J,bi,bj) |