[cig-commits] r19280 - seismo/1D/SPECFEM1D/trunk
dkomati1 at geodynamics.org
dkomati1 at geodynamics.org
Wed Dec 7 05:16:08 PST 2011
Author: dkomati1
Date: 2011-12-07 05:16:08 -0800 (Wed, 07 Dec 2011)
New Revision: 19280
Modified:
seismo/1D/SPECFEM1D/trunk/wave.f90
Log:
updated another comment
Modified: seismo/1D/SPECFEM1D/trunk/wave.f90
===================================================================
--- seismo/1D/SPECFEM1D/trunk/wave.f90 2011-12-07 13:14:49 UTC (rev 19279)
+++ seismo/1D/SPECFEM1D/trunk/wave.f90 2011-12-07 13:16:08 UTC (rev 19280)
@@ -251,7 +251,7 @@
accel(NGLOB) = 0.
endif
-! divide by the mass matrix
+! divide by the mass matrix, which is strictly (i.e. perfectly) diagonal
accel(:) = accel(:)/mass_global(:)
! `corrector' update velocity
More information about the CIG-COMMITS
mailing list