[cig-commits] [commit] pluggable: update end time in header (1ec5904)

[cig_noreply at geodynamics.org]

Repository : ssh://geoshell/specfem3d_globe

On branch  : pluggable
Link       : https://github.com/geodynamics/specfem3d_globe/compare/64e1b38f0c5ebb4056cce0b15d41c0b9f94ab6e5...099a4d330d5b173b21e51ad441f9f429e5d37842

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

commit 1ec5904fffa7f99069e4e754f03b1dd5891a5fec
Author: Eh Tan <tan2 at earth.sinica.edu.tw>
Date:   Fri May 15 17:16:35 2009 +0000

    update end time in header


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

1ec5904fffa7f99069e4e754f03b1dd5891a5fec
 UTILS/seis_process/convolve_stf.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/UTILS/seis_process/convolve_stf.c b/UTILS/seis_process/convolve_stf.c
index a890327..041c6c1 100644
--- a/UTILS/seis_process/convolve_stf.c
+++ b/UTILS/seis_process/convolve_stf.c
@@ -232,9 +232,10 @@ main(int argc, char *argv[])
         /* update sac file header */
         {
             int n;
-            float bnew, aminm, amaxm, amean;
+            float bnew, enew, aminm, amaxm, amean;
 
             bnew = origin - hstf + beg;
+            enew = bnew + del * nconv;
 
             aminm = amaxm = conv[0];
             amean = 0;
@@ -246,6 +247,7 @@ main(int argc, char *argv[])
             amean /= nconv;
 
             setfhv("b", &bnew, &nerr, strlen("b"));
+            setfhv("e", &enew, &nerr, strlen("e"));
             setnhv("npts", &nconv, &nerr, strlen("npts"));
             setfhv("depmin", &aminm, &nerr, strlen("depmin"));
             setfhv("depmax", &amaxm, &nerr, strlen("depmax"));