---- | |
with Ada.Containers.Indefinite_Vectors; | |
package Predicate2.Containers is | |
subtype Count_Type is Ada.Containers.Count_Type; | |
package Value_Type_List is | |
new Ada.Containers.Indefinite_Vectors (Positive, Value_Type); | |
subtype Value_List is Value_Type_List.Vector; | |
end Predicate2.Containers; |