base=`basename $1 in.bmp`
bwfile=$base.bmp

./contrast $1 470 > $bwfile
./split $bwfile 2
for fil in `find . -name "00??.bmp"`; do mv $fil `basename $bwfile .bmp``basename $fil` ; done;
for fil in `find . -name "$(echo $base)0???.bmp"`; do ./coarse $fil; (for filname in `find . -name "coarse?.bmp"`; do mv $filname `basename $fil .bmp``basename $filname`; done;); done;
(for fil in `find . -name "$(echo $base)0???.bmp"`; do echo .; echo $fil; ./add $(./honn `basename $fil .bmp`coarse weights.dat.image2.16589) $(./honn `basename $fil .bmp`coarse weights.dat.image1.174379); done;)  | ./parse