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

elliott.sales.de.andrade at geodynamics.org elliott.sales.de.andrade at geodynamics.org
Fri Jun 28 14:05:25 PDT 2013


Author: elliott.sales.de.andrade
Date: 2013-06-28 14:05:25 -0700 (Fri, 28 Jun 2013)
New Revision: 22445

Modified:
   seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90
Log:
Fix some undefined variables.

Modified: seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90	2013-06-28 17:59:36 UTC (rev 22444)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90	2013-06-28 21:05:25 UTC (rev 22445)
@@ -95,8 +95,8 @@
           APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,USE_FORCE_POINT_SOURCE
   logical STACEY_ABSORBING_CONDITIONS,SAVE_FORWARD,STACEY_INSTEAD_OF_FREE_SURFACE
   logical ANISOTROPY,SAVE_MESH_FILES,USE_RICKER_TIME_FUNCTION,PRINT_SOURCE_TIME_FUNCTION
-  logical PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE
-  character(len=256) OUTPUT_FILES,LOCAL_PATH,TOMOGRAPHY_PATH
+  logical PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE,FULL_ATTENUATION_SOLID
+  character(len=256) OUTPUT_FILES,LOCAL_PATH,TOMOGRAPHY_PATH,TRAC_PATH
   integer NPROC
   integer ier
   integer MOVIE_TYPE,IMODEL



More information about the CIG-COMMITS mailing list