package Equal11_Interface is

  type My_Interface_Type is interface;

  procedure Put (R : in My_Interface_Type) is abstract;

end Equal11_Interface;