This commit is contained in:
Adrien Vannson 2022-05-10 13:42:17 +02:00
parent 98d525c58a
commit 07e7a6b4eb
No known key found for this signature in database
GPG Key ID: FE2E66FD978C1A55

View File

@ -148,7 +148,7 @@ let finalLam = !fill_holes [] in
if (typecheck [] finalLam ty) then
Printf.printf "Final proof :\n%s\n" (string_of_lam finalLam)
else (
Printf.printf "Invalid proof constructed !\n";
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"
)