1------------------------------------------------------------------------------ 2-- -- 3-- GNAT RUNTIME COMPONENTS -- 4-- -- 5-- A D A . N U M E R I C S -- 6-- -- 7-- S p e c -- 8-- -- 9-- This specification is adapted from the Ada Reference Manual for use with -- 10-- GNAT. In accordance with the copyright of that document, you can freely -- 11-- copy and modify this specification, provided that if you redistribute a -- 12-- modified version, any changes that you have made are clearly indicated. -- 13-- -- 14------------------------------------------------------------------------------ 15 16 17package Ada.Numerics is 18pragma Pure (Numerics); 19 20 Argument_Error : exception; 21 22 Pi : constant := 23 3.14159_26535_89793_23846_26433_83279_50288_41971_69399_37511; 24 25 e : constant := 26 2.71828_18284_59045_23536_02874_71352_66249_77572_47093_69996; 27 28end Ada.Numerics; 29