#!/bin/csh

foreach i ( junk2.ps junk2.ps.save junk2.v junk2.v.save junk2.warning)
	gawk '{print $1, $2, myfile }' myfile=$i $i > junk.jon.$$.$i
	end

cat junk.jon.$$.* | sort | gawk -f AWK

/bin/rm junk.jon.$$*

<figtab ~jon/bin/Table >junk.figtab
<figsum ~jon/bin/Table >junk.figsum

#<figtab ~jon/bin/field 1 2 8 3 6 4 7 6 | ~jon/bin/Table | more

#join figsum figsum.old | ~jon/bin/field 1 2 5 3 6 4 7 | ~jon/bin/Table


