| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_dynsolver.F |
255 |
SEAICE_DYNSOLVER |
vice(i,j,bi,bj)=vice_fd(i,j,bi,bj) |
|
./pkg/seaice/seaice_get_dynforcing.F |
123 |
SEAICE_GET_DYNFORCING |
& - 0.5 _d 0 * (vice(i,j,bi,bj)+vice(i,j+1,bi,bj)) |
|
./pkg/seaice/seaice_get_dynforcing.F |
168 |
SEAICE_GET_DYNFORCING |
& -0.5 _d 0*(vice(i,j,bi,bj)+vice(i,j+1,bi,bj)))) |
|
./pkg/seaice/seaice_get_dynforcing.F |
176 |
SEAICE_GET_DYNFORCING |
& -0.5 _d 0*(vice(i-1,j,bi,bj)+vice(i-1,j+1,bi,bj))))) |
|
./pkg/seaice/seaice_get_dynforcing.F |
186 |
SEAICE_GET_DYNFORCING |
& -0.5 _d 0*(vice(i,j,bi,bj)+vice(i,j+1,bi,bj)))) |
|
./pkg/seaice/seaice_get_dynforcing.F |
194 |
SEAICE_GET_DYNFORCING |
& -0.5 _d 0*(vice(i,j-1,bi,bj)+vice(i,j,bi,bj))))) |
|
./pkg/seaice/seaice_growth.F |
542 |
SEAICE_GROWTH |
& -0.5 _d 0*(vice(i,j,bi,bj)+vice(i,j+1,bi,bj)))**2 |
|
./pkg/seaice/seaice_model.F |
174 |
SEAICE_MODEL |
IF ( useOBCS ) CALL OBCS_APPLY_UVICE( uice, vice, myThid ) |