8
procedure Op (S : in out Set) is
   C : Cursor;
begin
   S.Insert (New_Item => E);
   C := S.Find (Item => E);
   S.Delete (Item => E);
end;
Ordered Set or Hashed Set?