let generer_instance_solution ~n ~m ~c () =
        {ci = c; ni = n; mi = m; pi = (List.map kill_option2 (melanger_matrix_to_list (generer_plateau_solution ~n:n ~m:m ~c:c ()).p ()))}