| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
222 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
231 |
DYNSOLVER |
_EXCH_XY_R8(PRESS, myThid) |
|
./pkg/seaice/dynsolver.F |
259 |
DYNSOLVER |
& *(PRESS(I,J,bi,bj)+PRESS(I,J-1,bi,bj) |
|
./pkg/seaice/dynsolver.F |
260 |
DYNSOLVER |
& -PRESS(I-1,J,bi,bj)-PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
262 |
DYNSOLVER |
& *(PRESS(I,J,bi,bj)+PRESS(I-1,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
263 |
DYNSOLVER |
& -PRESS(I,J-1,bi,bj)-PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
329 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
338 |
DYNSOLVER |
_EXCH_XY_R8(PRESS, myThid) |
|
./pkg/seaice/dynsolver.F |
366 |
DYNSOLVER |
& *(PRESS(I,J,bi,bj)+PRESS(I,J-1,bi,bj) |
|
./pkg/seaice/dynsolver.F |
367 |
DYNSOLVER |
& -PRESS(I-1,J,bi,bj)-PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
369 |
DYNSOLVER |
& *(PRESS(I,J,bi,bj)+PRESS(I-1,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
370 |
DYNSOLVER |
& -PRESS(I,J-1,bi,bj)-PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
47 |
DYNSOLVER |
_RL PRESS (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |