| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
78 |
NO PROCEDURE |
& ETA,ZETA,PRESS, e11, e22, e12, |
|
./pkg/seaice/SEAICE.h |
83 |
NO PROCEDURE |
_RL PRESS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/dynsolver.F |
300 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
309 |
DYNSOLVER |
_EXCH_XY_RL(PRESS, myThid) |
|
./pkg/seaice/dynsolver.F |
346 |
DYNSOLVER |
& *(PRESS(I, J,bi,bj) + PRESS(I, J-1,bi,bj) |
|
./pkg/seaice/dynsolver.F |
347 |
DYNSOLVER |
& - PRESS(I-1,J,bi,bj) - PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
350 |
DYNSOLVER |
& *(PRESS(I,J, bi,bj) + PRESS(I-1,J, bi,bj) |
|
./pkg/seaice/dynsolver.F |
351 |
DYNSOLVER |
& - PRESS(I,J-1,bi,bj) - PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
419 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
428 |
DYNSOLVER |
_EXCH_XY_RL(PRESS, myThid) |
|
./pkg/seaice/dynsolver.F |
465 |
DYNSOLVER |
& *(PRESS(I, J,bi,bj) + PRESS(I, J-1,bi,bj) |
|
./pkg/seaice/dynsolver.F |
466 |
DYNSOLVER |
& - PRESS(I-1,J,bi,bj) - PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
469 |
DYNSOLVER |
& *(PRESS(I,J, bi,bj) + PRESS(I-1,J, bi,bj) |
|
./pkg/seaice/dynsolver.F |
470 |
DYNSOLVER |
& - PRESS(I,J-1,bi,bj) - PRESS(I-1,J-1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
443 |
SEAICE_LSR |
& - 0.5 _d 0 * PRESS(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
701 |
SEAICE_LSR |
& - 0.5 _d 0 * PRESS(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
903 |
SEAICE_LSR |
& - 0.5 _d 0 * PRESS(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
905 |
SEAICE_LSR |
& - 0.5 _d 0 * PRESS(I,J,bi,bj) |