File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_diagnostics_state.F |
169 |
SEAICE_DIAGNOSTICS_STATE |
sigp = seaice_sigma1(I,J,bi,bj) |
./pkg/seaice/seaice_diagnostics_state.F |
180 |
SEAICE_DIAGNOSTICS_STATE |
sig1(I,J) = 0.5*(sigp + sigTmp)*recip_prs |
./pkg/seaice/seaice_diagnostics_state.F |
181 |
SEAICE_DIAGNOSTICS_STATE |
sig2(I,J) = 0.5*(sigp - sigTmp)*recip_prs |
./pkg/seaice/seaice_diagnostics_state.F |
211 |
SEAICE_DIAGNOSTICS_STATE |
sigp = sig11(I,J) + sig22(I,J) |
./pkg/seaice/seaice_diagnostics_state.F |
228 |
SEAICE_DIAGNOSTICS_STATE |
sig1(I,J) = 0.5*(sigp + sigTmp)*recip_prs |
./pkg/seaice/seaice_diagnostics_state.F |
229 |
SEAICE_DIAGNOSTICS_STATE |
sig2(I,J) = 0.5*(sigp - sigTmp)*recip_prs |
./pkg/seaice/seaice_diagnostics_state.F |
51 |
SEAICE_DIAGNOSTICS_STATE |
_RL sigp, sigm, sigTmp, recip_prs |