| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
86 |
NO PROCEDURE |
& ETA,etaZ,ZETA,PRESS, e11, e22, e12, deltaC, |
|
./pkg/seaice/SEAICE.h |
96 |
NO PROCEDURE |
_RL e22 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_calc_lhs.F |
112 |
SEAICE_CALC_LHS |
eplus = e11(I,J,bi,bj) + e22(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
113 |
SEAICE_CALC_LHS |
eminus= e11(I,J,bi,bj) - e22(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_residual.F |
85 |
SEAICE_CALC_RESIDUAL |
O e11, e22, e12, |
|
./pkg/seaice/seaice_calc_residual.F |
88 |
SEAICE_CALC_RESIDUAL |
I e11, e22, e12, zMin, zMax, hEffM, press0, |
|
./pkg/seaice/seaice_calc_viscosities.F |
118 |
SEAICE_CALC_VISCOSITIES |
& (e11(i,j,bi,bj)**2+e22(i,j,bi,bj)**2)*(ONE+ecm2) |
|
./pkg/seaice/seaice_calc_viscosities.F |
120 |
SEAICE_CALC_VISCOSITIES |
& + 2. _d 0*e11(i,j,bi,bj)*e22(i,j,bi,bj)*(ONE-ecm2) |
|
./pkg/seaice/seaice_calc_viscosities.F |
153 |
SEAICE_CALC_VISCOSITIES |
etaDen = (e11(I,J,bi,bj)-e22(I,J,bi,bj))**2 |
|
./pkg/seaice/seaice_calc_viscosities.F |
157 |
SEAICE_CALC_VISCOSITIES |
& *( e11(I,J,bi,bj)+e22(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_calc_viscosities.F |
45 |
SEAICE_CALC_VISCOSITIES |
_RL e22 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_calc_viscosities.F |
9 |
SEAICE_CALC_VISCOSITIES |
I e11, e22, e12, zMin, zMax, hEffM, press0, |
|
./pkg/seaice/seaice_diagnostics_state.F |
166 |
SEAICE_DIAGNOSTICS_STATE |
O e11, e22, e12, |
|
./pkg/seaice/seaice_diagnostics_state.F |
175 |
SEAICE_DIAGNOSTICS_STATE |
& * (e11(I,J,bi,bj) + e22(I,J,bi,bj)) |
|
./pkg/seaice/seaice_diagnostics_state.F |
178 |
SEAICE_DIAGNOSTICS_STATE |
& * (e11(I,J,bi,bj) - e22(I,J,bi,bj)) |
|
./pkg/seaice/seaice_do_ridging.F |
162 |
SEAICE_DO_RIDGING |
divergence = e11(i,j,bi,bj) + e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
155 |
SEAICE_EVP |
e22 (I,J,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_evp.F |
203 |
SEAICE_EVP |
O e11, e22, e12, |
|
./pkg/seaice/seaice_evp.F |
228 |
SEAICE_EVP |
ep(i,j) = e11(i,j,bi,bj) + e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
229 |
SEAICE_EVP |
em(i,j) = e11(i,j,bi,bj) - e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
288 |
SEAICE_LSR |
O e11, e22, e12, |
|
./pkg/seaice/seaice_lsr.F |
292 |
SEAICE_LSR |
I e11, e22, e12, zMin, zMax, hEffM, press0, |
|
./pkg/seaice/seaice_lsr.F |
903 |
SEAICE_LSR |
O e11, e22, e12, |
|
./pkg/seaice/seaice_lsr.F |
918 |
SEAICE_LSR |
eplus = e11(I,J,bi,bj) + e22(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
919 |
SEAICE_LSR |
eminus= e11(I,J,bi,bj) - e22(I,J,bi,bj) |