#!/bin/csh
#
#
##set numfiles = `ls clean_qmfiles/*.qm | wc -l `
set numfiles = `ls *.postfit.nio | wc -l `
if ($numfiles == 0) then
   echo " "
   echo "No QM files found in this directory."
   echo " "
   exit 1
else
   set filesearch="<null>"
   set filesearch=($filesearch *.postfit.nio)
##   set filesearch=($filesearch clean_qmfiles/*.qm)
   shift filesearch
endif

#
#  Pull out four character code and run postplot
#

foreach file ($filesearch)
##   set code=`echo $file | awk '{print substr($1,22,4)}'`
   set code=`echo $file | awk '{print substr($1,1,4)}'`
   postplot_point $code ALL $code.postfit.nio -o $code.ps
end

rm -f *-GPS*
rm -f tmpfn.*
rm -f tmpld2.*
rm -f tmpld.*
rm -f postfit.txt_*

echo "The following postscript files are available for viewing"

    ls -l *.ps