maple < animate
rm -r tmp
mkdir tmp
for i in plaa*
do
giftoppm $i | pnmcut 90 107 352 288  > tmp/$i.ppm
done
mpeg2encode MPEG-1.par cusps.mpg
rm pl* q*
rm -r tmp

