#define LINDIR ./../..
#define FIGDIR LINDIR/Figs/Fiedat5
#define CHPDIR LINDIR/Fiedat5
#define SRCDIR CHPDIR/Src
#define DATDIR CHPDIR/Dat
#define BINDIR .
#define USRLIBS VPLOTLIB
#define FIGLIST fiewlt fienf fiecmp fiecom fievel fieimgavg fieimg \
		fieimgv0 fiermg
#define TLSZFAT  titlefat=5 titlesz=12 labelfat=3 labelsz=8 
#define THICK plotcol=0,0,0,0,0,0,0 plotfat=8
#define THIN plotcol=5,5,5,5,5,5,5 plotfat=4
#define FAST title=" " label1=" " label2=" " wantframe=y wantaxis=n

#include <SEP.defs>

FIGDIR/fiewlt.v : DATDIR/fiewlt.H
	Graph < DATDIR/fiewlt.H TLSZFAT title=" " label1="Time (s)" label2="Amplitude" plotfat=4 xinch=10.24 yinch=6.827 out=junk.v > Junk
	vppen junk.v vpstyle=n scale=0.26 > FIGDIR/fiewlt.v
	rm junk.v Junk

FIGDIR/fienf.v : DATDIR/fienear.H DATDIR/fiefar.H
	Window j1=2 j2=2 < DATDIR/fienear.H > fienear.temp
	Taplot tpow=1. < fienear.temp | Ta2vplot title=" " label1="Time (s)" label2="Midpoint (km)" wheretitle=t TLSZFAT color=i d1num=0.4 d2num=1. o1num=0.8 o2num=0 grid=n polarity=1 xinch=10.24 yinch=7.5 out=junk1.v > Junk
	Window j1=2 j2=2 < DATDIR/fiefar.H > fiefar.temp
	Taplot tpow=1. < fiefar.temp | Ta2vplot title=" " label1="Time (s)" label2="Midpoint (km)" wheretitle=t TLSZFAT wantaxis2=n color=i d1num=0.4 d2num=1. o1num=0.8 o2num=0 grid=n polarity=1 xinch=10.24 yinch=7.5 out=junk2.v > Junk
	vppen junk1.v yshift=8 > junka.v
	vppen junk2.v yshift=0. > junkb.v
	vppen junka.v junkb.v erase=o vpstyle=n scale=0.45 > FIGDIR/fienf.v
	rm junka.v junkb.v junk1.v junk2.v Junk
	Rm fienear.temp fiefar.temp

FIGDIR/fiecmp.v : DATDIR/fiecmp1.H DATDIR/fiecmp2.H
	Window j1=2 j2=2 < DATDIR/fiecmp1.H > fiecmp1.temp
	Taplot tpow=1. < fiecmp1.temp | Ta2vplot title=" " label1="Time (s)" label2="Offset (km)" wheretitle=t TLSZFAT color=i d1num=0.4 d2num=0.4 o1num=0.8 o2num=0.1 grid=n polarity=1 xinch=3. yinch=7.5 out=junka.v > Junk
	Box x0=6.4 y0=3.1 size=0.1 label="Non-hyperbolic\\\\n    moveout" xt=0.000000 yt=-1.00000 out=point.v > Junk
	vp_Overlay junka.v point.v > junk1.v
	Window j1=2 j2=2 < DATDIR/fiecmp2.H > fiecmp2.temp
	Taplot tpow=1. < fiecmp2.temp | Ta2vplot title=" " label1=" " label2="Offset (km)" wantaxis1=n wheretitle=t TLSZFAT color=i d1num=0.4 d2num=0.4 o1num=0.8 o2num=0.1 grid=n polarity=1 xinch=3. yinch=7.5 out=junkb.v > Junk
	Box x0=6.85 y0=2.4 size=0.1 label="Water-bottom\\\\n    multiple" xt=0.000000 yt=1.000 out=point.v > Junk
	vp_Overlay junkb.v point.v > junk2.v
	vppen junk1.v xshift=-1 > junka.v
	vppen junk2.v xshift=2.5 > junkb.v
	vppen junka.v junkb.v erase=o vpstyle=n scale=0.79 > FIGDIR/fiecmp.v
	rm point.v junka.v junkb.v junk1.v junk2.v Junk
	Rm fiecmp1.temp fiecmp2.temp
	
