& deepAtmosphere, setInterFDr, setCenterDr, useMin4hFacEdges,
LOGICAL setCenterDr
setCenterDr = .FALSE.
IF ( setCenterDr ) THEN
IF ( k.EQ.1 ) setCenterDr = .TRUE.
IF ( .NOT.setCenterDr ) THEN
IF ( setCenterDr ) rCoordInputData = .TRUE.
setCenterDr = .TRUE.
IF (setCenterDr) THEN
IF ( usingPCoords .AND. setCenterDr ) THEN
IF ( usingZCoords .AND. setCenterDr ) THEN
& ' ; setCenterDr=', setCenterDr
IF ( .NOT.(setInterFDr.OR.setCenterDr) ) THEN