LOGICAL useShelfIce
& useSBO, useSEAICE, useShelfIce, useThSIce, useBulkForce,
IF (useShelfIce) THEN
IF ( useShelfIce ) THEN
IF (useShelfIce) CALL SHELFICE_READPARMS( myThid )
IF ( useShelfIce )
IF (useShelfIce) CALL SHELFICE_CHECK( myThid )
IF (useShelfIce) CALL PACKAGES_CHECK_ERROR('SHELFICE', myThid)
IF (useShelfIce) CALL SHELFICE_INIT_FIXED( myThid )
useShelfIce =.FALSE.
& useShelfIce,
IF ( useShelfIce .AND. fluidIsWater ) THEN
IF (useShelfIce.AND.momViscosity.AND.bottomDragTerms) THEN