| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
235 |
NO PROCEDURE |
& selectBotDragQuadr, pCellMix_select, |
|
./model/inc/PARAMS.h |
262 |
NO PROCEDURE |
INTEGER selectBotDragQuadr |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
139 |
MOM_U_BOTDRAG_IMPL |
IF ( selectBotDragQuadr.EQ.0 ) THEN |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
161 |
MOM_U_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.EQ.1 ) THEN |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
179 |
MOM_U_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.EQ.2 ) THEN |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
203 |
MOM_U_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.NE.-1 ) THEN |
|
./pkg/mom_common/mom_u_bottomdrag.F |
135 |
MOM_U_BOTTOMDRAG |
IF ( selectBotDragQuadr.EQ.0 ) THEN |
|
./pkg/mom_common/mom_u_bottomdrag.F |
147 |
MOM_U_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.EQ.1 ) THEN |
|
./pkg/mom_common/mom_u_bottomdrag.F |
165 |
MOM_U_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.EQ.2 ) THEN |
|
./pkg/mom_common/mom_u_bottomdrag.F |
189 |
MOM_U_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.NE.-1 ) THEN |
|
./pkg/mom_common/mom_u_implicit_r.F |
130 |
MOM_U_IMPLICIT_R |
IF ( no_slip_bottom .OR. selectBotDragQuadr.GE.0 |
|
./pkg/mom_common/mom_v_botdrag_impl.F |
139 |
MOM_V_BOTDRAG_IMPL |
IF ( selectBotDragQuadr.EQ.0 ) THEN |
|
./pkg/mom_common/mom_v_botdrag_impl.F |
161 |
MOM_V_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.EQ.1 ) THEN |
|
./pkg/mom_common/mom_v_botdrag_impl.F |
179 |
MOM_V_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.EQ.2 ) THEN |
|
./pkg/mom_common/mom_v_botdrag_impl.F |
203 |
MOM_V_BOTDRAG_IMPL |
ELSEIF ( selectBotDragQuadr.NE.-1 ) THEN |
|
./pkg/mom_common/mom_v_bottomdrag.F |
135 |
MOM_V_BOTTOMDRAG |
IF ( selectBotDragQuadr.EQ.0 ) THEN |
|
./pkg/mom_common/mom_v_bottomdrag.F |
147 |
MOM_V_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.EQ.1 ) THEN |
|
./pkg/mom_common/mom_v_bottomdrag.F |
165 |
MOM_V_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.EQ.2 ) THEN |
|
./pkg/mom_common/mom_v_bottomdrag.F |
189 |
MOM_V_BOTTOMDRAG |
ELSEIF ( selectBotDragQuadr.NE.-1 ) THEN |
|
./pkg/mom_common/mom_v_implicit_r.F |
130 |
MOM_V_IMPLICIT_R |
IF ( no_slip_bottom .OR. selectBotDragQuadr.GE.0 |
|
./pkg/mom_fluxform/mom_fluxform.F |
257 |
MOM_FLUXFORM |
& .OR. selectBotDragQuadr.GE.0 |
|
./pkg/mom_vecinv/mom_vecinv.F |
234 |
MOM_VECINV |
& .OR. selectBotDragQuadr.GE.0 |
|
./model/src/config_check.F |
854 |
CONFIG_CHECK |
IF ( selectBotDragQuadr.LT.-1 .OR. selectBotDragQuadr.GT.2 ) THEN |
|
./model/src/config_check.F |
856 |
CONFIG_CHECK |
& 'selectBotDragQuadr=', selectBotDragQuadr, |
|
./model/src/config_summary.F |
204 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( selectBotDragQuadr, INDEX_NONE, |
|
./pkg/shelfice/shelfice_readparms.F |
181 |
SHELFICE_READPARMS |
SHELFICEselectDragQuadr = MAX( 0, selectBotDragQuadr ) |
|
./model/src/ini_parms.F |
201 |
INI_PARMS |
& bottomDragLinear, bottomDragQuadratic, selectBotDragQuadr, |
|
./model/src/ini_parms.F |
515 |
INI_PARMS |
IF ( selectBotDragQuadr.EQ.-1 .AND. bottomDragQuadratic.NE.0. ) |
|
./model/src/ini_parms.F |
516 |
INI_PARMS |
& selectBotDragQuadr = 0 |
|
./model/src/set_defaults.F |
139 |
SET_DEFAULTS |
selectBotDragQuadr = -1 |
|
./model/src/set_parms.F |
125 |
SET_PARMS |
& selectBotDragQuadr = -1 |