#!/bin/csh -f
#(ie run the cshell on this but don't read the .cshrc)

# version = 1.00 of mkcheck 2002 Feb 20
# 2002 Feb 20, 1.00: origin 

echo Identify Rs values at various random seeds that are the same > checkresults

echo 4 > columnp
column < xyin |\
sort |\
cat > xyin.sorted

uniq < xyin.sorted |\
cat > xyin.uniq

diff xyin.sorted xyin.uniq > xyin.diff

echo ---
cat xyin.diff |\
grep "< " |\
sed -e "s/< //" |\
cat > xyin.locations

# cat xyin.locations

foreach l (`cat xyin.locations`)
  echo duplicate $l
  grep $l xyin >> checkresults
end

cat checkresults


exit
# 0.00 2000 r    3.90505   +/-    0.29733