Here's the unoptimized pascal flame I was
talking about at comp.sys.ibm.pc.demos.
         o flap / Capacala o