File |
Line number |
Procedure |
Code |
./pkg/gmredi/GMREDI.h |
38 |
NO PROCEDURE |
LOGICAL GM_useK3D |
./pkg/gmredi/GMREDI.h |
50 |
NO PROCEDURE |
& GM_useK3D, GM_K3D_smooth, GM_K3D_use_constK, |
./pkg/gmredi/gmredi_calc_tensor.F |
277 |
GMREDI_CALC_TENSOR |
IF (GM_useK3D) THEN |
./pkg/gmredi/gmredi_calc_tensor.F |
606 |
GMREDI_CALC_TENSOR |
IF (.NOT. GM_useK3D) THEN |
./pkg/gmredi/gmredi_check.F |
165 |
GMREDI_CHECK |
IF ( GM_useK3D) THEN |
./pkg/gmredi/gmredi_check.F |
166 |
GMREDI_CHECK |
CALL WRITE_0D_L( GM_useK3D, INDEX_NONE, |
./pkg/gmredi/gmredi_check.F |
196 |
GMREDI_CHECK |
IF ( GM_useK3D .AND. .NOT. GM_AdvForm) THEN |
./pkg/gmredi/gmredi_check.F |
261 |
GMREDI_CHECK |
IF (.NOT. GM_useK3D) THEN |
./pkg/gmredi/gmredi_diagnostics_fill.F |
104 |
GMREDI_DIAGNOSTICS_FILL |
IF (GM_useK3D) THEN |
./pkg/gmredi/gmredi_init_varia.F |
113 |
GMREDI_INIT_VARIA |
IF (GM_useK3D) CALL GMREDI_READ_PICKUP( niter0, myThid ) |
./pkg/gmredi/gmredi_readparms.F |
143 |
GMREDI_READPARMS |
GM_useK3D = .FALSE. |
./pkg/gmredi/gmredi_readparms.F |
69 |
GMREDI_READPARMS |
& GM_K3D_gamma, GM_useK3D, GM_K3D_vecFreq, |
./pkg/gmredi/gmredi_write_pickup.F |
66 |
GMREDI_WRITE_PICKUP |
IF (.NOT. GM_useK3D) RETURN |
./model/src/calc_oce_mxlayer.F |
70 |
CALC_OCE_MXLAYER |
& .OR. GM_useK3D |