Affichage des subgoals
This commit is contained in:
parent
5774bab7d8
commit
dc29a93934
3
main.ml
3
main.ml
@ -84,6 +84,9 @@ while !subgoals <> [] do
|
|||||||
(* Affichage des sous-buts *)
|
(* Affichage des sous-buts *)
|
||||||
Printf.printf "================\n";
|
Printf.printf "================\n";
|
||||||
Printf.printf "%s\n" (string_of_ty ty);
|
Printf.printf "%s\n" (string_of_ty ty);
|
||||||
|
List.iter (fun (ty, _) ->
|
||||||
|
Printf.printf "%s\n" (string_of_ty ty)
|
||||||
|
) !subgoals;
|
||||||
|
|
||||||
(* Lecture d'une tactique *)
|
(* Lecture d'une tactique *)
|
||||||
Printf.printf "What do you want to do?\n"
|
Printf.printf "What do you want to do?\n"
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user