& selectAddFluid, selectImplicitDrag,
INTEGER selectImplicitDrag
IF ( selectImplicitDrag.GE.1 ) THEN
IF ( selectImplicitDrag.EQ.2 ) THEN
IF ( selectImplicitDrag.EQ.0 .AND.
IF ( selectImplicitDrag.GT.0 ) THEN
IF ( selectImplicitDrag.EQ.2 .AND. use3Dsolver ) THEN
IF ( useCDscheme .AND. selectImplicitDrag.GT.0 ) THEN
IF ( selectImplicitDrag.LT.0 .OR. selectImplicitDrag.GT.2 ) THEN
& 'Invalid option: selectImplicitDrag=', selectImplicitDrag
IF ( selectImplicitDrag.EQ.1 ) THEN
buffI(1) = selectImplicitDrag
& .OR. selectImplicitDrag.GE.1 ) THEN
& ( nonlinFreeSurf.GT.2 .OR. selectImplicitDrag.EQ.2 ) ) THEN
& implicitDiffusion, implicitViscosity, selectImplicitDrag,
selectImplicitDrag = 0