let get_all_project_addresses () = 
  let alladd = List.flatten (List.map (get_group_project_addresses) !num_groups) in
    List.sort (compare) (remove_doubles alladd)