7
generic
   type Element_Type is private;
  
   with function Hash (Element : Element_Type)
      return Hash_Type;
   with function Equivalent_Elements
     (L, R : Element_Type) return Boolean;
  
   with function "=" (L, R : Element_Type)
      return Boolean is <>;  
  
package Ada.Containers.Hashed_Sets is
   type Set is tagged private;
   type Cursor is private;
Hashed Set