let fail_recherche mon_instance () =
        Graphics.set_window_title "Projet Puzzle : resolution ECHOUEE (aucune solution n'a ete trouvee)";
        zenity_info "<b>Aucune solution n'a ete trouvee</b> a l'instance suivante qui a ete reaffichee dans la fenetre graphique";
        afficher_instance mon_instance;
        Graphics.set_window_title "Projet Puzzle : resolution ECHOUEE (aucune solution n'a ete trouvee)"