#!/bin/csh # # set numfiles = `ls *.qm | wc -l ` if ($numfiles == 0) then echo " " echo "No QM files found in this directory." echo " " exit 1 else set filesearch="" set filesearch=($filesearch *.qm) shift filesearch endif # # Pull out four character code and run postplot # foreach file ($filesearch) set satlist = `qm_sat $file` foreach filesat ($satlist) set code_temp=`echo $file | awk '{print substr($1,8,4)}'` # if (($code_temp != "algo") && ($code_temp != "albh") && ($code_temp != "brmu") && ($code_temp != "gold") \ # && ($code_temp != "fair") && ($code_temp != "kokb") && ($code_temp != "nlib") \ # && ($code_temp != "stjo") && ($code_temp != "pie1") && ($code_temp != "wes2") \ # && ($code_temp != "yell")) then set code = $code_temp$filesat echo $code postplot_all $code_temp $filesat $code_temp.postfit.nio -o $code.ps endif end 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 mkdir ps_files mv *.ps ps_files