--- MITgcm/optim/optim_writedata.F	2003/11/19 19:07:02	1.5
+++ MITgcm/optim/optim_writedata.F	2004/12/03 01:06:33	1.6
@@ -181,10 +181,6 @@
       do icvar = 1,maxcvars
          if ( ncvarindex(icvar) .ne. -1 ) then
             do icvrec = 1,ncvarrecs(icvar)
-cph(
-               print *,'in owd: icvar, icvrec, ncvarrecs, ncvarindex',
-     &              icvar, icvrec, ncvarrecs(icvar), ncvarindex(icvar)
-cph)
                do bj = 1,nsy
                   do bi = 1,nsx
                      write( funit ) ncvarindex(icvar)