| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
100 |
NO PROCEDURE |
_RL deltaC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/SEAICE.h |
86 |
NO PROCEDURE |
& ETA,etaZ,ZETA,PRESS, e11, e22, e12, deltaC, |
|
./pkg/seaice/seaice_calc_residual.F |
89 |
SEAICE_CALC_RESIDUAL |
O eta, etaZ, zeta, press, deltaC, |
|
./pkg/seaice/seaice_calc_viscosities.F |
10 |
SEAICE_CALC_VISCOSITIES |
O eta, etaZ, zeta, press, deltaC, |
|
./pkg/seaice/seaice_calc_viscosities.F |
117 |
SEAICE_CALC_VISCOSITIES |
deltaC(I,J,bi,bj) = |
|
./pkg/seaice/seaice_calc_viscosities.F |
123 |
SEAICE_CALC_VISCOSITIES |
IF ( deltaC(I,J,bi,bj) .GT. 0. _d 0 ) |
|
./pkg/seaice/seaice_calc_viscosities.F |
124 |
SEAICE_CALC_VISCOSITIES |
& deltaC(I,J,bi,bj) = SQRT(deltaC(I,J,bi,bj)) |
|
./pkg/seaice/seaice_calc_viscosities.F |
126 |
SEAICE_CALC_VISCOSITIES |
deltaC(I,J,bi,bj) = SQRT(deltaC(I,J,bi,bj)) |
|
./pkg/seaice/seaice_calc_viscosities.F |
128 |
SEAICE_CALC_VISCOSITIES |
deltaCreg = MAX(deltaC(I,J,bi,bj),SEAICE_EPS) |
|
./pkg/seaice/seaice_calc_viscosities.F |
146 |
SEAICE_CALC_VISCOSITIES |
press(I,J,bi,bj) = TWO *zeta(I,J,bi,bj)*deltaC(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
55 |
SEAICE_CALC_VISCOSITIES |
_RL deltaC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_do_ridging.F |
163 |
SEAICE_DO_RIDGING |
shear = 0.5 _d 0 * ( deltaC(i,j,bi,bj) - ABS(divergence) ) |
|
./pkg/seaice/seaice_evp.F |
223 |
SEAICE_EVP |
deltaC (I,J,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_evp.F |
243 |
SEAICE_EVP |
deltaC(I,J,bi,bj) = |
|
./pkg/seaice/seaice_evp.F |
257 |
SEAICE_EVP |
IF ( deltaC(I,J,bi,bj) .GT. 0. _d 0 ) |
|
./pkg/seaice/seaice_evp.F |
258 |
SEAICE_EVP |
& deltaC(I,J,bi,bj) = SQRT(deltaC(I,J,bi,bj)) |
|
./pkg/seaice/seaice_evp.F |
262 |
SEAICE_EVP |
deltaC(I,J,bi,bj) = SQRT(deltaC(I,J,bi,bj)) |
|
./pkg/seaice/seaice_evp.F |
265 |
SEAICE_EVP |
deltaCreg = MAX(deltaC(I,J,bi,bj),SEAICE_EPS) |
|
./pkg/seaice/seaice_evp.F |
302 |
SEAICE_EVP |
pressC(I,J) = TWO*zetaC(I,J)*deltaC(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
339 |
SEAICE_EVP |
& *(deltaC(I,J,bi,bj)-ep(I,J))/etaDenC |
|
./pkg/seaice/seaice_lsr.F |
293 |
SEAICE_LSR |
O eta, etaZ, zeta, press, deltaC, |