FIGDIR/fiecom.v : DATDIR/fierawsamp.H DATDIR/fiesamp.H 
	< DATDIR/fierawsamp.H Tpow tpow=2 | Wiggle zplot=1.2 TLSZFAT title=" " label1="Time (s)" label2="Midpoint (km)" wherexlabel=t poly=y transp=1 yreverse=1 xinch=4.5 yinch=7.5 out=junka.v > Junk
	< DATDIR/fiesamp.H Tpow tpow=2 | Wiggle zplot=1.2 TLSZFAT title=" " label1="Time (s)" label2="Midpoint (km)" wherexlabel=t poly=y transp=1 yreverse=1 xinch=4.5 yinch=7.5 out=junkb.v > Junk
	Scale axis=12 < DATDIR/fierawsamp.H | Spectrum | Graph TLSZFAT title="Spectrum" label1="Frequency (Hz)" label2="Amplitude" plotfat=4 xinch=4.5 yinch=3 out=junkc.v > Junk
	Scale axis=12 < DATDIR/fiesamp.H | Spectrum | Graph TLSZFAT title="Spectrum" label1="Frequency (Hz)" label2="Amplitude" plotfat=4 xinch=4.5 yinch=3 out=junkd.v > Junk
	vppen junka.v xshift=-2 yshift=6 > junk1.v
	vppen junkb.v xshift=4 yshift=6 > junk2.v
	vppen junkc.v xshift=-2 yshift=-1 > junk3.v
	vppen junkd.v xshift=4 yshift=-1 > junk4.v
	vppen junk1.v junk2.v junk3.v junk4.v erase=o vpstyle=n scale=0.52 > FIGDIR/fiecom.v
	rm junka.v junkb.v junkc.v junkd.v junk1.v junk2.v junk3.v junk4.v Junk

FIGDIR/fievel.v : DATDIR/fievelf.H DATDIR/fiestrf.H
	Graph < DATDIR/fiestrf.H title=" " label2="Depth (km)" label1="Surface (km)" wherexlabel=t min2=0.6 max2=1.3 yreverse=y pad=n THIN xinch=10.24 yinch=6.12 out=interface.v > Junk
	vp_Overlay interface.v > junk1.v
	Window n1=167 f1=150 < DATDIR/fievelf.H > fievelf.temp
        Taplot < fievelf.temp bias=1.94 clip=0.46 | Ta2vplot title=" " label1="Depth (km)" label2="Surface (km)" wheretitle=t TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=6.12 out=junk.v > Junk
	Contour nc=10 c0=1.482 dc=0.1 < fievelf.temp THICK FAST xinch=10.24 yinch=6.12 out=junka.v > Junk
	Contour nc=10 c0=1.482 dc=0.1 < fievelf.temp THIN FAST xinch=10.24 yinch=6.12 out=junkb.v > Junk
	vp_Overlay junk.v junka.v junkb.v > back.v
        Bar n2=100 type=h minval=1.479 maxval=2.41 | Taplot bias=1.94 clip=0.46 | Ta2vplot title=" " label2="Velocity (km/s)" wherexlabel=b TLSZFAT color=i wantaxis1=n d2num=0.3 o2num=1.48 grid=n polarity=1 xinch=10.24 yinch=0.5 out=junk.v > Junk
        vppen junk.v yshift=-3.5 > bar.v
	vp_Overlay back.v bar.v > junk2.v
	vppen junk1.v yshift=8 > junka.v
	vppen junk2.v yshift=0. > junkb.v
        vppen junka.v junkb.v erase=o vpstyle=n scale=0.465 > FIGDIR/fievel.v
        rm back.v bar.v junk.v junka.v junkb.v junk1.v junk2.v interface.v Junk
	Rm fievelf.temp

FIGDIR/fieimgavg.v : DATDIR/fiemigavg.H  DATDIR/fieimgavg.H
	Window j1=2 j2=2 < DATDIR/fieimgavg.H > fieimgavg.temp
	Taplot tpow=0. < fieimgavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junka.v > Junk
	Window n2=1 f2=37 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis2=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-4.6 > junk1.v
	Window n2=1 f2=46 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-3.285 > junk2.v
	Window n2=1 f2=124 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-1.971 > junk3.v
	Window n2=1 f2=169 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-0.657 > junk4.v
	Window n2=1 f2=197 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=0.657 > junk5.v
	Window n2=1 f2=269 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=1.971 > junk6.v
	Window n2=1 f2=368 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=3.285 > junk7.v
	Window n2=1 f2=386 < DATDIR/fiemigavg.H > fiemigavg.temp
	Taplot tpow=0. < fiemigavg.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=4.6 > junk8.v
	vp_Overlay junk1.v junk2.v junk3.v junk4.v junk5.v junk6.v junk7.v junk8.v > junkb.v
	vppen junka.v yshift=8 > junk1.v
	vppen junkb.v yshift=0. > junk2.v
        vppen junk1.v junk2.v erase=o vpstyle=n scale=0.45 > FIGDIR/fieimgavg.v
	rm junka.v junkb.v junk.v junk1.v junk2.v junk3.v junk4.v junk5.v junk6.v junk7.v junk8.v Junk
	Rm fiemigavg.temp fieimgavg.temp

