if (usingCartesianGrid) then
& ( usingCartesianGrid .OR. usingCylindricalGrid ) ) THEN
IF ( usingCartesianGrid ) THEN
& usingCartesianGrid, usingSphericalPolarGrid, rotateGrid,
LOGICAL usingCartesianGrid
IF ( usingCartesianGrid .OR.
CALL WRITE_0D_L( usingCartesianGrid, INDEX_NONE,
IF ( usingCartesianGrid ) goptCount = goptCount+1
usingCartesianGrid = .TRUE.
ELSEIF ( usingCartesianGrid ) THEN
IF ( usingCartesianGrid.OR.usingCylindricalGrid ) THEN
& .AND. usingCartesianGrid ) cg2dUseMinResSol = 1
& usingCartesianGrid, usingCylindricalGrid,
IF ( usingCartesianGrid .OR. usingSphericalPolarGrid ) THEN
usingCartesianGrid = .FALSE.
IF ( usingCartesianGrid .OR. usingCylindricalGrid )