UF77LIBS = ${TDFLIB}
include ${SEPINC}/SEP.top
RESULTSER = synsat seasat
TA2VPLOT =                      Ta2vplot crowd=.88 wantaxis=0 > /dev/null title=" "
TOVPLOT = Byte >junk99; <junk99 Ta2vplot crowd=.88 wantaxis=0 > /dev/null title=" "

default: tube

${RESDIR}/synsat.v syntop.H syntrack.H:  syntrack.x syntop.x syntrack.p
	          syntop.x  hello   > syntop.H
	<syntop.H syntrack.x par=syntrack.p       > syntrack.H
	<syntop.H   Byte > junk.A; <junk.A ${TA2VPLOT} title=original out=syntop.v
	<syntrack.H Byte > junk.A
	<junk.A Window n3=1 f3=0 > nn.A; <nn.A ${TA2VPLOT} title=SE-NW out=nn.v
	<junk.A Window n3=1 f3=1 > ss.A; <ss.A ${TA2VPLOT} title=NE-SW out=ss.v
	vp_SideBySideAniso syntop.v nn.v ss.v> junk.v
	<junk.v  vppen vpstyle=n txscale=3. >${RESDIR}/synsat.v

${RESDIR}/seasat.v : syntop.H   syntrack.H  Seastat.x     topo.p
			   In syntrack.H
	                    < syntrack.H  Seastat.x par=topo.p > topo.H
			   In                                    topo.H
	<syntop.H   Byte > junk.A; <junk.A ${TA2VPLOT} title=original out=syntop.v
	<topo.H Window n3=1 f3=0>junk98;<junk98 ${TOVPLOT} title=adjoint   out=topo0.v
	<topo.H Window n3=1 f3=1>junk98;<junk98 ${TOVPLOT} title=Laplacian out=topo1.v
	<topo.H Window n3=1 f3=2>junk98;<junk98 ${TOVPLOT} title="2-D PEF" out=topo2.v
	vp_SideBySideAniso topo0.v topo1.v topo2.v > junk.v
	<junk.v  vppen vpstyle=n txscale=3. >${RESDIR}/seasat.v

#cat          $tl/{seastat.rt,seatopo.rt,track.rt,trakwit.rt} > junk
#Seastat.x : seastat.o seatopo.o track.o trakwit.o

clean: jclean

include ${SEPINC}/SEP.bottom
