| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
108 |
LSR |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
425 |
LSR |
sig12(I,J) = etaV(I,J) |
|
./pkg/seaice/lsr.F |
460 |
LSR |
& + ( _dyC(I, J, bi,bj) * sig12(I, J ) |
|
./pkg/seaice/lsr.F |
461 |
LSR |
& - _dyC(I-1,J, bi,bj) * sig12(I-1,J ) |
|
./pkg/seaice/seaice_calc_lhs.F |
106 |
SEAICE_CALC_LHS |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_calc_lhs.F |
123 |
SEAICE_CALC_LHS |
sig12(I,J) = 2. _d 0 * e12(I,J,bi,bj) * etaZ(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
134 |
SEAICE_CALC_LHS |
& + sig12(I ,J+1) * _dxV(I,J+1,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
135 |
SEAICE_CALC_LHS |
& - sig12(I ,J ) * _dxV(I,J ,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
140 |
SEAICE_CALC_LHS |
& + sig12(I+1,J ) * _dyU(I+1,J,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
141 |
SEAICE_CALC_LHS |
& - sig12(I ,J ) * _dyU(I ,J,bi,bj) |
|
./pkg/seaice/seaice_calc_lhs.F |
81 |
SEAICE_CALC_LHS |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_diagnostics_state.F |
142 |
SEAICE_DIAGNOSTICS_STATE |
sig12 = 0.25 _d 0 * |
|
./pkg/seaice/seaice_diagnostics_state.F |
147 |
SEAICE_DIAGNOSTICS_STATE |
sigTmp = SQRT( sig2*sig2 + 4. _d 0*sig12*sig12 ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
179 |
SEAICE_DIAGNOSTICS_STATE |
sig12 = 2.*eta(I,J,bi,bj) * 0.25 _d 0 * |
|
./pkg/seaice/seaice_diagnostics_state.F |
182 |
SEAICE_DIAGNOSTICS_STATE |
sigTmp = SQRT( sig2*sig2 + 4. _d 0*sig12*sig12 ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
48 |
SEAICE_DIAGNOSTICS_STATE |
_RL sig1, sig2, sig12, sigTmp, recip_prs |
|
./pkg/seaice/seaice_lsr.F |
121 |
SEAICE_LSR |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1410 |
SEAICE_LSR_RHSU |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1417 |
SEAICE_LSR_RHSU |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1435 |
SEAICE_LSR_RHSU |
sig12(I,J) = etaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1460 |
SEAICE_LSR_RHSU |
& + _dxV(I ,J+1,bi,bj)*sig12(I ,J+1) |
|
./pkg/seaice/seaice_lsr.F |
1461 |
SEAICE_LSR_RHSU |
& - _dxV(I ,J ,bi,bj)*sig12(I ,J ) ) |
|
./pkg/seaice/seaice_lsr.F |
1512 |
SEAICE_LSR_RHSV |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1519 |
SEAICE_LSR_RHSV |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1538 |
SEAICE_LSR_RHSV |
sig12(I,J) = etaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1561 |
SEAICE_LSR_RHSV |
& ( _dyU(I+1,J ,bi,bj) * sig12(I+1,J ) |
|
./pkg/seaice/seaice_lsr.F |
1562 |
SEAICE_LSR_RHSV |
& - _dyU(I ,J ,bi,bj) * sig12(I ,J ) |
|
./pkg/seaice/seaice_lsr.F |
912 |
SEAICE_LSR |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
929 |
SEAICE_LSR |
sig12(I,J) = 2. _d 0 * e12(I,J,bi,bj) * etaZ(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
938 |
SEAICE_LSR |
& + sig12(I ,J+1) * _dxV(I ,J+1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
939 |
SEAICE_LSR |
& - sig12(I ,J ) * _dxV(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
944 |
SEAICE_LSR |
& + sig12(I+1,J ) * _dyU(I+1,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
945 |
SEAICE_LSR |
& - sig12(I ,J ) * _dyU(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_preconditioner.F |
471 |
SEAICE_PRECOND_RHSU |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_preconditioner.F |
491 |
SEAICE_PRECOND_RHSU |
sig12(I,J) = etaZpre(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_preconditioner.F |
516 |
SEAICE_PRECOND_RHSU |
& + _dxV(I ,J+1,bi,bj)*sig12(I ,J+1) |
|
./pkg/seaice/seaice_preconditioner.F |
517 |
SEAICE_PRECOND_RHSU |
& - _dxV(I ,J ,bi,bj)*sig12(I ,J ) ) |
|
./pkg/seaice/seaice_preconditioner.F |
593 |
SEAICE_PRECOND_RHSV |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_preconditioner.F |
613 |
SEAICE_PRECOND_RHSV |
sig12(I,J) = etaZpre(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_preconditioner.F |
636 |
SEAICE_PRECOND_RHSV |
& ( _dyU(I+1,J ,bi,bj) * sig12(I+1,J ) |
|
./pkg/seaice/seaice_preconditioner.F |
637 |
SEAICE_PRECOND_RHSV |
& - _dyU(I ,J ,bi,bj) * sig12(I ,J ) |