# . . for the EXXON GOM data set
XOM_WPAR = min5=5 max5=45
XB = /net/koko/jeff/Bin/LINUX86_64/
dn = >/dev/null

############
#
# . . view stuff

BPSYN = /data/BPSYN/

# . . Velocity Figure in Thesis
VELCUT.v: 
	< $(BPSYN)/Vel/Vel.H Window3d min1=6150 n1=1 min2=11500 max2=38166  min3=11000 max3=33000 | Transp > DD.H
	< $(BPSYN)/Vel/Vel.H Window3d min3=21750 n3=1 max1=10000 min2=11500 max2=38166 > XX.H
	< $(BPSYN)/Vel/Vel.H Window3d min2=33700 n2=1 max1=10000 min3=11000 max3=33000  > YY.H
	< DD.H Grey newclip=1 bclip=1500 eclip=4500 out=DD.v $(dn) title=" " labelsz=11 yreverse=n
	< XX.H Grey newclip=1 bclip=1500 eclip=4500 out=XX.v $(dn) title=" " labelsz=11
	< YY.H Grey newclip=1 bclip=1500 eclip=4500 out=YY.v $(dn) title=" " labelsz=11
	vp_OverUnderAniso DD.v XX.v YY.v > $@
	rm -f DD.v XX.v YY.v
#############################
CUT1:
	< RevTilt.H Window3d n2=1 min2=33700 min3=12000 max3=28000 |\
		Tpow tpow=1 | Grey wantaxis=n pclip=89 out=t1.v $(dn)\
		crowd1=1 crowd2=1
	< PWCart3D.H Window3d n2=1 min2=33700 min3=12000 max3=28000 |\
		Tpow tpow=1.5 | Grey wantaxis=n pclip=86 out=t2.v $(dn)\
		crowd1=1 crowd2=1
	pstexpen t1.v RY33700.ps fat=1 fatmult=1.5 invras=y
	pstexpen t2.v CY33700.ps fat=1 fatmult=1.5 invras=y
	epstopdf -nocompress RY33700.ps
	epstopdf -nocompress CY33700.ps

CUT2:
	< RevTilt.H Window3d n3=1 min3=21750 min2=17000 max2=37000 |\
		Tpow tpow=1 | Grey wantaxis=n pclip=94 out=t1.v $(dn)\
		crowd1=1 crowd2=1
	< PWCart3D.H Window3d n3=1 min3=21750 min2=17000 max2=37000 |\
		Tpow tpow=1.5 | Grey wantaxis=n pclip=89 out=t2.v $(dn)\
		crowd1=1 crowd2=1
	tube t1.v t2.v
	pstexpen t1.v RY21750.ps fat=1 fatmult=1.5 invras=y
	pstexpen t2.v CY21750.ps fat=1 fatmult=1.5 invras=y
	epstopdf -nocompress RY21750.ps
	epstopdf -nocompress CY21750.ps
%.T:
	echo "label1='Depth (m)' label2='Inline distance (m)' label3='Crossline distance (m)'" >> $*.H
	 < $*.H Window3d min2=11000 max2=39000 min3=10000 | Byte pclip=85 gainpanel=a tpow=1. > $@

SHOTCOMP: SHOTCart3D.T SHOTRWE3D.T
	~bob/ICube < SHOTRWE3D.T data1=SHOTCart3D.T nviews=2

PWCOMP: RevTilt.T PWCart3D.T
	~bob/ICube < RevTilt.T data1=PWCart3D.T nviews=2

CP1.v:
	< RevTilt.T Cubeplot movie=0  frame1=160 frame3=395 frame2=577 \
			point1=.4 point2=.5 wantcoordlabel=-1 out=t1.v $(dn) title="RWE geometry"

	< Cart3D.T Cubeplot movie=0  frame1=160 frame3=395 frame2=577 \
			point1=.4 point2=.5 wantcoordlabel=-1 out=t2.v $(dn) title="Cartesian geometry"
	vp_OverUnderAniso t1.v t2.v > $@
	tube $@

Xline%.v:
	< RevTilt.H Window n3=1 max1=10000 min3=$* min2=11500 max2=38166 |\
		Grey pclip=88.5 tpow=1.25 out=c1.v $(dn) title=" " titlesz=12\
		labelsz=10 label1="Depth (m)" label2="Inline distance (m)"
	< PWCart3D.H Window n3=1 min3=$*  max1=10000 min2=11500 max2=38166 |\
		Grey pclip=85.5 tpow=1.75 out=c2.v $(dn) title=" " titlesz=12\
		labelsz=10 label1="Depth (m)" label2="Inline distance (m)"
	vp_OverUnderAniso c1.v c2.v >$@
	vp_Movie c1.v c2.v > $@3
Yline%.v:
	< RevTilt.H Window n2=1 max1=10000 min2=$* min3=11000 max3=33000 |\
		Grey pclip=84.5 tpow=1.25 out=c1.v $(dn) title=" " titlesz=12\
		labelsz=10 crowd2=0.70 crowd1=0.848 label1="Depth (m)" label2="Crossline distance (m)"
	< PWCart3D.H Window n2=1  max1=10000 min2=$* min3=11000 max3=33000 |\
		Grey pclip=82.5 tpow=1.75 out=c2.v $(dn) title=" " titlesz=12\
		labelsz=10 crowd2=0.70 crowd1=0.848 label1="Depth (m)" label2="Crossline distance (m)"
	vp_OverUnderAniso c1.v c2.v >$@
	vp_Movie c1.v c2.v > $@3
Depth%.v:
	< RevTilt.H Window3d n1=1 min1=$* min2=12000 max2=36500 min3=10000 max3=34500 > x1.H
	< x1.H Transp | Grey pclip=85.5  yreverse=n out=c1.v $(dn) title=" " titlesz=12\
		labelsz=10 crowd1=0.4 crowd2=0.75
	< PWCart3D.H Window3d n1=1 min1=$* min2=12000 max2=36500 min3=10000 max3=34500 > x2.H
	< x2.H Transp | Grey pclip=85.5  yreverse=n out=c2.v $(dn) title=" " \
		titlesz=12 labelsz=10 crowd1=0.4 crowd2=0.75
	vp_OverUnderAniso c1.v c2.v >$@
	vp_Movie c1.v c2.v > $@3

FIG1.v: Xline21750.v
	vp_annotate < $< batch=y text=ann/FIG1.txt | vppen vpstyle=n > $@
FIG2.v: Xline12750.v
	vp_annotate < $< batch=y text=ann/FIG2.txt | vppen vpstyle=n > $@
FIG3.v: Yline33700.v
	vp_annotate < $< batch=y text=ann/FIG3.txt | vppen vpstyle=n > $@
FIG4.v: Yline14750.v
	vp_annotate < $< batch=y text=ann/FIG4.txt | vppen vpstyle=n > $@
FIG5.v: Depth6150.v
	vp_annotate < $< batch=y text=ann/FIG5.txt | vppen vpstyle=n > $@
%.ps: %.v
	pstexpen $*.v $*.ps color=n invas=y fat=1 fatmult=1.5
	epstopdf $*.ps 
C5Figs: FIG1.ps FIG2.ps FIG3.ps FIG4.ps FIG5.ps
	cp FIG*.pdf ~/Thesis/conical/Fig/