| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_diagnostics_state.F |
170 |
SEAICE_DIAGNOSTICS_STATE |
sigm = seaice_sigma2(I,J,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
176 |
SEAICE_DIAGNOSTICS_STATE |
sigTmp = SQRT( sigm*sigm + 4. _d 0*sig12(I,J)*sig12(I,J) ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
212 |
SEAICE_DIAGNOSTICS_STATE |
sigm = sig11(I,J) - sig22(I,J) |
|
./pkg/seaice/seaice_diagnostics_state.F |
224 |
SEAICE_DIAGNOSTICS_STATE |
sigTmp = SQRT( sigm*sigm + 4.*sigTmp*sigTmp ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
242 |
SEAICE_DIAGNOSTICS_STATE |
sigm = e11(I,J,bi,bj) - e22(I,J,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
248 |
SEAICE_DIAGNOSTICS_STATE |
sig1(I,J) = sqrt(sigm*sigm + sigTmp) |
|
./pkg/seaice/seaice_diagnostics_state.F |
51 |
SEAICE_DIAGNOSTICS_STATE |
_RL sigp, sigm, sigTmp, recip_prs |