original source code for analytica

It works under Mathematica 2.2.2. See docs for details.
There is a version porting it to Mathematica of higher
versions, but the source code is nowhere to find.