#!/bin/tcsh -f
#(ie run the tshell on this but don't read the .cshrc or .tcshrc)

echo version = 1.00 of mkinst 2006 Oct 26
# 2006 Oct 26, 1.00: origin 

set inst = furnatural.inst
set list = justfur.inst

cat > $inst << EOF
title "Fur sites on E.coli-K12 used for oligos";
organism E.coli-K12;
chromosome E.coli-K12;
piece NC_000913;
EOF

cat instout |\
grep get  |\
grep -v '{' |\
cat > $list

echo ---- $list
cat $list
echo ----

# tail +4 ../makebkp
# tail +4 ../makebkp | wc

tail +4 ../makebkp |\
tr ' ' '\n' |\
uniq |\
cat > namelist
cat namelist
wc -l namelist

foreach f ("`cat namelist`")
  # echo $f
  grep $f $list
  grep $f $list >> $inst
end

echo --------- $inst
cat $inst

tomdate