b4 in turbo pascal
moved the program into a unit
program to generate optable from the source
restore the compilable part