pragma Style_Checks ("NM32766");
pragma Wide_Character_Encoding (Brackets);

---------------------------------------------------
--  This file has been generated automatically from
--  /wrkdirs/usr/ports/net/polyorb/work/polyorb-2.9.0/idls/cos/time/CosTime.idl
--  by IAC (IDL to Ada Compiler) 2.9.0 (rev. unknown).
---------------------------------------------------
--  NOTE: If you modify this file by hand, your
--  changes will be lost when you re-run the
--  IDL to Ada compiler.
---------------------------------------------------

with CORBA.Object;
with PolyORB.Std;
with TimeBase;
with CosTime.UTO;
with CORBA;
pragma Elaborate_All (CORBA);

package CosTime.TIO is

   type Ref is
     new CORBA.Object.Ref with null record;

   Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/TIO:1.0";

   time_interval_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/TIO/time_interval:1.0";

   function get_time_interval
     (Self : Ref)
     return TimeBase.IntervalT;

   procedure spans
     (Self : Ref;
      time : CosTime.UTO.Ref;
      overlap : out CosTime.TIO.Ref'Class;
      Returns : out CosTime.OverlapType);

   spans_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/TIO/spans:1.0";

   procedure overlaps
     (Self : Ref;
      interval : CosTime.TIO.Ref'Class;
      overlap : out CosTime.TIO.Ref'Class;
      Returns : out CosTime.OverlapType);

   overlaps_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/TIO/overlaps:1.0";

   function time
     (Self : Ref)
     return CosTime.UTO.Ref;

   time_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/TIO/time:1.0";

   function Is_A
     (Self : Ref;
      Logical_Type_Id : PolyORB.Std.String)
     return CORBA.Boolean;

   package Convert_Forward is
     new CosTime.TIO_Forward.Convert
        (Ref);

private
   function Is_A
     (Logical_Type_Id : PolyORB.Std.String)
     return CORBA.Boolean;

end CosTime.TIO;
