diff options
Diffstat (limited to 'gcc-4.2.1/gcc/ada/a-ngelfu.ads')
-rw-r--r-- | gcc-4.2.1/gcc/ada/a-ngelfu.ads | 73 |
1 files changed, 0 insertions, 73 deletions
diff --git a/gcc-4.2.1/gcc/ada/a-ngelfu.ads b/gcc-4.2.1/gcc/ada/a-ngelfu.ads deleted file mode 100644 index c115411ca..000000000 --- a/gcc-4.2.1/gcc/ada/a-ngelfu.ads +++ /dev/null @@ -1,73 +0,0 @@ ------------------------------------------------------------------------------- --- -- --- GNAT RUN-TIME COMPONENTS -- --- -- --- ADA.NUMERICS.GENERIC_ELEMENTARY_FUNCTIONS -- --- -- --- S p e c -- --- -- --- 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; - - 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; |