| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_diagnostics_state.F |
144 |
SEAICE_DIAGNOSTICS_STATE |
tIce(I,J,bi,bj) = press0(I,J,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
148 |
SEAICE_DIAGNOSTICS_STATE |
tIce(I,J,bi,bj) = tensileStrFac(I,J,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
155 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(tIce,'SItensil',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
44 |
SEAICE_DIAGNOSTICS_STATE |
_RL tIce (1-oLx:sNx+oLx,1-oLy:sNy+oLy,nSx,nSy) |
|
./pkg/seaice/seaice_diagnostics_state.F |
77 |
SEAICE_DIAGNOSTICS_STATE |
tIce(I,J,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_diagnostics_state.F |
90 |
SEAICE_DIAGNOSTICS_STATE |
tIce(I,J,bi,bj) = tIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
98 |
SEAICE_DIAGNOSTICS_STATE |
I tIce, AREA, 1. _d 0, 1, 'SItices ', |