[cig-commits] [commit] devel,master: renames precision_mpi.h to precision.h; renames seismogram band codes from BHX/BHY/BHZ to BXX/BXY/BXZ; renames kernel file names to e.g. proc000000_rho_kappa_mu_kernel.dat; adds param_reader.c to handle more flexible parameter file formats (77e25d7)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Jun 18 15:18:56 PDT 2014
Repository : https://github.com/geodynamics/specfem2d
On branches: devel,master
Link : https://github.com/geodynamics/specfem2d/compare/fc67e6fd7ad890705b2b72b4b3c509accb22249e...e9ca46c40131588d89d7b0883250bc6584ce6b4c
>---------------------------------------------------------------
commit 77e25d7e2bd0a5a9bad4836ad38ad12c99697109
Author: Daniel Peter <peterda at ethz.ch>
Date: Sun Apr 24 04:34:10 2011 +0000
renames precision_mpi.h to precision.h; renames seismogram band codes from BHX/BHY/BHZ to BXX/BXY/BXZ; renames kernel file names to e.g. proc000000_rho_kappa_mu_kernel.dat; adds param_reader.c to handle more flexible parameter file formats
>---------------------------------------------------------------
77e25d7e2bd0a5a9bad4836ad38ad12c99697109
Tape2007_kernel/adj_seismogram_Tape2007.f90 | 8 ++++----
Tromp2005/README | 4 ++--
Tromp2005_kernel/adj_seismogram_Tromp2005.f90 | 8 ++++----
3 files changed, 10 insertions(+), 10 deletions(-)
diff --git a/Tape2007_kernel/adj_seismogram_Tape2007.f90 b/Tape2007_kernel/adj_seismogram_Tape2007.f90
index 7657ea1..92c1794 100644
--- a/Tape2007_kernel/adj_seismogram_Tape2007.f90
+++ b/Tape2007_kernel/adj_seismogram_Tape2007.f90
@@ -66,13 +66,13 @@ program adj_seismogram
character(len=150) :: filename
NDIM=3
- comp = (/"BHX","BHY","BHZ"/)
+ comp = (/"BXX","BXY","BXZ"/)
! number of components
!NDIMr=2 ! P-SV
NDIMr=1 ! SH (membrane)
- !compr = (/"BHX","BHZ"/) ! P-SV
- compr = (/"BHY","tmp"/) ! SH (membrane)
+ !compr = (/"BXX","BXZ"/) ! P-SV
+ compr = (/"BXY","tmp"/) ! SH (membrane)
! list of stations
station_name(1) = 'S0001'
@@ -170,7 +170,7 @@ program adj_seismogram
enddo
print*,'*************************'
- print*,'The input files (S****.AA.BHX/BHY/BHZ.adj) needed to run the adjoint simulation are in SEM'
+ print*,'The input files (S****.AA.BXX/BXY/BXZ.adj) needed to run the adjoint simulation are in SEM'
print*,'*************************'
end program adj_seismogram
diff --git a/Tromp2005/README b/Tromp2005/README
index 1aa0118..7d500d0 100644
--- a/Tromp2005/README
+++ b/Tromp2005/README
@@ -33,7 +33,7 @@ TO RUN:
6. check out the output files in the local directory OUTPUT_FILES
- The seismograms (S0001.AA.BHX.semd,S0001.AA.BHZ.semd) will be similar to those in Tromp2005, Figure 7b, but with an 8-second time shift due to the difference in origin time convention.
+ The seismograms (S0001.AA.BXX.semd,S0001.AA.BXZ.semd) will be similar to those in Tromp2005, Figure 7b, but with an 8-second time shift due to the difference in origin time convention.
optional: try plotting the wavefield using the script
SPECFEM2D/UTILS/visualization/plot_wavefield.pl
@@ -47,7 +47,7 @@ TO RUN:
10. check out the output files in the local directory OUTPUT_FILES
- The seismogram (S0001.AA.BHY.semd) will be similar to those in Tromp2005, Figure 2b, but with an 8-second time shift due to the difference in origin time convention.
+ The seismogram (S0001.AA.BXY.semd) will be similar to those in Tromp2005, Figure 2b, but with an 8-second time shift due to the difference in origin time convention.
optional: try plotting the wavefield using the script
SPECFEM2D/UTILS/visualization/plot_wavefield.pl
diff --git a/Tromp2005_kernel/adj_seismogram_Tromp2005.f90 b/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
index 04e4992..2098046 100644
--- a/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
+++ b/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
@@ -66,13 +66,13 @@ program adj_seismogram
character(len=150) :: filename
NDIM=3
- comp = (/"BHX","BHY","BHZ"/)
+ comp = (/"BXX","BXY","BXZ"/)
! number of components
NDIMr=2 ! P-SV
!NDIMr=1 ! SH (membrane)
- compr = (/"BHX","BHZ"/) ! P-SV
- !compr = (/"BHY","tmp"/) ! SH (membrane)
+ compr = (/"BXX","BXZ"/) ! P-SV
+ !compr = (/"BXY","tmp"/) ! SH (membrane)
! list of stations
station_name(1) = 'S0001'
@@ -170,7 +170,7 @@ program adj_seismogram
enddo
print*,'*************************'
- print*,'The input files (S****.AA.BHX/BHY/BHZ.adj) needed to run the adjoint simulation are in SEM'
+ print*,'The input files (S****.AA.BXX/BXY/BXZ.adj) needed to run the adjoint simulation are in SEM'
print*,'*************************'
end program adj_seismogram
More information about the CIG-COMMITS
mailing list