| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
106 |
LSR |
_RL etaV (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
289 |
LSR |
etaV(I,J) = 0.5 _d 0 * ( |
|
./pkg/seaice/lsr.F |
299 |
LSR |
UXX(I,J) = _dyC(I,J,bi,bj) * (zetaV(I,J)+etaV(I,J)) |
|
./pkg/seaice/lsr.F |
302 |
LSR |
UXM(I,J) = _dyC(I,J,bi,bj) * (zetaV(I,J)-etaV(I,J)) |
|
./pkg/seaice/lsr.F |
319 |
LSR |
VXX(I,J) = _dyC(I,J,bi,bj) * etaV(I,J) |
|
./pkg/seaice/lsr.F |
322 |
LSR |
VXM(I,J) = _dyC(I,J,bi,bj) * etaV(I,J) |
|
./pkg/seaice/lsr.F |
422 |
LSR |
& (zetaV(I,J)-etaV(I,J)) |
|
./pkg/seaice/lsr.F |
425 |
LSR |
& + (zetaV(I,J)+etaV(I,J))*k2atV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
428 |
LSR |
sig12(I,J) = etaV(I,J) |
|
./pkg/seaice/lsr.F |
431 |
LSR |
& - etaV(I,J) * k2AtV(I,J,bi,bj) |