let titre_ic ~c ~n ~m =
        Graphics.set_window_title ("Projet Puzzle : m="^(string_of_int m)^", n="^(string_of_int n)^", c="^(string_of_int c))