Machine_Radix
may be specified for a decimal first subtype (see
3.5.9)
via an
attribute_definition_clause;
the expression of such a clause shall be static, and its value shall
be 2 or 10. A value of 2 implies a binary base range; a value of 10 implies
a decimal base range.
Packed decimal should be used as the internal representation
for objects of subtype S when S'Machine_Radix = 10.