| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
102 |
DYNSOLVER |
COR_ICE(i,j,bi,bj) = 0. |
|
./pkg/seaice/dynsolver.F |
110 |
DYNSOLVER |
COR_ICE(I,J,bi,bj)=AMASS(I,J,bi,bj) * _fCoriG(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
217 |
DYNSOLVER |
& -COR_ICE(I,J,bi,bj)*GWATY(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
219 |
DYNSOLVER |
& +COR_ICE(I,J,bi,bj)*GWATX(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
304 |
DYNSOLVER |
CALL OSTRES ( COR_ICE, myThid ) |
|
./pkg/seaice/dynsolver.F |
63 |
DYNSOLVER |
_RL COR_ICE (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |
|
./pkg/seaice/ostres.F |
25 |
OSTRES |
_RL COR_ICE (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |
|
./pkg/seaice/ostres.F |
76 |
OSTRES |
& -SIGN(SINWAT,COR_ICE(I,J,bi,bj)) * |
|
./pkg/seaice/ostres.F |
7 |
OSTRES |
SUBROUTINE OSTRES( COR_ICE, myThid ) |
|
./pkg/seaice/ostres.F |
81 |
OSTRES |
& SIGN(SINWAT,COR_ICE(I,J,bi,bj)) * |