| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_calc_viscosities.F |
127 |
SEAICE_CALC_VISCOSITIES |
em = e11(i,j,bi,bj)-e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
128 |
SEAICE_CALC_VISCOSITIES |
deltaCsq = ep*ep+recip_e2*(em*em+4. _d 0*e12Csq(i,j)) |
|
./pkg/seaice/seaice_calc_viscosities.F |
186 |
SEAICE_CALC_VISCOSITIES |
em = e11(i,j,bi,bj)-e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_calc_viscosities.F |
187 |
SEAICE_CALC_VISCOSITIES |
etaDen = em*em + 4. _d 0 * e12Csq(i,j) |
|
./pkg/seaice/seaice_calc_viscosities.F |
73 |
SEAICE_CALC_VISCOSITIES |
_RL recip_e2, deltaCreg, deltaCsq, deltaMinSq, tmp, ep, em |
|
./pkg/seaice/seaice_evp.F |
125 |
SEAICE_EVP |
_RL em (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_evp.F |
378 |
SEAICE_EVP |
em(i,j) = e11(i,j,bi,bj) - e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
408 |
SEAICE_EVP |
deltaSq = ep(I,J)**2 + recip_ecc2 * em(I,J)**2 |
|
./pkg/seaice/seaice_evp.F |
516 |
SEAICE_EVP |
etaDenC = em(I,J)**2 + 4. _d 0 * e12Csq(I,J) |
|
./pkg/seaice/seaice_evp.F |
528 |
SEAICE_EVP |
& * em(I,J) * hEffM(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
543 |
SEAICE_EVP |
& ( _rA(I ,J ,bi,bj) * em(I, J )**2 |
|
./pkg/seaice/seaice_evp.F |
544 |
SEAICE_EVP |
& + _rA(I-1,J-1,bi,bj) * em(I-1,J-1)**2 |
|
./pkg/seaice/seaice_evp.F |
545 |
SEAICE_EVP |
& + _rA(I-1,J ,bi,bj) * em(I-1,J )**2 |
|
./pkg/seaice/seaice_evp.F |
546 |
SEAICE_EVP |
& + _rA(I ,J-1,bi,bj) * em(I, J-1)**2 ) |
|
./pkg/seaice/seaice_evp.F |
568 |
SEAICE_EVP |
& * em(I,J) * hEffM(I,J,bi,bj) |