let printP_chrono_no mon_plateau = Graphics.set_window_title ("Projet Puzzle : resolution en cours depuis "^(Temps.temps_chrono ())); print_string ("\n Temps courant : "^(Temps.temps_chrono ()))