FOCUSMES=$(MYBINDIR)/FocusMes_v4.x
RESMIG=$(MYBINDIR)/ResMig_v3.x

Der-Smooth-Power-Ang-Mig-%-$(MYHOST).H: Smooth-Power-Ang-Mig-%-$(MYHOST).H
	<Smooth-Power-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=21 >temp1.H
	<Smooth-Power-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=19 >temp2.H
	Diff temp1.H temp2.H | Scale rscale=-1 >$@  datapath=$(TEMPPATH)

Der-Smooth-Sembl-Ang-Mig-%-$(MYHOST).H: Smooth-Sembl-Ang-Mig-%-$(MYHOST).H
	<Smooth-Sembl-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=21 >temp1.H
	<Smooth-Sembl-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=19 >temp2.H
	Diff temp1.H temp2.H | Scale rscale=-1 >$@  datapath=$(TEMPPATH)

Smooth-Power-Ang-Mig-%-$(MYHOST).H: Smooth-Power-Avg.P \
		Avg-Power-Ang-Mig-%-$(MYHOST).H
	Smooth <Avg-Power-Ang-Mig-$*-$(MYHOST).H par=Smooth-Power-Avg.P  \
	>$@ datapath=$(TEMPPATH)

Smooth-Sembl-Ang-Mig-%-$(MYHOST).H: Smooth-Sembl-Avg.P \
		Avg-Sembl-Ang-Mig-%-$(MYHOST).H
	Smooth <Avg-Sembl-Ang-Mig-$*-$(MYHOST).H par=Smooth-Sembl-Avg.P  \
	>$@ datapath=$(TEMPPATH)

Der-Power-Ang-Mig-%-$(MYHOST).H: Avg-Power-Ang-Mig-%-$(MYHOST).H
	<Avg-Power-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=21 >temp1.H
	<Avg-Power-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=19 >temp2.H
	Diff temp1.H temp2.H | Scale rscale=-1 >$@  datapath=$(TEMPPATH)

Der-Sembl-Ang-Mig-%-$(MYHOST).H: #Avg-Sembl-Ang-Mig-%-$(MYHOST).H
	<Avg-Sembl-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=21 >temp1.H
	<Avg-Sembl-Ang-Mig-$*-$(MYHOST).H Window3d n1=1 f1=19 >temp2.H
	Diff temp1.H temp2.H | Scale rscale=-1 >$@  datapath=$(TEMPPATH)

#	<Power-Ang-Mig-$*-$(MYHOST).H Window3d |
Avg-Power-Ang-Mig-%-$(MYHOST).H:  Power-Ang-Mig-%-$(MYHOST).H
	<Power-Ang-Mig-$*-$(MYHOST).H Window3d min1=1900 max1=2100 | \
	Transp plane=12 | Stack  | Transp \
	>$@  datapath=$(TEMPPATH)

Avg-Sembl-Ang-Mig-%-$(MYHOST).H: # Sembl-Ang-Mig-%-$(MYHOST).H
	<Sembl-Ang-Mig-$*-$(MYHOST).H Window3d min1=1900 max1=2100 |\
	Transp plane=12 | Stack  | Transp \
	>$@  datapath=$(TEMPPATH)

Power-Ang-Mig-%-$(MYHOST).H: Power-ang.P Rmo-Ang-Mig-%-$(MYHOST).H \
	Apert-Power-Ang-Mig-%-$(MYHOST).H
	$(FOCUSMES) \
	par=Power-ang.P \
	Cig=Rmo-Ang-Mig-$*-$(MYHOST).H \
	Apert_apert=Apert-Power-Ang-Mig-$*-$(MYHOST).H \
	Semblance=$@ \
  	datapath=$(TEMPPATH) filesize=2000  \
	>$@.head 2>$(TEMPDIR)/$@.log


Sembl-Ang-Mig-%-$(MYHOST).H: Sembl-ang.P Rmo-Ang-Mig-%-$(MYHOST).H \
	Apert-Ang-Mig-%-$(MYHOST).H
	$(FOCUSMES) \
	par=Sembl-ang.P \
	Cig=Rmo-Ang-Mig-$*-$(MYHOST).H \
	Apert_apert=Apert-Ang-Mig-$*-$(MYHOST).H \
	Semblance=$@ \
  	datapath=$(TEMPPATH) filesize=2000  \
	>$@.head 2>$(TEMPDIR)/$@.log

Apert-Power-Ang-Mig-%-$(MYHOST).H: Apert-Power-ang.P 
	Spike par=$< >$@ datapath=$(TEMPPATH) filesize=2000  
	echo "n_z_avg=1" >> $@
	echo "n_mx_avg=1" >> $@

Apert-Ang-Mig-%-$(MYHOST).H: Apert-ang.P Rmo-Ang-Mig-%-$(MYHOST).H
	$(FOCUSMES) \
	par=Apert-ang.P \
	Cig=Rmo-Ang-Mig-$*-$(MYHOST).H \
	Aperture=$@ \
  	datapath=$(TEMPPATH) filesize=2000  \
	>$@.head 2>$(TEMPDIR)/$@.log


Rmo-Ang-Mig-%-$(MYHOST).H: Rmo.P Tr-Ang-Mig-%-$(MYHOST).H 
	$(RESMIG) \
	par=Rmo.P \
	Cig=Tr-Ang-Mig-$*-$(MYHOST).H \
	ResMig=$@ \
  	datapath=$(TEMPPATH) filesize=2000  \
	>$@.head 2>$(TEMPDIR)/$@.log

Tr-Ang-Mig-0-VLowFreq-$(MYHOST).H: Ang-Mig-0-VLowFreq-$(MYHOST).H
	Window3d <Ang-Mig-0-VLowFreq-$(MYHOST).H n1=200 min1=1500 j2=4 | \
	Transp plane=23 \
	>$@  datapath=$(TEMPPATH) 

Tr-Ang-Mig-0-$(MYHOST).H: Ang-Mig-0-$(MYHOST).H
	Window3d <Ang-Mig-0-$(MYHOST).H n1=200 min1=1500 j2=4 | \
	Transp plane=23 \
	>$@  datapath=$(TEMPPATH) 
