File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE.h |
101 |
NO PROCEDURE |
_RL deltaC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/SEAICE.h |
86 |
NO PROCEDURE |
& ETA,etaZ,ZETA,zetaZ,PRESS, e11, e22, e12, deltaC, |
./pkg/seaice/seaice_calc_residual.F |
103 |
SEAICE_CALC_RESIDUAL |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
./pkg/seaice/seaice_calc_viscosities.F |
137 |
SEAICE_CALC_VISCOSITIES |
deltaC(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_calc_viscosities.F |
139 |
SEAICE_CALC_VISCOSITIES |
& deltaC(I,J,bi,bj) = SQRT(deltaCsq) |
./pkg/seaice/seaice_calc_viscosities.F |
13 |
SEAICE_CALC_VISCOSITIES |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
./pkg/seaice/seaice_calc_viscosities.F |
141 |
SEAICE_CALC_VISCOSITIES |
deltaC(I,J,bi,bj) = SQRT(deltaCsq) |
./pkg/seaice/seaice_calc_viscosities.F |
149 |
SEAICE_CALC_VISCOSITIES |
deltaCreg = MAX(deltaC(I,J,bi,bj),SEAICE_deltaMin) |
./pkg/seaice/seaice_calc_viscosities.F |
172 |
SEAICE_CALC_VISCOSITIES |
& + TWO*zeta(I,J,bi,bj)*deltaC(I,J,bi,bj) |
./pkg/seaice/seaice_calc_viscosities.F |
54 |
SEAICE_CALC_VISCOSITIES |
_RL deltaC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_diagnostics_state.F |
131 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(deltaC ,'SIdelta ',0,1 ,0,1,1,myThid) |
./pkg/seaice/seaice_do_ridging.F |
166 |
SEAICE_DO_RIDGING |
shear = 0.5 _d 0 * ( deltaC(i,j,bi,bj) - ABS(divergence) ) |
./pkg/seaice/seaice_evp.F |
372 |
SEAICE_EVP |
deltaC (I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_evp.F |
412 |
SEAICE_EVP |
deltaC(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_evp.F |
414 |
SEAICE_EVP |
& deltaC(I,J,bi,bj) = SQRT(deltaSq) |
./pkg/seaice/seaice_evp.F |
416 |
SEAICE_EVP |
deltaC(I,J,bi,bj) = SQRT(deltaSq) |
./pkg/seaice/seaice_evp.F |
422 |
SEAICE_EVP |
deltaCreg = deltaC(I,J,bi,bj) + SEAICE_deltaMin |
./pkg/seaice/seaice_evp.F |
424 |
SEAICE_EVP |
deltaCreg = MAX(deltaC(I,J,bi,bj),SEAICE_deltaMin) |
./pkg/seaice/seaice_evp.F |
455 |
SEAICE_EVP |
& ( deltaC(I, J,bi,bj) + deltaC(I-1,J-1,bi,bj) |
./pkg/seaice/seaice_evp.F |
456 |
SEAICE_EVP |
& + deltaC(I-1,J,bi,bj) + deltaC(I, J-1,bi,bj) ) |
./pkg/seaice/seaice_evp.F |
490 |
SEAICE_EVP |
& + TWO*zetaC(I,J)*deltaC(I,J,bi,bj)*SEAICEpressReplFac |
./pkg/seaice/seaice_evp.F |
519 |
SEAICE_EVP |
& *(deltaC(I,J,bi,bj)-ep(I,J))/etaDenC |
./pkg/seaice/seaice_krylov.F |
225 |
SEAICE_KRYLOV |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
./pkg/seaice/seaice_lsr.F |
183 |
SEAICE_LSR |
deltaC (i,j,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_lsr.F |
330 |
SEAICE_LSR |
O eta, etaZ, zeta, zetaZ, press, deltaC, |