| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
111 |
LSR |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/lsr.F |
428 |
LSR |
sig12(I,J) = etaV(I,J) |
|
./pkg/seaice/lsr.F |
463 |
LSR |
& + ( _dyC(I, J, bi,bj) * sig12(I, J ) |
|
./pkg/seaice/lsr.F |
464 |
LSR |
& - _dyC(I-1,J, bi,bj) * sig12(I-1,J ) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
107 |
SEAICE_CALC_STRESS |
O sig11, sig22, sig12, |
|
./pkg/seaice/seaice_calc_stressdiv.F |
150 |
SEAICE_CALC_STRESS |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
165 |
SEAICE_CALC_STRESS |
sig12(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_calc_stressdiv.F |
182 |
SEAICE_CALC_STRESS |
sig12(i,j) = 2. _d 0 * e12(i,j,bi,bj) * etaZ(i,j,bi,bj) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
62 |
SEAICE_CALC_STRESSDIV |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
76 |
SEAICE_CALC_STRESSDIV |
O sig11, sig22, sig12, |
|
./pkg/seaice/seaice_calc_stressdiv.F |
87 |
SEAICE_CALC_STRESSDIV |
& + sig12(i ,j+1) * _dxV(i,j+1,bi,bj) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
88 |
SEAICE_CALC_STRESSDIV |
& - sig12(i ,j ) * _dxV(i,j ,bi,bj) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
93 |
SEAICE_CALC_STRESSDIV |
& + sig12(i+1,J ) * _dyU(i+1,J,bi,bj) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
94 |
SEAICE_CALC_STRESSDIV |
& - sig12(i ,j ) * _dyU(i ,j,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
171 |
SEAICE_DIAGNOSTICS_STATE |
sig12(I,J) = 0.25 _d 0 * |
|
./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 |
207 |
SEAICE_DIAGNOSTICS_STATE |
O sig11, sig22, sig12, |
|
./pkg/seaice/seaice_diagnostics_state.F |
50 |
SEAICE_DIAGNOSTICS_STATE |
_RL sig12(1-oLx:sNx+oLx,1-oLy:sNy+oLy) |
|
./pkg/seaice/seaice_lsr.F |
1505 |
SEAICE_LSR_RHSU |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1512 |
SEAICE_LSR_RHSU |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1530 |
SEAICE_LSR_RHSU |
sig12(I,J) = etaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1555 |
SEAICE_LSR_RHSU |
sig12(I,J) = sig12(I,J) - zetaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1579 |
SEAICE_LSR_RHSU |
& + _dxV(I ,J+1,bi,bj)*sig12(I ,J+1) |
|
./pkg/seaice/seaice_lsr.F |
1580 |
SEAICE_LSR_RHSU |
& - _dxV(I ,J ,bi,bj)*sig12(I ,J ) ) |
|
./pkg/seaice/seaice_lsr.F |
1636 |
SEAICE_LSR_RHSV |
_RL sig12(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
1643 |
SEAICE_LSR_RHSV |
sig12(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1662 |
SEAICE_LSR_RHSV |
sig12(I,J) = etaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1687 |
SEAICE_LSR_RHSV |
sig12(I,J) = sig12(I,J) - zetaZloc(I,J,bi,bj) * ( |
|
./pkg/seaice/seaice_lsr.F |
1709 |
SEAICE_LSR_RHSV |
& ( _dyU(I+1,J ,bi,bj) * sig12(I+1,J ) |
|
./pkg/seaice/seaice_lsr.F |
1710 |
SEAICE_LSR_RHSV |
& - _dyU(I ,J ,bi,bj) * sig12(I ,J ) |