class procedure Sort(var vector: TIntegerArray; descending: boolean = false);

This is Sort, a member of class IntegerVector.