| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/dynsolver.F |
298 |
DYNSOLVER |
CALL DIAGNOSTICS_FILL(eta ,'SIeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/lsr.F |
282 |
LSR |
& + eta(I,J,bi,bj) + eta(I-1,J,bi,bj) ) |
|
./pkg/seaice/lsr.F |
290 |
LSR |
& + eta(I,J,bi,bj) + eta(I,J-1,bi,bj) ) |
|
./pkg/seaice/seaice_calc_lhs.F |
132 |
SEAICE_CALC_LHS |
I e11, e22, e12, press, zeta, eta, etaZ, |
|
./pkg/seaice/seaice_calc_residual.F |
103 |
SEAICE_CALC_RESIDUAL |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
|
./pkg/seaice/seaice_calc_stressdiv.F |
106 |
SEAICE_CALC_STRESS |
I e11, e22, e12, press, zeta, eta, etaZ, |
|
./pkg/seaice/seaice_calc_stressdiv.F |
146 |
SEAICE_CALC_STRESS |
_RL eta (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
173 |
SEAICE_CALC_STRESS |
sig11(i,j) = zeta(i,j,bi,bj)*eplus + eta(i,j,bi,bj)*eminus |
|
./pkg/seaice/seaice_calc_stressdiv.F |
175 |
SEAICE_CALC_STRESS |
sig22(i,j) = zeta(i,j,bi,bj)*eplus - eta(i,j,bi,bj)*eminus |
|
./pkg/seaice/seaice_calc_stressdiv.F |
18 |
SEAICE_CALC_STRESSDIV |
I e11, e22, e12, press, zeta, eta, etaZ, |
|
./pkg/seaice/seaice_calc_stressdiv.F |
58 |
SEAICE_CALC_STRESSDIV |
_RL eta (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
75 |
SEAICE_CALC_STRESSDIV |
I e11, e22, e12, press, zeta, eta, etaZ, |
|
./pkg/seaice/seaice_calc_viscosities.F |
13 |
SEAICE_CALC_VISCOSITIES |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
|
./pkg/seaice/seaice_calc_viscosities.F |
168 |
SEAICE_CALC_VISCOSITIES |
eta (I,J,bi,bj) = recip_e2*zeta(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
191 |
SEAICE_CALC_VISCOSITIES |
eta(I,J,bi,bj) = MIN(eta(I,J,bi,bj),etaMax) |
|
./pkg/seaice/seaice_calc_viscosities.F |
203 |
SEAICE_CALC_VISCOSITIES |
& ( eta (I,J ,bi,bj) + eta (I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
204 |
SEAICE_CALC_VISCOSITIES |
& + eta (I,J-1,bi,bj) + eta (I-1,J-1,bi,bj) ) |
|
./pkg/seaice/seaice_calc_viscosities.F |
58 |
SEAICE_CALC_VISCOSITIES |
_RL eta (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_diagnostics_state.F |
129 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(eta ,'SIeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
206 |
SEAICE_DIAGNOSTICS_STATE |
I e11, e22, e12, press, zeta, eta, etaZ, |
|
./pkg/seaice/seaice_diagnostics_state.F |
221 |
SEAICE_DIAGNOSTICS_STATE |
sigTmp = 2.*eta(I,J,bi,bj) * 0.25 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
502 |
SEAICE_EVP |
eta (I,J,bi,bj) = zetaC(I,J)*recip_ecc2 |
|
./pkg/seaice/seaice_evp.F |
522 |
SEAICE_EVP |
eta(I,J,bi,bj) = MIN(zetaC(I,J),zetaMaxC)*recip_ecc2 |
|
./pkg/seaice/seaice_jfnk.F |
202 |
SEAICE_JFNK |
etaPre(I,J,bi,bj) = eta(I,J,bi,bj) |
|
./pkg/seaice/seaice_krylov.F |
225 |
SEAICE_KRYLOV |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
|
./pkg/seaice/seaice_krylov.F |
348 |
SEAICE_KRYLOV |
I zeta, eta, etaZ, zetaZ, dwatn, |
|
./pkg/seaice/seaice_lsr.F |
187 |
SEAICE_LSR |
eta (i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
330 |
SEAICE_LSR |
O eta, etaZ, zeta, zetaZ, press, deltaC, |
|
./pkg/seaice/seaice_lsr.F |
993 |
SEAICE_LSR |
I e11, e22, e12, press, zeta, eta, etaZ, |