1 + 1 -- 2
abs
(-10)*3 -- 30
constant
:= 1000;
MEGA : constant
:= KILO*KILO; -- 1_000_000
LONG : constant
:= FLOAT'DIGITS*2;
constant
:= PI/2; -- see 3.2.2
DEG_TO_RAD : constant
:= HALF_PI/90;
RAD_TO_DEG : constant
:= 1.0/DEG_TO_RAD;
-- equivalent to 1.0/((3.14159_26536/2)/90)