#! /bin/sh
#set -x
triseis < TrimodelVelocity.dat \
xs=0.,4. zs=0.,0. xg=0.,4. zg=0.,0. \
ns=1 fs=1. ng=401 dg=0.02 fg=0. nt=1251 dt=0.004 \
nangle=201 fangle=-65 langle=65 \
kreflect=2 fpeak=12 lscale=0.5 > tmp.dat
suaddhead < tmp.dat ns=1251 | \
sushw key=dt a=4000 | sushw key=sx a=1000. |
sushw key=gx a=0. b=20. c=0 > shotgather1.dat
rm -f tmp*
exit