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