ada Enumeration


Example

type Fruit is (Banana, Orange, Pear);

Choice : Fruit := Banana;

A character type is an enumeration that includes a character literal:

type Roman_Numeral is
    ('I', 'V', 'X', 'L', 'C', 'D', 'M', Unknown);`