3.5.9 Fixed Point Types
A 
fixed point type is either an ordinary fixed point type, or a decimal 
fixed point type. 
The error bound of a fixed point 
type is specified as an absolute value, called the 
delta of the 
fixed point type. 
 
Syntax
Name Resolution Rules
For a type defined by a 
fixed_point_definition, 
the 
delta of the type is specified by the value of the 
expression 
given after the reserved word 
delta; this 
expression 
is expected to be of any real type. 
For 
a type defined by a 
decimal_fixed_point_definition 
(a 
decimal fixed point type), the number of significant decimal 
digits for its first subtype (the 
digits of the first subtype) 
is specified by the 
expression 
given after the reserved word 
digits; this 
expression 
is expected to be of any integer type.
 
Legality Rules
The set of values of a fixed 
point type comprise the integral multiples of a number called the 
small 
of the type.
 The 
machine numbers of a fixed 
point type are the values of the type that can be represented exactly 
in every unconstrained variable of the type. 
For 
a type defined by an 
ordinary_fixed_point_definition 
(an 
ordinary fixed point type), the 
small may be specified 
by an 
attribute_definition_clause 
(see 
13.3); if so specified, it shall be no 
greater than the 
delta of the type. If not specified, the 
small 
of an ordinary fixed point type is an implementation-defined power of 
two less than or equal to the 
delta. 
 
For a decimal fixed point type, the 
small 
equals the 
delta; the 
delta shall be a power of 10. If 
a 
real_range_specification 
is given, both bounds of the range shall be in the range –(10**
digits–1)*
delta 
.. +(10**
digits–1)*
delta.
 
A 
fixed_point_definition 
is illegal if the implementation does not support a fixed point type 
with the given 
small and specified range or 
digits. 
 
Static Semantics
The base range (see 
3.5) 
of a fixed point type is symmetric around zero, except possibly for an 
extra negative value in some implementations.
 
An 
ordinary_fixed_point_definition 
defines an ordinary fixed point type whose base range includes at least 
all multiples of 
small that are between the bounds specified in 
the 
real_range_specification. 
The base range of the type does not necessarily include the specified 
bounds themselves. 
An 
ordinary_fixed_point_definition 
also defines a constrained first subtype of the type, with each bound 
of its range given by the closer to zero of: 
 
the corresponding bound of the base range. 
Dynamic Semantics
 For a 
digits_constraint 
on a decimal fixed point subtype with a given 
delta, if it does 
not have a 
range_constraint, 
then it specifies an implicit range –(10**
D–1)*
delta 
.. +(10**
D–1)*
delta, where 
D is the value 
of the 
simple_expression. 
A 
digits_constraint 
is 
compatible with a decimal fixed point subtype if the value 
of the 
simple_expression 
is no greater than the 
digits of the subtype, and if it specifies 
(explicitly or implicitly) a range that is compatible with the subtype. 
 
 The elaboration of a 
digits_constraint 
consists of the elaboration of the 
range_constraint, 
if any. 
If a 
range_constraint 
is given, a check is made that the bounds of the range are both in the 
range –(10**
D–1)*
delta .. +(10**
D–1)*
delta, 
where 
D is the value of the (static) 
simple_expression 
given after the reserved word 
digits. 
If this 
check fails, Constraint_Error is raised. 
 
Implementation Requirements
The implementation shall support at least 24 bits 
of precision (including the sign bit) for fixed point types. 
Implementation Permissions
Implementations are permitted to support only smalls 
that are a power of two. In particular, all decimal fixed point type 
declarations can be disallowed. Note however that conformance with the 
Information Systems Annex requires support for decimal smalls, 
and decimal fixed point type declarations with digits up to at 
least 18. 
44  The base 
range of an ordinary fixed point type need not include the specified 
bounds themselves so that the range specification can be given in a natural 
way, such as: 
   type Fraction is delta 2.0**(-15) range -1.0 .. 1.0;
  
With 2's complement hardware, such a type could have 
a signed 16-bit representation, using 1 bit for the sign and 15 bits 
for fraction, resulting in a base range of –1.0 .. 1.0–2.0**(–15). 
Examples
Examples of fixed 
point types and subtypes: 
type Volt is delta 0.125 range 0.0 .. 255.0;
  -- A pure fraction which requires all the available
  -- space in a word can be declared as the type Fraction:
type Fraction is delta System.Fine_Delta range -1.0 .. 1.0;
  -- Fraction'Last = 1.0 – System.Fine_Delta
type Money is delta 0.01 digits 15;  -- decimal fixed point
subtype Salary is Money digits 10;
  -- Money'Last = 10.0**13 – 0.01, Salary'Last = 10.0**8 – 0.01
Ada 2005 and 2012 Editions sponsored in part by Ada-Europe