From 24c331e5ff9cd5f081a379982616be102e392cf9 Mon Sep 17 00:00:00 2001
From: JanThorbecke <janth@xs4all.nl>
Date: Sat, 8 Jun 2019 01:39:08 -0500
Subject: [PATCH] WS15
---
marchenko/demo/invisible/eps.scr | 23 +++++++++++++++++++++++
1 file changed, 23 insertions(+)
create mode 100755 marchenko/demo/invisible/eps.scr
diff --git a/marchenko/demo/invisible/eps.scr b/marchenko/demo/invisible/eps.scr
new file mode 100755
index 0000000..76304db
--- /dev/null
+++ b/marchenko/demo/invisible/eps.scr
@@ -0,0 +1,23 @@
+suwind key=offset min=0 max=0 < shotsdx4_rp.su > zo.su
+makewave fp=30 dt=0.004 file_out=wave4.su nt=1024 t0=0.0 scale=1
+fconv file_in1=zo.su file_in2=wave4.su file_out=zow.su
+
+file=zow.su
+file_base=${file%.su}
+sumax < $file mode=abs outpar=nep
+clipref=`cat nep | awk '{print $1/4}'`
+
+supsimage hbox=6 wbox=4 labelsize=10 linewidth=0.0 < $file \
+ label1="time (s)" label2="lateral distance (m)" \
+ n1tic=2 x1beg=0 x1end=2.0 d1num=0.4 title="${file_base}" \
+ f2=-3000 f2num=-3000 d2num=1000 clip=$clipref > ${file_base}.eps
+
+file_base=shot
+for fldr in 1 375 751
+do
+suwind key=fldr min=$fldr max=$fldr < shotsdx4_rp.su | \
+ supsimage hbox=6 wbox=4 labelsize=10 linewidth=0.0 \
+ label1="time (s)" label2="lateral distance (m)" \
+ n1tic=2 x1beg=0 x1end=2.0 d1num=0.4 title="shot $fldr" \
+ f2=-3000 f2num=-3000 d2num=1000 clip=$clipref > ${file_base}_${fldr}.eps
+done
--
GitLab