Mysaa/pieuvre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Indentation

Browse Source
This commit is contained in:
Adrien Vannson 2022-05-10 11:23:09 +02:00
parent 73984f4232
commit 29d7e67a00
No known key found for this signature in database
GPG Key ID: FE2E66FD978C1A55
1 changed files with 2 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
main.ml
View File

@ -135,16 +135,11 @@ while !subgoals <> [] do
done;
let finalLam = !fill_holes [] in
if (typecheck [] finalLam ty)
then
if (typecheck [] finalLam ty) then
Printf.printf "Final proof :\n%s\n" (string_of_lam finalLam)
else
(
else (
Printf.printf "Invalid proof constructed !\n";
Printf.printf "%s can't be typed with %s.\n" (string_of_lam finalLam) (string_of_ty ty);
Printf.printf "The whole development team of pieuvre is sorry for the damage eventually done by this error.\n"
)
;;