File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
837 |
NO PROCEDURE |
& sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2, |
./model/inc/PARAMS.h |
976 |
NO PROCEDURE |
_RL bottomDragQuadratic |
./pkg/mom_common/mom_u_botdrag_impl.F |
156 |
MOM_U_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(KE(i,j)+KE(i-1,j))*dragFac |
./pkg/mom_common/mom_u_botdrag_impl.F |
174 |
MOM_U_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(uSq)*dragFac |
./pkg/mom_common/mom_u_botdrag_impl.F |
198 |
MOM_U_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(uSq)*dragFac |
./pkg/mom_common/mom_u_bottomdrag.F |
142 |
MOM_U_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(KE(i,j)+KE(i-1,j))*dragFac |
./pkg/mom_common/mom_u_bottomdrag.F |
160 |
MOM_U_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(uSq)*dragFac |
./pkg/mom_common/mom_u_bottomdrag.F |
184 |
MOM_U_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(uSq)*dragFac |
./pkg/mom_common/mom_v_botdrag_impl.F |
156 |
MOM_V_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(KE(i,j)+KE(i,j-1))*dragFac |
./pkg/mom_common/mom_v_botdrag_impl.F |
174 |
MOM_V_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(vSq)*dragFac |
./pkg/mom_common/mom_v_botdrag_impl.F |
198 |
MOM_V_BOTDRAG_IMPL |
& *bottomDragQuadratic*SQRT(vSq)*dragFac |
./pkg/mom_common/mom_v_bottomdrag.F |
142 |
MOM_V_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(KE(i,j)+KE(i,j-1))*dragFac |
./pkg/mom_common/mom_v_bottomdrag.F |
160 |
MOM_V_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(vSq)*dragFac |
./pkg/mom_common/mom_v_bottomdrag.F |
184 |
MOM_V_BOTTOMDRAG |
& *bottomDragQuadratic*SQRT(vSq)*dragFac |
./model/src/config_summary.F |
201 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( bottomDragQuadratic, INDEX_NONE, |
./pkg/shelfice/shelfice_readparms.F |
175 |
SHELFICE_READPARMS |
SHELFICEDragQuadratic = bottomDragQuadratic |
./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/set_defaults.F |
138 |
SET_DEFAULTS |
bottomDragQuadratic = 0. |
./model/src/set_parms.F |
124 |
SET_PARMS |
IF ( bottomDragQuadratic.EQ.0. .OR. .NOT.momViscosity ) |