#
# parameter 1 is the test number (01, 02, ..., 17) to test
# parameter 2 is the stem for the fill to be compared with the standard
# parameter 3 is the stem for the other standard (i.e. if other than stnd)
#
set ver1 = $2
if ($3 == "") then
   set ver2 = stnd
else
   set ver2 = $3
endif
#
echo $ver1 " compared with " $ver2
alias comp "echo ' '; echo '#############################  Compare \!:1 "\
   " \!:2 ######################';"\
   " sed 's/ 0/  /g' \!:1.o$ver1 | sed 's/-0/ -/g' >$TMPDIR/\!:1.os$ver1 ;"\
   " sed 's/ 0/  /g' \!:1.o$ver2 | sed 's/-0/ -/g' >$TMPDIR/\!:1.os$ver2 ;"\
   " diff $TMPDIR/\!:1.os$ver1 $TMPDIR/\!:1.os$ver2 | grep -i "'""'\!:2'"" ;'\
   " rm $TMPDIR/\!:1.os$ver1 $TMPDIR/\!:1.os$ver2 "
#
switch ($1)
case 01:
   comp test01 "iter ="
   breaksw
case 1:
   comp test01 "iter ="
   breaksw
case 02:
   comp test02 "iter ="
   breaksw
case 2:
   comp test02 "iter ="
   breaksw
case 03:
   comp test03 "iter ="
   breaksw
case 3:
   comp test03 "iter ="
   breaksw
case 04:
   comp test04 "iter ="
   breaksw
case 4:
   comp test04 "iter ="
   breaksw
case 05:
   comp test05 "iter ="
   breaksw
case 5:
   comp test05 "iter ="
   breaksw
case 06:
   comp test06 "iter ="
   breaksw
case 6:
   comp test06 "iter ="
   breaksw
case 07:
   comp test07 "iter ="
   breaksw
case 7:
   comp test07 "iter ="
   breaksw
case 08:
   comp test08 "iter ="
   breaksw
case 8:
   comp test08 "iter ="
   breaksw
case 09:
   comp test09 "VRes"
   breaksw
case 9:
   comp test09 "VRes"
   breaksw
case 10:
   comp test10 "VRes"
   breaksw
case 11:
   comp test11 "VRes"
   comp test11 "ABSTOP"
   breaksw
case 12:
   comp test12 "iter ="
   breaksw
case 13:
   comp test13 "iter ="
   comp test13 "EPhi"
   breaksw
case 14:
   comp test14 "iter ="
   breaksw
case 15:
   comp test15 "iter ="
   comp test15 "alcoef"
   breaksw
case 16:
   comp test16 "iter ="
   comp test16 "alcoef"
   breaksw
case 17:
   comp test17 "iter ="
   comp test17 "EPhi"
   breaksw
case 18:
   comp test18 "iter ="
   comp test18 "EPhi"
   breaksw
case 19:
   comp test19 "iter ="
   breaksw
case 20:
   comp test20 "iter ="
   breaksw
case 21:
   comp test21 "iter ="
   breaksw
case 22:
   comp test22 "iter ="
   breaksw
case 23:
   comp test23 "iter ="
   breaksw
case 24:
   comp test24 "iter ="
   comp test24 "EPhi"
   breaksw
endsw
#
exit