#!/bin/csh -f
if ( ! -e i.snd ) then
	echo ln ../sounds/i.snd .
 	     ln ../sounds/i.snd .
endif
set s=sweep
echo 	playscore -w $s.snd $s.score
	playscore -w $s.snd $s.score
echo 	tomono $s.snd testr.snd
 	tomono $s.snd testr.snd
echo	sndtrim testr.snd test.snd
	sndtrim testr.snd test.snd
echo	redefine 'original signal' as mono, trimmed version
echo	cp test.snd $s.snd
	cp test.snd $s.snd
echo	make first comparison work
echo	cp $s.snd testr_prv.snd
	cp $s.snd testr_prv.snd
foreach factor (1.1111111 0.9 1.5 0.6666667 2.0 0.5 3.0 0.3333333 32.0 0.03125)
	echo $factor
echo 	/bin/time ./resample -by $factor test.snd testr.snd
 	/bin/time ./resample -by $factor test.snd testr.snd
echo 	sndplay i.snd testr_prv.snd i.snd testr.snd
 	sndplay i.snd testr_prv.snd i.snd testr.snd
echo 	/bin/mv test.snd  testr_prv.snd
	/bin/mv test.snd  testr_prv.snd
echo 	/bin/mv testr.snd test.snd
	/bin/mv testr.snd test.snd
end

echo	/bin/rm testr_prv.snd
	/bin/rm testr_prv.snd
echo	Final comparison is $s.snd \(original\) versus test.snd \(final\)
echo 	sndplay i.snd $s.snd i.snd test.snd
 	sndplay i.snd $s.snd i.snd test.snd