| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
144 |
DYNSOLVER |
PRESS0(I,J,bi,bj)=PSTAR*HEFF(I,J,1,bi,bj) |
|
./pkg/seaice/dynsolver.F |
146 |
DYNSOLVER |
ZMAX(I,J,bi,bj)=(5.0 _d +12/(2.0 _d +04))*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
148 |
DYNSOLVER |
PRESS0(I,J,bi,bj)=PRESS0(I,J,bi,bj)*HEFFM(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
215 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
322 |
DYNSOLVER |
ZETA(I,J,bi,bj)=HALF*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/dynsolver.F |
48 |
DYNSOLVER |
_RL PRESS0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |