[cig-commits] r21670 - seismo/3D/SPECFEM3D/trunk/src/shared

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2013-03-28 09:33:34 -0700 (Thu, 28 Mar 2013)
New Revision: 21670

Modified:
   seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in
Log:
started to commit a few things about total energy calculation (useful for instance to monitor the behavior of CPML absorbing layers)


Modified: seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in	2013-03-28 00:19:35 UTC (rev 21669)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in	2013-03-28 16:33:34 UTC (rev 21670)
@@ -109,6 +109,17 @@
 
 !!-----------------------------------------------------------
 !!
+!! total energy calculation
+!!
+!!-----------------------------------------------------------
+
+! to plot total energy curves, for instance to monitor how CPML absorbing layers behave;
+! should be turned OFF in most cases
+  logical, parameter :: output_energy = .false. ! .true.
+  integer, parameter :: IOUT_ENERGY = 937  ! file number for the energy file
+
+!!-----------------------------------------------------------
+!!
 !! source/receiver setup
 !!
 !!-----------------------------------------------------------