[Dart-dev] [5942] DART/branches/development/models/mpas_ocn/model_mod.f90: for at least some versions of netCDF, the lines that

[nancy at ucar.edu]

Revision: 5942
Author:   nancy
Date:     2012-12-12 16:48:12 -0700 (Wed, 12 Dec 2012)
Log Message:
-----------
for at least some versions of netCDF, the lines that
add an attribute to an existing variable will corrupt
the data in the netCDF file.  i'm commenting these lines
out until tim is back and can see what's going on.

Modified Paths:
--------------
    DART/branches/development/models/mpas_ocn/model_mod.f90

-------------- next part --------------
Modified: DART/branches/development/models/mpas_ocn/model_mod.f90
===================================================================
--- DART/branches/development/models/mpas_ocn/model_mod.f90	2012-12-05 23:43:50 UTC (rev 5941)
+++ DART/branches/development/models/mpas_ocn/model_mod.f90	2012-12-12 23:48:12 UTC (rev 5942)
@@ -2430,10 +2430,10 @@
    endif
 
    ! Make note that the variable has been updated by DART
-   call nc_check(nf90_Redef(ncFileID),'statevector_to_analysis_file', 'redef '//trim(filename))
-   call nc_check(nf90_put_att(ncFileID, VarID,'DART','variable modified by DART'),&
-                 'statevector_to_analysis_file', 'modified '//trim(varname))
-   call nc_check(nf90_enddef(ncfileID),'statevector_to_analysis_file','state enddef '//trim(filename))
+   !call nc_check(nf90_Redef(ncFileID),'statevector_to_analysis_file', 'redef '//trim(filename))
+   !call nc_check(nf90_put_att(ncFileID, VarID,'DART','variable modified by DART'),&
+   !              'statevector_to_analysis_file', 'modified '//trim(varname))
+   !call nc_check(nf90_enddef(ncfileID),'statevector_to_analysis_file','state enddef '//trim(filename))
 
 enddo PROGVARLOOP