package sorting5 is
-- same subprograms as sorting but not in the same order
type integerList is array(natural range <>) of integer;

procedure selection_sort3(list : in out integerList ; nbElem : in integer);

procedure buble_sort3(list : in out integerList ; nbElem : in integer);

end sorting5;