+++ /dev/null
-------------------------------------------------------------------------------
--- --
--- GNAT RUNTIME COMPONENTS --
--- --
--- ADA.NUMERICS.GENERIC_ELEMENTARY_FUNCTIONS --
--- --
--- S p e c --
--- --
--- $Revision: 1.1.16.1 $
--- --
--- This specification is adapted from the Ada Reference Manual for use with --
--- GNAT. In accordance with the copyright of that document, you can freely --
--- copy and modify this specification, provided that if you redistribute a --
--- modified version, any changes that you have made are clearly indicated. --
--- --
-------------------------------------------------------------------------------
-
-generic
- type Float_Type is digits <>;
-
-package Ada.Numerics.Generic_Elementary_Functions is
-pragma Pure (Generic_Elementary_Functions);
-
- function Sqrt (X : Float_Type'Base) return Float_Type'Base;
- function Log (X : Float_Type'Base) return Float_Type'Base;
- function Log (X, Base : Float_Type'Base) return Float_Type'Base;
- function Exp (X : Float_Type'Base) return Float_Type'Base;
- function "**" (Left, Right : Float_Type'Base) return Float_Type'Base;
-
- function Sin (X : Float_Type'Base) return Float_Type'Base;
- function Sin (X, Cycle : Float_Type'Base) return Float_Type'Base;
- function Cos (X : Float_Type'Base) return Float_Type'Base;
- function Cos (X, Cycle : Float_Type'Base) return Float_Type'Base;
- function Tan (X : Float_Type'Base) return Float_Type'Base;
- function Tan (X, Cycle : Float_Type'Base) return Float_Type'Base;
- function Cot (X : Float_Type'Base) return Float_Type'Base;
- function Cot (X, Cycle : Float_Type'Base) return Float_Type'Base;
-
- function Arcsin (X : Float_Type'Base) return Float_Type'Base;
- function Arcsin (X, Cycle : Float_Type'Base) return Float_Type'Base;
- function Arccos (X : Float_Type'Base) return Float_Type'Base;
- function Arccos (X, Cycle : Float_Type'Base) return Float_Type'Base;
-
- function Arctan
- (Y : Float_Type'Base;
- X : Float_Type'Base := 1.0)
- return Float_Type'Base;
-
- function Arctan
- (Y : Float_Type'Base;
- X : Float_Type'Base := 1.0;
- Cycle : Float_Type'Base)
- return Float_Type'Base;
-
- function Arccot
- (X : Float_Type'Base;
- Y : Float_Type'Base := 1.0)
- return Float_Type'Base;
-
- function Arccot
- (X : Float_Type'Base;
- Y : Float_Type'Base := 1.0;
- Cycle : Float_Type'Base)
- return Float_Type'Base;
-
- function Sinh (X : Float_Type'Base) return Float_Type'Base;
- function Cosh (X : Float_Type'Base) return Float_Type'Base;
- function Tanh (X : Float_Type'Base) return Float_Type'Base;
- function Coth (X : Float_Type'Base) return Float_Type'Base;
- function Arcsinh (X : Float_Type'Base) return Float_Type'Base;
- function Arccosh (X : Float_Type'Base) return Float_Type'Base;
- function Arctanh (X : Float_Type'Base) return Float_Type'Base;
- function Arccoth (X : Float_Type'Base) return Float_Type'Base;
-
-end Ada.Numerics.Generic_Elementary_Functions;