This is the famous Ars Magna program from Byte, which I keyed in from
the magazine and added whatever was needed to make it work.

gtoal
