This algorithm was originally submitted in Algol 60. A Fortran 77 translation of this original code along with a driver program have been included with this distribution.