[cig-commits] [commit] devel,master: uses directory SEM/ for adjoint sources; removes trailing spaces from source code files (f938a6e)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Wed Jun 18 15:18:54 PDT 2014


Repository : https://github.com/geodynamics/specfem2d

On branches: devel,master
Link       : https://github.com/geodynamics/specfem2d/compare/fc67e6fd7ad890705b2b72b4b3c509accb22249e...e9ca46c40131588d89d7b0883250bc6584ce6b4c

>---------------------------------------------------------------

commit f938a6e5cea99d4e672e2a50f8c148129fbfe9f8
Author: Daniel Peter <peterda at ethz.ch>
Date:   Thu Apr 21 23:54:38 2011 +0000

    uses directory SEM/ for adjoint sources; removes trailing spaces from source code files


>---------------------------------------------------------------

f938a6e5cea99d4e672e2a50f8c148129fbfe9f8
 Tape2007_kernel/adj_seismogram_Tape2007.f90   | 4 ++--
 Tape2007_kernel/process.sh                    | 1 +
 Tromp2005_kernel/adj_seismogram_Tromp2005.f90 | 4 ++--
 Tromp2005_kernel/process.sh                   | 1 +
 4 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/Tape2007_kernel/adj_seismogram_Tape2007.f90 b/Tape2007_kernel/adj_seismogram_Tape2007.f90
index 64e0522..7657ea1 100644
--- a/Tape2007_kernel/adj_seismogram_Tape2007.f90
+++ b/Tape2007_kernel/adj_seismogram_Tape2007.f90
@@ -119,7 +119,7 @@ program adj_seismogram
 
         print*,comp(icomp)
 
-        filename = 'OUTPUT_FILES/'//trim(station_name(irec))//'.AA.'// comp(icomp) // '.adj'
+        filename = 'SEM/'//trim(station_name(irec))//'.AA.'// comp(icomp) // '.adj'
         open(unit = 11, file = trim(filename))
 
         time_window(:) = 0.d0
@@ -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 OUTPUT_FILES'
+  print*,'The input files (S****.AA.BHX/BHY/BHZ.adj) needed to run the adjoint simulation are in SEM'
   print*,'*************************'
 
 end program adj_seismogram
diff --git a/Tape2007_kernel/process.sh b/Tape2007_kernel/process.sh
index 63bd9f8..852ed3a 100755
--- a/Tape2007_kernel/process.sh
+++ b/Tape2007_kernel/process.sh
@@ -18,6 +18,7 @@ echo
 
 mkdir -p OUTPUT_FILES
 mkdir -p DATA
+mkdir -p SEM
 
 # sets up local DATA/ directory
 cd DATA/
diff --git a/Tromp2005_kernel/adj_seismogram_Tromp2005.f90 b/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
index bec1fa5..04e4992 100644
--- a/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
+++ b/Tromp2005_kernel/adj_seismogram_Tromp2005.f90
@@ -119,7 +119,7 @@ program adj_seismogram
 
         print*,comp(icomp)
 
-        filename = 'OUTPUT_FILES/'//trim(station_name(irec))//'.AA.'// comp(icomp) // '.adj'
+        filename = 'SEM/'//trim(station_name(irec))//'.AA.'// comp(icomp) // '.adj'
         open(unit = 11, file = trim(filename))
 
         time_window(:) = 0.d0
@@ -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 OUTPUT_FILES'
+  print*,'The input files (S****.AA.BHX/BHY/BHZ.adj) needed to run the adjoint simulation are in SEM'
   print*,'*************************'
 
 end program adj_seismogram
diff --git a/Tromp2005_kernel/process.sh b/Tromp2005_kernel/process.sh
index 1cb6d5f..08d1763 100755
--- a/Tromp2005_kernel/process.sh
+++ b/Tromp2005_kernel/process.sh
@@ -18,6 +18,7 @@ echo
 
 mkdir -p OUTPUT_FILES
 mkdir -p DATA
+mkdir -p SEM
 
 # sets up local DATA/ directory
 cd DATA/



More information about the CIG-COMMITS mailing list