| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
230 |
NO PROCEDURE |
& selectAddFluid, selectImplicitDrag, |
|
./model/inc/PARAMS.h |
256 |
NO PROCEDURE |
INTEGER selectImplicitDrag |
|
./pkg/mom_common/mom_u_implicit_r.F |
129 |
MOM_U_IMPLICIT_R |
IF ( selectImplicitDrag.GE.1 ) THEN |
|
./pkg/mom_common/mom_u_implicit_r.F |
254 |
MOM_U_IMPLICIT_R |
IF ( selectImplicitDrag.EQ.2 ) THEN |
|
./pkg/mom_common/mom_v_implicit_r.F |
129 |
MOM_V_IMPLICIT_R |
IF ( selectImplicitDrag.GE.1 ) THEN |
|
./pkg/mom_common/mom_v_implicit_r.F |
254 |
MOM_V_IMPLICIT_R |
IF ( selectImplicitDrag.EQ.2 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
255 |
MOM_FLUXFORM |
IF ( selectImplicitDrag.EQ.0 .AND. |
|
./pkg/mom_vecinv/mom_vecinv.F |
232 |
MOM_VECINV |
IF ( selectImplicitDrag.EQ.0 .AND. |
|
./model/src/config_check.F |
177 |
CONFIG_CHECK |
IF ( selectImplicitDrag.GT.0 ) THEN |
|
./model/src/config_check.F |
189 |
CONFIG_CHECK |
IF ( selectImplicitDrag.EQ.2 ) THEN |
|
./model/src/config_check.F |
210 |
CONFIG_CHECK |
IF ( selectImplicitDrag.GT.0 ) THEN |
|
./model/src/config_check.F |
797 |
CONFIG_CHECK |
IF ( selectImplicitDrag.EQ.2 .AND. use3Dsolver ) THEN |
|
./model/src/config_check.F |
911 |
CONFIG_CHECK |
IF ( useCDscheme .AND. selectImplicitDrag.GT.0 ) THEN |
|
./model/src/config_check.F |
943 |
CONFIG_CHECK |
IF ( selectImplicitDrag.LT.0 .OR. selectImplicitDrag.GT.2 ) THEN |
|
./model/src/config_check.F |
945 |
CONFIG_CHECK |
& 'Invalid option: selectImplicitDrag=', selectImplicitDrag |
|
./model/src/config_check.F |
949 |
CONFIG_CHECK |
IF ( selectImplicitDrag.EQ.1 ) THEN |
|
./model/src/config_summary.F |
439 |
CONFIG_SUMMARY |
buffI(1) = selectImplicitDrag |
|
./model/src/correction_step.F |
67 |
CORRECTION_STEP |
IF ( selectImplicitDrag.EQ.2 ) THEN |
|
./model/src/dynamics.F |
582 |
DYNAMICS |
& .OR. selectImplicitDrag.GE.1 ) THEN |
|
./model/src/forward_step.F |
895 |
FORWARD_STEP |
& ( nonlinFreeSurf.GT.2 .OR. selectImplicitDrag.EQ.2 ) ) THEN |
|
./model/src/ini_parms.F |
216 |
INI_PARMS |
& implicitDiffusion, implicitViscosity, selectImplicitDrag, |
|
./model/src/set_defaults.F |
208 |
SET_DEFAULTS |
selectImplicitDrag = 0 |
|
./model/src/update_cg2d.F |
82 |
UPDATE_CG2D |
IF ( selectImplicitDrag.EQ.2 ) THEN |