Algol 60 code; no compiler was available to test this code. As a result it is supplied as submitted without a driver program, example data or results.