List.sort_uniq compare [1;2;3;2;3;4]