[cig-commits] [commit] master: adding time_scheme to netcdf file (7718f39)

[cig_noreply at geodynamics.org]

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

On branch  : master
Link       : https://github.com/geodynamics/axisem/compare/5c46c43fff66f9350665d71c46395c8cc2550df8...7718f39ed544fb7670cf60f350d80b9b089a422f

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

commit 7718f39ed544fb7670cf60f350d80b9b089a422f
Author: martinvandriel <martin at vandriel.de>
Date:   Thu Sep 4 15:29:15 2014 +0200

    adding time_scheme to netcdf file


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

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

diff --git a/SOLVER/parameters.F90 b/SOLVER/parameters.F90
index 2306904..4921d10 100644
--- a/SOLVER/parameters.F90
+++ b/SOLVER/parameters.F90
@@ -1429,6 +1429,7 @@ subroutine write_parameters
         call nc_write_att_char( trim(cflags),          'CFLAGS')
         call nc_write_att_char( trim(ldflags),         'LDFLAGS')
         call nc_write_att_char( trim(openmp),          'OpenMP')
+        call nc_write_att_char( trim(time_scheme),     'time scheme')
         call nc_write_att_real( real(deltat),          'time step in sec')
         call nc_write_att_int(  niter,                 'number of time steps')
         call nc_write_att_int(  npol,                  'npol')