FIGDIR/fieimg.v : DATDIR/fiemig.H  DATDIR/fieimg.H
	Window j1=2 j2=2 < DATDIR/fieimg.H > fieimg.temp
	Taplot tpow=0. < fieimg.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junka.v > Junk
	Window n2=1 f2=37 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis2=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-4.6 > junk1.v
	Window n2=1 f2=46 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-3.285 > junk2.v
	Window n2=1 f2=124 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-1.971 > junk3.v
	Window n2=1 f2=169 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=-0.657 > junk4.v
	Window n2=1 f2=197 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=0.657 > junk5.v
	Window n2=1 f2=269 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=1.971 > junk6.v
	Window n2=1 f2=368 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=3.285 > junk7.v
	Window n2=1 f2=386 < DATDIR/fiemig.H > fiemig.temp
	Taplot tpow=0. < fiemig.temp | Ta2vplot title=" " label1="Depth (km)" label2="(km)" wheretitle=t TLSZFAT color=i wantaxis=n d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=1.2 yinch=7.5 out=junk.v > Junk
	vppen junk.v xshift=4.6 > junk8.v
	vp_Overlay junk1.v junk2.v junk3.v junk4.v junk5.v junk6.v junk7.v junk8.v > junkb.v
	vppen junka.v yshift=8 > junk1.v
	vppen junkb.v yshift=0. > junk2.v
        vppen junk1.v junk2.v erase=o vpstyle=n scale=0.45 > FIGDIR/fieimg.v
	rm junka.v junkb.v junk.v junk1.v junk2.v junk3.v junk4.v junk5.v junk6.v junk7.v junk8.v Junk
	Rm fiemig.temp fieimg.temp

FIGDIR/fieimgv0.v : DATDIR/fieimgv0.H  DATDIR/fiermg.H
	Window j1=2 j2=2 < DATDIR/fieimgv0.H > fieimgv0.temp
	Taplot tpow=0. < fieimgv0.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junka.v > Junk
	Window j1=2 j2=2 < DATDIR/fiermg.H > fiermg.temp
	Taplot tpow=0.4 < fiermg.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t wantaxis2=n TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junkb.v > Junk
	vppen junka.v yshift=8 > junk1.v
	vppen junkb.v yshift=0. > junk2.v
        vppen junk1.v junk2.v erase=o vpstyle=n scale=0.45 > FIGDIR/fieimgv0.v
	rm junka.v junkb.v junk1.v junk2.v Junk
	Rm fieimgv0.temp fiermg.temp

FIGDIR/fiermg.v : DATDIR/fiermg.H  DATDIR/fieimgzos.H
	Window j1=2 j2=2 < DATDIR/fiermg.H > fiermg.temp
	Taplot tpow=0.4 < fiermg.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junka.v > Junk
	Window j1=2 j2=2 < DATDIR/fieimgzos.H > fieimgzos.temp
	Taplot tpow=0. < fieimgzos.temp | Ta2vplot title=" " label1="Depth (km)" label2="Midpoint (km)" wheretitle=t wantaxis2=n TLSZFAT color=i d1num=0.2 d2num=0.5 o1num=0.6 o2num=1. grid=n polarity=1 xinch=10.24 yinch=7.5 out=junkb.v > Junk
	vppen junka.v yshift=8 > junk1.v
	vppen junkb.v yshift=0. > junk2.v
        vppen junk1.v junk2.v erase=o vpstyle=n scale=0.45 > FIGDIR/fiermg.v
	rm junka.v junkb.v junk1.v junk2.v Junk
	Rm fiermg.temp fieimgzos.temp

clean&:
	-RM_CMD a.out
	-RM_CMD junk* *.v *.o *.x

#include "./../../Adm/LIN.fig.rules"

#include <SEP.obj.rules>

#include <SEP.prog.rules>
