pragma Style_Checks ("NM32766");
pragma Wide_Character_Encoding (Brackets);
pragma Warnings (Off, "use of an anonymous access type allocator");

---------------------------------------------------
--  This file has been generated automatically from
--  /pbulk/work/net/ada-polyorb/work/PolyORB-25.0/idls/cos/time/CosTime.idl
--  by IAC (IDL to Ada Compiler) 25.0w (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 CORBA;
pragma Elaborate_All (CORBA);

package CosTime.UTO is

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

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

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

   function get_time
     (Self : Ref)
     return TimeBase.TimeT;

   inaccuracy_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/inaccuracy:1.0";

   function get_inaccuracy
     (Self : Ref)
     return TimeBase.InaccuracyT;

   tdf_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/tdf:1.0";

   function get_tdf
     (Self : Ref)
     return TimeBase.TdfT;

   utc_time_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/utc_time:1.0";

   function get_utc_time
     (Self : Ref)
     return TimeBase.UtcT;

   function absolute_time
     (Self : Ref)
     return CosTime.UTO.Ref'Class;

   absolute_time_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/absolute_time:1.0";

   function compare_time
     (Self : Ref;
      comparison_type : CosTime.ComparisonType;
      uto : CosTime.UTO.Ref'Class)
     return CosTime.TimeComparison;

   compare_time_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/compare_time:1.0";

   function time_to_interval
     (Self : Ref;
      uto : CosTime.UTO.Ref'Class)
     return CosTime.TIO_Forward.Ref;

   time_to_interval_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/time_to_interval:1.0";

   function interval
     (Self : Ref)
     return CosTime.TIO_Forward.Ref;

   interval_Repository_Id : constant PolyORB.Std.String :=
     "IDL:omg.org/CosTime/UTO/interval:1.0";

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

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

end CosTime.UTO;
