[cig-commits] r21809 - in seismo/3D/SPECFEM3D/trunk: DATA examples/BENCHMARK_CLAERBOUT_ADJOINT/ACOUSTIC/DATA examples/BENCHMARK_CLAERBOUT_ADJOINT/ELASTIC/DATA examples/Mount_StHelens/DATA examples/homogeneous_halfspace_HEX27_elastic_no_absorbing/DATA examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_5sides/DATA examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_6sides/DATA examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_5sides/DATA examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_6sides/DATA examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_5sides/DATA examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_6sides/DATA examples/homogeneous_halfspace_HEX8_elastic_absorbing_Stacey_5sides/DATA examples/homogeneous_halfspace_HEX8_elastic_no_absorbing/DATA examples/homogeneous_poroelastic/DATA examples/layered_halfspace/DATA examples/meshfem3D_examples/many_interfaces/DATA examples/meshfem3D_examples/simple_model/DATA examples/meshfem3D_examples/socal1D/DATA examples/meshfem3D_examples/socal1D/example_utm examples/noise_tomography/DATA examples/splay_faults/DATA examples/tomographic_model/DATA examples/tpv102/DATA examples/tpv103/DATA examples/tpv15/DATA examples/tpv16/DATA examples/tpv5/DATA examples/waterlayered_halfspace/DATA src/decompose_mesh src/generate_databases src/meshfem3D src/shared src/specfem3D
dkomati1 at geodynamics.org
dkomati1 at geodynamics.org
Wed Apr 10 19:58:21 PDT 2013
Author: dkomati1
Date: 2013-04-10 19:58:21 -0700 (Wed, 10 Apr 2013)
New Revision: 21809
Modified:
seismo/3D/SPECFEM3D/trunk/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ACOUSTIC/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ELASTIC/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/Mount_StHelens/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX27_elastic_no_absorbing/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_5sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_6sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_5sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_6sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_5sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_6sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_Stacey_5sides/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_no_absorbing/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/homogeneous_poroelastic/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/layered_halfspace/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/many_interfaces/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/simple_model/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/example_utm/Par_file_utm
seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step1
seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step2
seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step3
seismo/3D/SPECFEM3D/trunk/examples/splay_faults/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tomographic_model/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tpv102/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tpv103/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tpv15/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tpv16/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/tpv5/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/examples/waterlayered_halfspace/DATA/Par_file
seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/decompose_mesh.F90
seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/program_decompose_mesh.f90
seismo/3D/SPECFEM3D/trunk/src/generate_databases/generate_databases.f90
seismo/3D/SPECFEM3D/trunk/src/meshfem3D/check_mesh_quality.f90
seismo/3D/SPECFEM3D/trunk/src/meshfem3D/meshfem3D.f90
seismo/3D/SPECFEM3D/trunk/src/shared/combine_vol_data.f90
seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in
seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90
seismo/3D/SPECFEM3D/trunk/src/shared/read_parameter_file.f90
seismo/3D/SPECFEM3D/trunk/src/shared/smooth_vol_data.f90
seismo/3D/SPECFEM3D/trunk/src/shared/sum_kernels.f90
seismo/3D/SPECFEM3D/trunk/src/specfem3D/initialize_simulation.f90
seismo/3D/SPECFEM3D/trunk/src/specfem3D/model_update.f90
seismo/3D/SPECFEM3D/trunk/src/specfem3D/specfem3D_par.f90
Log:
started to move FULL_ATTENUATION_SOLID to the Par_file
Modified: seismo/3D/SPECFEM3D/trunk/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ACOUSTIC/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ACOUSTIC/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ACOUSTIC/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ELASTIC/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ELASTIC/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/BENCHMARK_CLAERBOUT_ADJOINT/ELASTIC/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/Mount_StHelens/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/Mount_StHelens/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/Mount_StHelens/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX27_elastic_no_absorbing/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX27_elastic_no_absorbing/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX27_elastic_no_absorbing/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_5sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_6sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_5sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_6sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_acoustic_elastic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_5sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_5sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_6sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_CPML_6sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_Stacey_5sides/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_Stacey_5sides/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_absorbing_Stacey_5sides/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_no_absorbing/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_no_absorbing/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_halfspace_HEX8_elastic_no_absorbing/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/homogeneous_poroelastic/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/homogeneous_poroelastic/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/homogeneous_poroelastic/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/layered_halfspace/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/layered_halfspace/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/layered_halfspace/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/many_interfaces/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/many_interfaces/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/many_interfaces/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/simple_model/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/simple_model/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/simple_model/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/example_utm/Par_file_utm
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/example_utm/Par_file_utm 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/meshfem3D_examples/socal1D/example_utm/Par_file_utm 2013-04-11 02:58:21 UTC (rev 21809)
@@ -31,6 +31,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
USE_OLSEN_ATTENUATION = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step1
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step1 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step1 2013-04-11 02:58:21 UTC (rev 21809)
@@ -32,6 +32,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
USE_OLSEN_ATTENUATION = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step2
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step2 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step2 2013-04-11 02:58:21 UTC (rev 21809)
@@ -32,6 +32,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
USE_OLSEN_ATTENUATION = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step3
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step3 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/noise_tomography/DATA/Par_file_step3 2013-04-11 02:58:21 UTC (rev 21809)
@@ -32,6 +32,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
USE_OLSEN_ATTENUATION = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/splay_faults/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/splay_faults/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/splay_faults/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tomographic_model/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tomographic_model/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tomographic_model/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tpv102/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tpv102/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tpv102/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tpv103/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tpv103/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tpv103/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tpv15/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tpv15/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tpv15/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tpv16/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tpv16/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tpv16/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/tpv5/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/tpv5/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/tpv5/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/examples/waterlayered_halfspace/DATA/Par_file
===================================================================
--- seismo/3D/SPECFEM3D/trunk/examples/waterlayered_halfspace/DATA/Par_file 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/examples/waterlayered_halfspace/DATA/Par_file 2013-04-11 02:58:21 UTC (rev 21809)
@@ -38,6 +38,7 @@
APPROXIMATE_OCEAN_LOAD = .false.
TOPOGRAPHY = .false.
ATTENUATION = .false.
+FULL_ATTENUATION_SOLID = .false.
ANISOTROPY = .false.
GRAVITY = .false.
Modified: seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/decompose_mesh.F90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/decompose_mesh.F90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/decompose_mesh.F90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -139,7 +139,6 @@
integer, parameter :: IIN_database = 15
-! for read_parameter_files
double precision :: DT
double precision :: HDUR_MOVIE,OLSEN_ATTENUATION_RATIO,f0_FOR_PML
integer :: NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP, &
@@ -149,7 +148,7 @@
logical :: MOVIE_SURFACE,MOVIE_VOLUME,CREATE_SHAKEMAP,SAVE_DISPLACEMENT, &
USE_HIGHRES_FOR_MOVIES,SUPPRESS_UTM_PROJECTION
logical :: ATTENUATION,USE_OLSEN_ATTENUATION,PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE, &
- APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,USE_FORCE_POINT_SOURCE
+ APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,USE_FORCE_POINT_SOURCE,FULL_ATTENUATION_SOLID
logical :: STACEY_ABSORBING_CONDITIONS,SAVE_FORWARD,STACEY_INSTEAD_OF_FREE_SURFACE
logical :: ANISOTROPY,SAVE_MESH_FILES,USE_RICKER_TIME_FUNCTION,PRINT_SOURCE_TIME_FUNCTION
character(len=256) LOCAL_PATH,TOMOGRAPHY_PATH
Modified: seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/program_decompose_mesh.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/program_decompose_mesh.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/decompose_mesh/program_decompose_mesh.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -70,7 +70,7 @@
outputpath_name = arg(3)
! needs local_path for mesh files
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -81,7 +81,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! reads in (CUBIT) mesh files: mesh_file,nodes_coord_file, ...
call read_mesh_files()
Modified: seismo/3D/SPECFEM3D/trunk/src/generate_databases/generate_databases.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/generate_databases/generate_databases.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/generate_databases/generate_databases.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -254,7 +254,7 @@
implicit none
! reads Par_file
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -265,7 +265,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! check that the code is running with the requested nb of processes
if(sizeprocs /= NPROC) then
Modified: seismo/3D/SPECFEM3D/trunk/src/meshfem3D/check_mesh_quality.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/meshfem3D/check_mesh_quality.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/meshfem3D/check_mesh_quality.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -121,7 +121,7 @@
end if
! read the parameter file
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -132,7 +132,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
if(NGNOD /= 8) stop 'error: check_mesh_quality only supports NGNOD == 8 for now'
Modified: seismo/3D/SPECFEM3D/trunk/src/meshfem3D/meshfem3D.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/meshfem3D/meshfem3D.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/meshfem3D/meshfem3D.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -371,7 +371,7 @@
endif
! read the parameter file
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -382,7 +382,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! read the mesh parameter file
! nullify(subregions,material_properties)
Modified: seismo/3D/SPECFEM3D/trunk/src/shared/combine_vol_data.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/combine_vol_data.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/combine_vol_data.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -87,7 +87,6 @@
logical :: HIGH_RESOLUTION_MESH
integer :: ires
- ! for read_parameter_files
double precision :: DT
double precision :: HDUR_MOVIE,OLSEN_ATTENUATION_RATIO,f0_FOR_PML
integer :: NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP, &
@@ -174,7 +173,7 @@
endif
! needs local_path for mesh files
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -185,7 +184,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
print *, 'Slice list: '
print *, node_list(1:num_node)
Modified: seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/constants.h.in 2013-04-11 02:58:21 UTC (rev 21809)
@@ -336,7 +336,6 @@
integer, parameter :: ATTENUATION_COMP_MAXIMUM = 9000
! add Q_Kappa effect (in addition to Q_mu) to viscoelastic simulation
- logical, parameter :: FULL_ATTENUATION_SOLID = .false.
real(kind=CUSTOM_REAL), parameter :: CONST_Q_KAPPA = 120._CUSTOM_REAL
! reference frequency for target velocity values in velocity model
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-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/create_movie_shakemap_AVS_DX_GMT.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -139,7 +139,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! get the base pathname for output files
call get_value_string(OUTPUT_FILES, 'OUTPUT_FILES', OUTPUT_FILES_PATH(1:len_trim(OUTPUT_FILES_PATH)))
Modified: seismo/3D/SPECFEM3D/trunk/src/shared/read_parameter_file.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/read_parameter_file.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/read_parameter_file.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -24,7 +24,7 @@
!
!=====================================================================
- subroutine read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ subroutine read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -34,7 +34,7 @@
SIMULATION_TYPE,SAVE_FORWARD,NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
implicit none
@@ -51,7 +51,7 @@
logical MOVIE_SURFACE,MOVIE_VOLUME,CREATE_SHAKEMAP,SAVE_DISPLACEMENT,USE_HIGHRES_FOR_MOVIES
logical ANISOTROPY,SAVE_MESH_FILES,PRINT_SOURCE_TIME_FUNCTION,SUPPRESS_UTM_PROJECTION
logical USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE,USE_RICKER_TIME_FUNCTION
- logical PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE
+ logical PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE,FULL_ATTENUATION_SOLID
character(len=256) LOCAL_PATH,TOMOGRAPHY_PATH,CMTSOLUTION,FORCESOLUTION
@@ -116,6 +116,8 @@
if(err_occurred() /= 0) return
call read_value_logical(ATTENUATION, 'model.ATTENUATION')
if(err_occurred() /= 0) return
+ call read_value_logical(FULL_ATTENUATION_SOLID, 'model.FULL_ATTENUATION_SOLID')
+ if(err_occurred() /= 0) return
call read_value_logical(ANISOTROPY, 'model.ANISOTROPY')
if(err_occurred() /= 0) return
call read_value_string(TOMOGRAPHY_PATH, 'TOMOGRAPHY_PATH')
Modified: seismo/3D/SPECFEM3D/trunk/src/shared/smooth_vol_data.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/smooth_vol_data.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/smooth_vol_data.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -95,7 +95,6 @@
character(len=256) :: prname, prname_lp
character(len=256) :: local_data_file
- ! for read_parameter_files
double precision :: DT
double precision :: HDUR_MOVIE,OLSEN_ATTENUATION_RATIO,f0_FOR_PML
integer :: NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP, &
@@ -212,7 +211,7 @@
endif
! needs local_path for mesh files
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -223,7 +222,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! checks if number of MPI process as specified
if (sizeprocs /= NPROC) then
Modified: seismo/3D/SPECFEM3D/trunk/src/shared/sum_kernels.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/shared/sum_kernels.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/shared/sum_kernels.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -101,7 +101,6 @@
integer :: nker, myrank, sizeprocs, ier
integer :: ios
- ! for read_parameter_files
double precision :: DT
double precision :: HDUR_MOVIE,OLSEN_ATTENUATION_RATIO,f0_FOR_PML
integer :: NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP, &
@@ -151,7 +150,7 @@
endif
! needs local_path for mesh files
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -162,7 +161,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
! checks if number of MPI process as specified
if (sizeprocs /= NPROC) then
Modified: seismo/3D/SPECFEM3D/trunk/src/specfem3D/initialize_simulation.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/specfem3D/initialize_simulation.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/specfem3D/initialize_simulation.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -39,7 +39,7 @@
integer :: ier
! read the parameter file
- call read_parameter_file( NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
+ call read_parameter_file(NPROC,NTSTEP_BETWEEN_OUTPUT_SEISMOS,NSTEP,DT,NGNOD,NGNOD2D, &
UTM_PROJECTION_ZONE,SUPPRESS_UTM_PROJECTION,TOMOGRAPHY_PATH, &
ATTENUATION,USE_OLSEN_ATTENUATION,LOCAL_PATH,NSOURCES, &
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,ANISOTROPY,STACEY_ABSORBING_CONDITIONS,MOVIE_TYPE, &
@@ -50,7 +50,7 @@
NTSTEP_BETWEEN_READ_ADJSRC,NOISE_TOMOGRAPHY, &
USE_FORCE_POINT_SOURCE,STACEY_INSTEAD_OF_FREE_SURFACE, &
USE_RICKER_TIME_FUNCTION,OLSEN_ATTENUATION_RATIO,PML_CONDITIONS, &
- PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL)
+ PML_INSTEAD_OF_FREE_SURFACE,f0_FOR_PML,IMODEL,FULL_ATTENUATION_SOLID)
!! DK DK added this for now (March 2013) because CPML is not yet implemented for USE_DEVILLE_PRODUCTS;
!! DK DK we will soon add it (in a month or so)
Modified: seismo/3D/SPECFEM3D/trunk/src/specfem3D/model_update.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/specfem3D/model_update.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/specfem3D/model_update.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -166,37 +166,14 @@
call sync_all()
- ! reads in parameters calling read_parameter_file and checks for some inconsistencies
+ ! reads in parameters and checks for some inconsistencies
call initialize_simulation()
- ! check
-! if( myrank == 0 ) then
-! print*
-! print*,' SAVE_MESH_FILES: ',SAVE_MESH_FILES
-! print*,' ANISOTROPY: ',ANISOTROPY
-! print*,' APPROXIMATE_OCEAN_LOAD: ',APPROXIMATE_OCEAN_LOAD
-! print*,' NGLLX, NGLLY, NGLLZ: ',NGLLX, NGLLY, NGLLZ
-! print*,' ATTENUATION: ',ATTENUATION
-! print*,' USE_OLSEN_ATTENUATION: ',USE_OLSEN_ATTENUATION
-! print*
-! endif
-
call sync_all()
! reads in external mesh
call read_mesh_databases()
- !check
-! if( myrank == 0 ) then
-! print*,'NSPEC_AB ', NSPEC_AB
-! print*,'NGLOB_AB ', NGLOB_AB
-! print*,'ACOUSTIC_SIMULATION ', ACOUSTIC_SIMULATION
-! print*,'ELASTIC_SIMULATION ', ELASTIC_SIMULATION
-! print*,'max_nibool_interfaces_ext_mesh ',max_nibool_interfaces_ext_mesh
-! print*
-! endif
-
-
!===================================================
!===================================================
! MODEL UPDATE
Modified: seismo/3D/SPECFEM3D/trunk/src/specfem3D/specfem3D_par.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/specfem3D/specfem3D_par.f90 2013-04-11 02:39:35 UTC (rev 21808)
+++ seismo/3D/SPECFEM3D/trunk/src/specfem3D/specfem3D_par.f90 2013-04-11 02:58:21 UTC (rev 21809)
@@ -178,7 +178,7 @@
APPROXIMATE_OCEAN_LOAD,TOPOGRAPHY,STACEY_ABSORBING_CONDITIONS,ANISOTROPY, &
STACEY_INSTEAD_OF_FREE_SURFACE
- logical :: PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE
+ logical :: FULL_ATTENUATION_SOLID,PML_CONDITIONS,PML_INSTEAD_OF_FREE_SURFACE
logical :: GRAVITY
More information about the CIG-COMMITS
mailing list