| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
129 |
NO PROCEDURE |
& DWATN, PRESS0, FORCEX0, FORCEY0, ZMAX, ZMIN |
|
./pkg/seaice/SEAICE.h |
131 |
NO PROCEDURE |
_RL PRESS0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/dynsolver.F |
222 |
DYNSOLVER |
PRESS0(I,J,bi,bj)=PSTAR*HEFF(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
225 |
DYNSOLVER |
ZMAX(I,J,bi,bj)=SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
228 |
DYNSOLVER |
PRESS0(I,J,bi,bj)=PRESS0(I,J,bi,bj)*HEFFM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
207 |
LSR |
ZETA(I,J,bi,bj) = 0.5 _d 0*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
114 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(I,J,bi,bj)=SEAICE_strength*tmpscal2 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
116 |
SEAICE_CALC_ICE_STRENGTH |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
118 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(I,J,bi,bj)= PRESS0(I,J,bi,bj)*HEFFM(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
126 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
142 |
SEAICE_CALC_ICE_STRENGTH |
& PRESS0(i,j,bi,bj) = PRESS0(i,j,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
154 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(i,j,bi,bj) = PRESS0(i,j,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
169 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(i,j,bi,bj) = PRESS0(i,j,bi,bj)/ridgingModeNorm(i,j) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
171 |
SEAICE_CALC_ICE_STRENGTH |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_ice_strength.F |
173 |
SEAICE_CALC_ICE_STRENGTH |
PRESS0(I,J,bi,bj)= PRESS0(I,J,bi,bj)*HEFFM(I,J,bi,bj) |
|
./pkg/seaice/seaice_dynsolver.F |
73 |
SEAICE_DYNSOLVER |
PRESS0(i,j,bi,bj) = PSTAR*HEFF(i,j,bi,bj) |
|
./pkg/seaice/seaice_dynsolver.F |
75 |
SEAICE_DYNSOLVER |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_dynsolver.F |
77 |
SEAICE_DYNSOLVER |
PRESS0(i,j,bi,bj) = PRESS0(i,j,bi,bj)*HEFFM(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
270 |
SEAICE_EVP |
& * ( PRESS0(I,J ,bi,bj) + PRESS0(I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
271 |
SEAICE_EVP |
& + PRESS0(I,J-1,bi,bj) + PRESS0(I-1,J-1,bi,bj) ) |
|
./pkg/seaice/seaice_init_varia.F |
302 |
SEAICE_INIT_VARIA |
PRESS0(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
674 |
SEAICE_INIT_VARIA |
PRESS0(i,j,bi,bj) = PSTAR*HEFF(i,j,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
676 |
SEAICE_INIT_VARIA |
ZMAX(I,J,bi,bj) = SEAICE_zetaMaxFac*PRESS0(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
678 |
SEAICE_INIT_VARIA |
PRESS0(i,j,bi,bj) = PRESS0(i,j,bi,bj)*HEFFM(i,j,bi,bj) |