--- MITgcm/model/src/write_grid.F	2006/08/04 01:27:31	1.21
+++ MITgcm/model/src/write_grid.F	2008/02/08 13:01:25	1.22
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/write_grid.F,v 1.21 2006/08/04 01:27:31 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/write_grid.F,v 1.22 2008/02/08 13:01:25 mlosch Exp $
 C $Name:  $
       
 #include "PACKAGES_CONFIG.h"
@@ -85,7 +85,7 @@
         CALL WRITE_FLD_XY_RS( 'DYG',' ',dyG,-1,myThid)
         CALL WRITE_FLD_XY_RS( 'DXC',' ',dxC,-1,myThid)
         CALL WRITE_FLD_XY_RS( 'DYC',' ',dyC,-1,myThid)
-        IF ( usingCurvilinearGrid ) THEN
+        IF ( usingCurvilinearGrid .OR. rotateGrid ) THEN
           CALL WRITE_FLD_XY_RS( 'AngleCS',' ',angleCosC,-1,myThid)
           CALL WRITE_FLD_XY_RS( 'AngleSN',' ',angleSinC,-1,myThid)
         ENDIF
@@ -149,7 +149,7 @@
         CALL MNC_CW_RL_W('D',bfname,0,0,'rAw',rAw,myThid)
         CALL MNC_CW_RL_W('D',bfname,0,0,'rAs',rAs,myThid)
         CALL MNC_CW_RL_W('D',bfname,0,0,'rAz',rAz,myThid)
-        IF ( usingCurvilinearGrid ) THEN
+        IF ( usingCurvilinearGrid .OR. rotateGrid ) THEN
           CALL MNC_CW_RL_W('D',bfname,0,0,'AngleCS',angleCosC,myThid)
           CALL MNC_CW_RL_W('D',bfname,0,0,'AngleSN',angleSinC,myThid)
         ENDIF