| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
289 |
DYNSOLVER |
DELT2=SEAICE_EPS |
|
./pkg/seaice/dynsolver.F |
291 |
DYNSOLVER |
DELT2=SQRT(DELT1) |
|
./pkg/seaice/dynsolver.F |
293 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
300 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
408 |
DYNSOLVER |
DELT2=SEAICE_EPS |
|
./pkg/seaice/dynsolver.F |
410 |
DYNSOLVER |
DELT2=SQRT(DELT1) |
|
./pkg/seaice/dynsolver.F |
412 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
419 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
56 |
DYNSOLVER |
_RL ECCEN, ECM2, DELT1, DELT2, PSTAR, AAA |