clause(Lisp): "[]"(if, "[]"($c, "=", tocons, "()"($list)), and, "[]"($e, "=", iter, $c), then, "[]"($e, in, $c)) => [l("if *", l("[]", "$c", "=", "tocons", l("()", "$list"))), l("and *", l("[]", "$e", "=", "iter", "$c")), l("then *", l("[]", "$e", "in", "$c"))] clause(Lisp): "[]"(if, $a, then, "[]"($a, or, $b)) => [l("if *", "$a"), l("then *", l("[]", "$a", "or", "$b"))] clause(Lisp): "[]"(if, $b, then, "[]"($a, or, $b)) => [l("if *", "$b"), l("then *", l("[]", "$a", "or", "$b"))] clause(Lisp): "[]"($head, "=", iter, "[]"(cons, $head, $tail)) => null clause(Lisp): "[]"(if, "[]"($x, "=", iter, $tail), then, "[]"($x, "=", iter, "[]"(cons, $head, $tail))) => [l("if *", l("[]", "$x", "=", "iter", "$tail")), l("then *", l("[]", "$x", "=", "iter", l("[]", "cons", "$head", "$tail")))] clause(Lisp): "[]"(if, $x, then, "[]"(verify, "[]"($x, should, be, true))) => [l("if *", "$x"), l("then *", l("[]", "verify", l("[]", "$x", "should", "be", "true")))] clause(Lisp): "[]"(if, "[]"($a, "=", intmul, "()"("[]"($b, ",", $c))), then, "[]"($a, "=", smartmul, "()"("[]"($b, ",", $c)))) => [l("if *", l("[]", "$a", "=", "intmul", l("()", l("[]", "$b", ",", "$c")))), l("then *", l("[]", "$a", "=", "smartmul", l("()", l("[]", "$b", ",", "$c"))))] clause(Lisp): "[]"(if, "[]"($b, "=", intdiv, "()"("[]"($a, ",", $c))), then, "[]"($a, "=", smartmul, "()"("[]"($b, ",", $c)))) => [l("if *", l("[]", "$b", "=", "intdiv", l("()", l("[]", "$a", ",", "$c")))), l("then *", l("[]", "$a", "=", "smartmul", l("()", l("[]", "$b", ",", "$c"))))] clause(Lisp): "[]"(if, "[]"($c, "=", intdiv, "()"("[]"($a, ",", $b))), then, "[]"($a, "=", smartmul, "()"("[]"($b, ",", $c)))) => [l("if *", l("[]", "$c", "=", "intdiv", l("()", l("[]", "$a", ",", "$b")))), l("then *", l("[]", "$a", "=", "smartmul", l("()", l("[]", "$b", ",", "$c"))))] clause(Lisp): "[]"(if, "[]"(not, "()"($x)), then, "[]"(verify, "[]"($x, should, be, false))) => [l("if *", l("[]", "not", l("()", "$x"))), l("then *", l("[]", "verify", l("[]", "$x", "should", "be", "false")))] clause(Lisp): "[]"(if, $x, then, "()"($x)) => [l("if *", "$x"), l("then *", l("()", "$x"))] clause(Lisp): "[]"("\"and\"", is, a, fill, word) => null clause(Lisp): "[]"("\",\"", is, a, fill, word) => null clause(Lisp): "[]"("[]"(not, "()"(true)), should, be, false) => null clause(Lisp): "[]"(mrshutco, is, a, human) => [l("mrshutco *", "is"), l("a *", "human")] clause(Lisp): "[]"("[]"(not, "()"(false)), should, be, true) => null clause(Lisp): "[]"(if, $x, and, "!", and, false, then, "[]"(not, "()"($x))) => [l("if *", "$x"), l("and *", "!"), l("and *", "false"), l("then *", l("[]", "not", l("()", "$x")))] clause(Lisp): "[]"(not, "()"($x)) => [l("not *", l("()", "$x"))] clause(Lisp): "[]"(if, $a, and, $b, then, "[]"($a, and, $b)) => [l("if *", "$a"), l("and *", "$b"), l("then *", l("[]", "$a", "and", "$b"))] clause(Lisp): "[]"(if, "[]"($c, "=", tocons, "()"($list)), and, "[]"($e, "=", iter, $c), then, "[]"($e, is, in, list, $list)) => [l("if *", l("[]", "$c", "=", "tocons", l("()", "$list"))), l("and *", l("[]", "$e", "=", "iter", "$c")), l("then *", l("[]", "$e", "is", "in", "list", "$list"))] clause(Lisp): "[]"(feet, is, the, plural, of, foot) => [l("feet *", "is"), l("the *", "plural"), l("of *", "foot")] clause(Lisp): "[]"(bits, is, the, plural, of, bit) => [l("bits *", "is"), l("the *", "plural"), l("of *", "bit")] clause(Lisp): "[]"(lasagna, is, tasty) => null Starting on goal: Prolog$Goal(car=l("[]", "not", l("()", l("[]", "true", "or", "true")))) Goal arity 2: "[]"(not, "()"("[]"(true, or, true))) Trying clause: "[]"(verify, "[]"(_1, should, be, true)) :- _1 No match for clause. Trying clause: "[]"(verify, "[]"(_2, should, be, false)) :- "[]"(not, "()"(_2)) No match for clause. Trying clause: "[]"(not, "()"(_3)) :- _3; "!"; false Weird: Goal is variable New goal: "[]"(true, or, true); "!"; false Trying clause: nativeTest2 :- native No match for clause. Trying clause: nativeFail :- native No match for clause. Trying clause: "[]"(_4, "=", intmul, "()"("[]"(_5, ",", _6))) :- native No match for clause. Trying clause: "[]"(_7, "=", intdiv, "()"("[]"(_8, ",", _9))) :- native No match for clause. Trying clause: "[]"(_10, "=", intadd, "()"("[]"(_11, ",", _12))) :- native No match for clause. Trying clause: "[]"(_13, "=", intminus, "()"("[]"(_14, ",", _15))) :- native No match for clause. Trying clause: "[]"(_16, is, greater, than, _17) :- native No match for clause. Trying clause: "[]"(head, _18, exists, in, theory, _19) :- native No match for clause. Trying clause: "[]"(_20, "=", all, theory, names) :- native No match for clause. Trying clause: "[]"(_21, "=", tocons, "()"(_22)) :- native No match for clause. Trying clause: "[]"(_23, is, less, than, _24) :- native No match for clause. Trying clause: "[]"(_25, in, _26) :- "[]"(_26, "=", tocons, "()"(_27)); "[]"(_25, "=", iter, _26) No match for clause. Trying clause: "[]"(_28, or, _29) :- _28 Weird: Goal is variable New goal: true native! Trying clause: nativeTest2 :- native No match for clause. Trying clause: nativeFail :- native No match for clause. Trying clause: "[]"(_30, "=", intmul, "()"("[]"(_31, ",", _32))) :- native No match for clause. Trying clause: "[]"(_33, "=", intdiv, "()"("[]"(_34, ",", _35))) :- native No match for clause. Trying clause: "[]"(_36, "=", intadd, "()"("[]"(_37, ",", _38))) :- native No match for clause. Trying clause: "[]"(_39, "=", intminus, "()"("[]"(_40, ",", _41))) :- native No match for clause. Trying clause: "[]"(_42, is, greater, than, _43) :- native No match for clause. Trying clause: "[]"(head, _44, exists, in, theory, _45) :- native No match for clause. Trying clause: "[]"(_46, "=", all, theory, names) :- native No match for clause. Trying clause: "[]"(_47, "=", tocons, "()"(_48)) :- native No match for clause. Trying clause: "[]"(_49, is, less, than, _50) :- native No match for clause. Trying clause: "[]"(_51, in, _52) :- "[]"(_52, "=", tocons, "()"(_53)); "[]"(_51, "=", iter, _52) No match for clause. Trying clause: "[]"(_54, or, _55) :- _54 No match for clause. Trying clause: "[]"(_56, or, _57) :- _57 No match for clause. Trying clause: "[]"(_58, "=", iter, "[]"(cons, _58, _59)) No match for clause. Trying clause: "[]"(_60, "=", iter, "[]"(cons, _61, _62)) :- "[]"(_60, "=", iter, _62) No match for clause. Trying clause: "[]"(verify, "[]"(_63, should, be, true)) :- _63 No match for clause. Trying clause: "[]"(_64, "=", smartmul, "()"("[]"(_65, ",", _66))) :- "[]"(_64, "=", intmul, "()"("[]"(_65, ",", _66))) No match for clause. Trying clause: "[]"(_67, "=", smartmul, "()"("[]"(_68, ",", _69))) :- "[]"(_68, "=", intdiv, "()"("[]"(_67, ",", _69))) No match for clause. Trying clause: "[]"(_70, "=", smartmul, "()"("[]"(_71, ",", _72))) :- "[]"(_72, "=", intdiv, "()"("[]"(_70, ",", _71))) No match for clause. Trying clause: "[]"(verify, "[]"(_73, should, be, false)) :- "[]"(not, "()"(_73)) No match for clause. Trying clause: "()"(_74) :- _74 No match for clause. Trying clause: "[]"("\"and\"", is, a, fill, word) No match for clause. Trying clause: "[]"("\",\"", is, a, fill, word) No match for clause. Trying clause: "[]"("[]"(not, "()"(true)), should, be, false) No match for clause. Trying clause: "[]"(mrshutco, is, a, human) No match for clause. Trying clause: "[]"("[]"(not, "()"(false)), should, be, true) No match for clause. Trying clause: "[]"(not, "()"(_75)) :- _75; "!"; false No match for clause. Trying clause: "[]"(not, "()"(_76)) No match for clause. Trying clause: "[]"(_77, and, _78) :- _77; _78 No match for clause. Trying clause: "[]"(_79, is, in, list, _80) :- "[]"(_81, "=", tocons, "()"(_80)); "[]"(_79, "=", iter, _81) No match for clause. Trying clause: "[]"(feet, is, the, plural, of, foot) No match for clause. Trying clause: "[]"(bits, is, the, plural, of, bit) No match for clause. Trying clause: "[]"(lasagna, is, tasty) No match for clause. Trying clause: "[]"(_82, or, _83) :- _83 Weird: Goal is variable New goal: true native!