]> matita.cs.unibo.it Git - fireball-separation.git/commitdiff
More problems
authoracondolu <andrea.condoluci@unibo.it>
Thu, 13 Jul 2017 16:53:50 +0000 (18:53 +0200)
committeracondolu <andrea.condoluci@unibo.it>
Thu, 13 Jul 2017 16:53:50 +0000 (18:53 +0200)
ocaml/problems.ml

index 8a1915c76769665e728098ae4ab636c8d4c9af4b..f586c5d9a34a9133bca8ab638bf32b3adb329655 100644 (file)
@@ -352,9 +352,9 @@ solve_many (List.map ((|>) ()) [
  o1; o2; o3; o4; o5; o6
 ]);;
 
-(*should_fail(fun () -> problem_of None ["BOT"] []);;
+should_fail(fun () -> problem_of None ["BOT"] []);;
 should_fail(fun () -> problem_of (Some"x y") ["x BOMB"] []);;
-should_fail(fun () -> problem_of (Some"x y z") ["x BOMB z"; "x y y"] []);;*)
+should_fail(fun () -> problem_of (Some"x y z") ["x BOMB z"; "x y y"] []);;
 
 solve_many [
  problem_of