| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
191 |
NO PROCEDURE |
& seaice_sigma1, seaice_sigma2, seaice_sigma12 |
|
./pkg/seaice/SEAICE.h |
193 |
NO PROCEDURE |
_RL seaice_sigma2 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_diagnostics_state.F |
170 |
SEAICE_DIAGNOSTICS_STATE |
sigm = seaice_sigma2(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
354 |
SEAICE_EVP |
sig22Pm1(I,J,bi,bj) = seaice_sigma2(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
603 |
SEAICE_EVP |
seaice_sigma2 (I,J,bi,bj) = ( seaice_sigma2 (I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
615 |
SEAICE_EVP |
seaice_sigma2(I,J,bi,bj) = SIGN(MAX( |
|
./pkg/seaice/seaice_evp.F |
616 |
SEAICE_EVP |
& ABS( seaice_sigma2(I,J,bi,bj) ), SEAICE_EPS ), |
|
./pkg/seaice/seaice_evp.F |
617 |
SEAICE_EVP |
& seaice_sigma2(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
621 |
SEAICE_EVP |
& ( seaice_sigma1(I,J,bi,bj)+seaice_sigma2(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
623 |
SEAICE_EVP |
& ( seaice_sigma1(I,J,bi,bj)-seaice_sigma2(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
689 |
SEAICE_EVP |
& seaice_sigma2(i,j,bi,bj)-sig22pm1(i,j,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
289 |
SEAICE_INIT_VARIA |
seaice_sigma2 (i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_output.F |
171 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('SIGMA2.',suff,seaice_sigma2, |
|
./pkg/seaice/seaice_output.F |
97 |
SEAICE_OUTPUT |
& seaice_sigma2,myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
174 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma2,nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
273 |
SEAICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'siSigm2 ', seaice_sigma2, |
|
./pkg/seaice/seaice_read_pickup.F |
329 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(seaice_sigma2 , myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
183 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, seaice_sigma2, |
|
./pkg/autodiff/autodiff_restore.F |
487 |
AUTODIFF_RESTORE |
seaice_sigma2(I,J,bi,bj) = StoreSEAICE(I,J,bi,bj,17) |
|
./pkg/autodiff/autodiff_store.F |
600 |
AUTODIFF_STORE |
StoreSEAICE(I,J,bi,bj,17) = seaice_sigma2(I,J,bi,bj) |