IF ( usingCurvilinearGrid .OR. rotateGrid ) THEN
& (usingCurvilinearGrid .OR. rotateGrid .OR. uvInterp) ) THEN
& usingCartesianGrid, usingSphericalPolarGrid, rotateGrid,
LOGICAL usingSphericalPolarGrid, rotateGrid
& usingSphericalPolarGrid .AND. .NOT.rotateGrid
ELSEIF ( usingCurvilinearGrid .OR. rotateGrid ) THEN
IF ( rotateGrid ) THEN
CALL WRITE_0D_L( rotateGrid, INDEX_NONE,
& (.NOT.usingSphericalPolarGrid .OR. rotateGrid) ) THEN
IF ( (.NOT.usingSphericalPolarGrid .OR. rotateGrid) ) THEN
& .OR. psiEuler .NE. 0. _d 0 ) rotateGrid = .TRUE.
rotateGrid = .FALSE.
IF ( useMNC .AND. (usingCurvilinearGrid .OR. rotateGrid) ) THEN