Implementation of an optimizing compiler for the procedural subset of the algebraic programming language of the APS system