with Candidates; generic Number_Of_Candidates : Positive; package Preferences is subtype Preference_Range is range 1 .. Number_Of_Candidates; type Preference_Array is array Preference_Range of Candidates.Extended_CandidateID; private end Preferences;