[cig-commits] [commit] master: starting a versioning of the netcdf files (d6b3e37)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/axisem

On branch  : master
Link       : https://github.com/geodynamics/axisem/compare/c9460bda8e22ada0d893b211fc865b17d8fb41fc...d6b3e375712782b2f2567b4d20e2c6d41b774eae

>---------------------------------------------------------------

commit d6b3e375712782b2f2567b4d20e2c6d41b774eae
Author: martinvandriel <martin at vandriel.de>
Date:   Wed Sep 10 15:33:19 2014 +0200

    starting a versioning of the netcdf files


>---------------------------------------------------------------

d6b3e375712782b2f2567b4d20e2c6d41b774eae
 SOLVER/parameters.F90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/SOLVER/parameters.F90 b/SOLVER/parameters.F90
index 28ae4b9..eb7c856 100644
--- a/SOLVER/parameters.F90
+++ b/SOLVER/parameters.F90
@@ -1419,6 +1419,7 @@ subroutine write_parameters
     if ((mynum.eq.0).and.(use_netcdf)) then !Only proc0 has the netcdf file open at that point
         ! write generic simulation info file
         write(6,*) ' Writing simulation info to netcdf file attributes' 
+        call nc_write_att_int(  1,                     'file version')
         call nc_write_att_char( trim(bkgrdmodel),      'background model')
         call nc_write_att_dble( router / 1000,         'planet radius')
         call nc_write_att_char( trim(svn_version),     'SVN revision')