[cig-commits] [commit] devel, master: do not print the total number of time steps NSTEP in the mesher for information anymore because it may slightly change in the solver depending on the t0 of the source and also on whether UNDO_ATTENUATION is used or not (9870921)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Thu Nov 6 08:28:13 PST 2014


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

On branches: devel,master
Link       : https://github.com/geodynamics/specfem3d_globe/compare/bc58e579b3b0838a0968725a076f5904845437ca...be63f20cbb6f462104e949894dbe205d2398cd7f

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

commit 98709217c9a86cb9779e28b89f0b65fa59c57624
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Fri Aug 1 22:40:45 2014 +0200

    do not print the total number of time steps NSTEP in the mesher for information anymore because it may slightly change in the solver depending on the t0 of the source and also on whether UNDO_ATTENUATION is used or not


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

98709217c9a86cb9779e28b89f0b65fa59c57624
 src/meshfem3D/finalize_mesher.f90 | 3 ---
 src/shared/save_header_file.F90   | 6 ------
 2 files changed, 9 deletions(-)

diff --git a/src/meshfem3D/finalize_mesher.f90 b/src/meshfem3D/finalize_mesher.f90
index 924f568..4472fb1 100644
--- a/src/meshfem3D/finalize_mesher.f90
+++ b/src/meshfem3D/finalize_mesher.f90
@@ -339,10 +339,7 @@
     write(IMAIN,*)
 
     write(IMAIN,*)
-    write(IMAIN,*) 'the total number of time steps will be NSTEP = ',NSTEP
     write(IMAIN,*) 'the time step of the solver will be DT = ',sngl(DT)
-    write(IMAIN,*) 'the total duration will thus be ',sngl(DT*(NSTEP-1)),' seconds'
-    write(IMAIN,*) '                    i.e. ',sngl(DT*(NSTEP-1)/60.d0),' minutes'
     write(IMAIN,*)
 
     ! write information about precision used for floating-point operations
diff --git a/src/shared/save_header_file.F90 b/src/shared/save_header_file.F90
index 06356d3..b298608 100644
--- a/src/shared/save_header_file.F90
+++ b/src/shared/save_header_file.F90
@@ -161,10 +161,7 @@
   print *,'total elements per slice = ',sum(NSPEC)
   print *,'total points per slice = ',sum(nglob)
   print *
-  print *,'the total number of time steps will be NSTEP = ',NSTEP
   print *,'the time step of the solver will be DT = ',sngl(DT)
-  print *,'the total duration will thus be ',sngl(DT*(NSTEP-1)),' seconds'
-  print *,'                    i.e. ',sngl(DT*(NSTEP-1)/60.d0),' minutes'
   print *
   if(MOVIE_SURFACE .or. MOVIE_VOLUME) then
     print *,'MOVIE_VOLUME :',MOVIE_VOLUME
@@ -339,10 +336,7 @@
   write(IOUT,*) '! total elements per slice = ',sum(NSPEC)
   write(IOUT,*) '! total points per slice = ',sum(NGLOB)
   write(IOUT,*) '!'
-  write(IOUT,*) '! the total number of time steps will be NSTEP = ',NSTEP
   write(IOUT,*) '! the time step of the solver will be DT = ',sngl(DT)
-  write(IOUT,*) '! the total duration will thus be ',sngl(DT*(NSTEP-1)),' seconds'
-  write(IOUT,*) '!        i.e. ',sngl(DT*(NSTEP-1)/60.d0),' minutes'
   write(IOUT,*) '!'
 
   write(IOUT,'(1x,a,i1,a)') '! total for full ',NCHUNKS,'-chunk mesh:'



More information about the CIG-COMMITS mailing list