[cig-commits] [commit] devel: renames adjoint seismogram names (displacement and strain) to format /NT.S000001.** instead of /S000001.NT.** (87f62f6)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Tue Dec 23 05:06:54 PST 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/c92aeae6613ca38c29e96dd169c292160dc53e21...c3b9c7ef07feb7d057fa71da18323d53b9c27233

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

commit 87f62f630edf3804f7b033efc6b02cfb5bd2cd32
Author: daniel peter <peterda at ethz.ch>
Date:   Tue Dec 23 11:29:38 2014 +0100

    renames adjoint seismogram names (displacement and strain) to format /NT.S000001.** instead of /S000001.NT.**


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

87f62f630edf3804f7b033efc6b02cfb5bd2cd32
 src/specfem3D/write_seismograms.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/specfem3D/write_seismograms.f90 b/src/specfem3D/write_seismograms.f90
index 90ff69d..37d1fce 100644
--- a/src/specfem3D/write_seismograms.f90
+++ b/src/specfem3D/write_seismograms.f90
@@ -589,7 +589,7 @@
 
       ! create the name of the seismogram file for each slice
       ! file name includes the name of the station, the network and the component
-      write(sisname,"(a2,i6.6,'.',a,'.',a3,'.sem',a1)") '/S',irec,'NT',channel,component
+      write(sisname,"(a3,'.',a1,i6.6,'.',a3,'.sem',a1)") '/NT','S',irec,channel,component
 
       ! save seismograms in text format with no subsampling.
       ! Because we do not subsample the output, this can result in large files
@@ -676,7 +676,7 @@
 
         ! create the name of the seismogram file for each slice
         ! file name includes the name of the station, the network and the component
-        write(sisname,"(a2,i6.6,'.',a,'.',a3,'.sem',a1)") '/S',irec,'NT',chn,component
+        write(sisname,"(a3,'.',a1,i6.6,'.',a3,'.sem',a1)") '/NT','S',irec,chn,component
 
         ! save seismograms in text format with no subsampling.
         ! Because we do not subsample the output, this can result in large files



More information about the CIG-COMMITS mailing list