| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
211 |
DYNSOLVER |
DELT2=SEAICE_EPS |
|
./pkg/seaice/dynsolver.F |
213 |
DYNSOLVER |
DELT2=SQRT(DELT1) |
|
./pkg/seaice/dynsolver.F |
215 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
222 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
318 |
DYNSOLVER |
DELT2=SEAICE_EPS |
|
./pkg/seaice/dynsolver.F |
320 |
DYNSOLVER |
DELT2=SQRT(DELT1) |
|
./pkg/seaice/dynsolver.F |
322 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
329 |
DYNSOLVER |
PRESS(I,J,bi,bj)=TWO*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/dynsolver.F |
44 |
DYNSOLVER |
_RL ECCEN, ECM2, RADIUS, DELT1, DELT2, PSTAR, AAA |