| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
166 |
NO PROCEDURE |
& seaice_sigma1, seaice_sigma2, seaice_sigma12 |
|
./pkg/seaice/SEAICE.h |
169 |
NO PROCEDURE |
_RL seaice_sigma12 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_diagnostics_state.F |
121 |
SEAICE_DIAGNOSTICS_STATE |
& ( seaice_sigma12(I, J, bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
122 |
SEAICE_DIAGNOSTICS_STATE |
& + seaice_sigma12(I+1,J, bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
123 |
SEAICE_DIAGNOSTICS_STATE |
& + seaice_sigma12(I+1,J+1,bi,bj) |
|
./pkg/seaice/seaice_diagnostics_state.F |
124 |
SEAICE_DIAGNOSTICS_STATE |
& + seaice_sigma12(I ,J+1,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
378 |
SEAICE_EVP |
seaice_sigma12(I,J,bi,bj) = ( seaice_sigma12(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
392 |
SEAICE_EVP |
& + seaice_sigma12(I,J+1,bi,bj) * _dxV(I,J+1,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
393 |
SEAICE_EVP |
& - seaice_sigma12(I,J ,bi,bj) * _dxV(I,J ,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
398 |
SEAICE_EVP |
& + seaice_sigma12(I+1,J,bi,bj) * _dyU(I+1,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
399 |
SEAICE_EVP |
& - seaice_sigma12(I ,J,bi,bj) * _dyU(I ,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
108 |
SEAICE_INIT_VARIA |
seaice_sigma12(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_output.F |
135 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('SIGMA12.',suff,seaice_sigma12, |
|
./pkg/seaice/seaice_output.F |
91 |
SEAICE_OUTPUT |
& seaice_sigma12,myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
156 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma12,nj,nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
217 |
SEAICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'siSigm12', seaice_sigma12, |
|
./pkg/seaice/seaice_read_pickup.F |
262 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(seaice_sigma12, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
145 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, seaice_sigma12, |
|
./pkg/autodiff/autodiff_restore.F |
472 |
AUTODIFF_RESTORE |
seaice_sigma12(I,J,bi,bj) = StoreSEAICE(I,J,bi,bj,18) |
|
./pkg/autodiff/autodiff_store.F |
579 |
AUTODIFF_STORE |
StoreSEAICE(I,J,bi,bj,18) = seaice_sigma12(I,J,bi,bj) |