74 lines
3.5 KiB
Ada
74 lines
3.5 KiB
Ada
------------------------------------------------------------------------------
|
|
-- --
|
|
-- GNAT RUN-TIME COMPONENTS --
|
|
-- --
|
|
-- ADA.NUMERICS.GENERIC_ELEMENTARY_FUNCTIONS --
|
|
-- --
|
|
-- S p e c --
|
|
-- --
|
|
-- This specification is derived 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;
|
|
|
|
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;
|