| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
130 |
NO PROCEDURE |
& DWATN, PRESS0, FORCEX0, FORCEY0, ZMAX, ZMIN, tensileStrFac |
|
./pkg/seaice/SEAICE.h |
135 |
NO PROCEDURE |
_RL ZMAX (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/dynsolver.F |
228 |
DYNSOLVER |
ZMAX(I,J,bi,bj)=SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
212 |
LSR |
ZETA(I,J,bi,bj) = MIN(ZMAX(I,J,bi,bj),ZETA(I,J,bi,bj)) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
119 |
SEAICE_CALC_ICE_STRENGTH |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
174 |
SEAICE_CALC_ICE_STRENGTH |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
156 |
SEAICE_CALC_VISCOSITIES |
zeta (I,J,bi,bj) = ZMAX(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
163 |
SEAICE_CALC_VISCOSITIES |
zeta (I,J,bi,bj) = MIN(ZMAX(I,J,bi,bj),zeta(I,J,bi,bj)) |
|
./pkg/seaice/seaice_dynsolver.F |
80 |
SEAICE_DYNSOLVER |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
309 |
SEAICE_INIT_VARIA |
ZMAX(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
680 |
SEAICE_INIT_VARIA |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |