#!/bin/csh
#
#   Script to Drive tests of all Sorting
#   Subroutines
#

echo 'Test of all Sorting Subroutines ' >! sortout
echo ' ' >> sortout
foreach sortsub (sort*.f)
   f77 drvsort.f $sortsub
   echo 'Results for ' $sortsub >> sortout
   echo '___________________________________________________' >> sortout
   a.out >> sortout
   echo '___________________________________________________' >> sortout
end
cat sortout
echo 'Check the file sortout for results'