A Fortran IV Program for Finding the Smallest Set of Smallest Rings of a Graph