#!/bin/csh
set p = ~prof/pvi
grep '^\\progdex' $p/[a-z]*/B.tex $p/Rat/B.tex| sed 's/^.*progdex{//' | sed 's/}.*$//' |sort > junk.tex
echo Number of .rt routines in pvi
wc < junk.tex
#pause
echo " "
ls -F *.rt  | sed s/.rt// > junk.lib
echo here but not in pvi:
diff junk.tex junk.lib | grep '>'

echo " "
echo In pvi, but not here:
diff junk.tex junk.lib | grep '<'
/bin/rm junk.lib junk.tex