let print_piece x =
        print_int x.d; print_string " ";
        print_int x.h; print_string " ";
        print_int x.g; print_string " ";
        print_int x.b;(* pour ne pas mettre d'espace en fin de ligne *)
        print_string "\n"