Code and text from "Symbolic Processing In Pascal" by Professor Manfred von Thun