eyeprolog 1.6.29 → 1.6.31

package/examples/check/deep-taxonomy-10.pl

@@ -1,12 +1,12 @@
-condition('C1', resolution, ok, 32).
-condition('C2', well_founded, ok, 49).
-condition('C3', justification, ok, 49).
-condition('C4', coverage, ok, 78).
-condition('C5', re_decision, ok, 17).
-steps(49).
-verified(32).
+condition('C1', resolution, ok, 12).
+condition('C2', well_founded, ok, 12).
+condition('C3', justification, ok, 12).
+condition('C4', coverage, ok, 12).
+condition('C5', re_decision, ok, 0).
+steps(12).
+verified(12).
 recomputed(0).
-composed(17).
+composed(0).
 trusted(0).
-claims(16).
+claims(1).
 verdict(checked).

package/examples/check/deep-taxonomy-100.pl

@@ -1,12 +1,12 @@
-condition('C1', resolution, ok, 122).
-condition('C2', well_founded, ok, 139).
-condition('C3', justification, ok, 139).
-condition('C4', coverage, ok, 168).
-condition('C5', re_decision, ok, 17).
-steps(139).
-verified(122).
+condition('C1', resolution, ok, 102).
+condition('C2', well_founded, ok, 102).
+condition('C3', justification, ok, 102).
+condition('C4', coverage, ok, 102).
+condition('C5', re_decision, ok, 0).
+steps(102).
+verified(102).
 recomputed(0).
-composed(17).
+composed(0).
 trusted(0).
-claims(16).
+claims(1).
 verdict(checked).

package/examples/check/deep-taxonomy-1000.pl

@@ -1,18 +1,12 @@
-condition('C1', resolution, ok, 20).
-condition('C2', well_founded, ok, 37).
-condition('C3', justification, ok, 37).
-condition('C4', coverage, ok, 60).
-condition('C5', re_decision, ok, 11).
-obligation(builtin, theory_scoped, once(a(ind, a2))).
-obligation(builtin, theory_scoped, once(a(ind, n500))).
-obligation(builtin, theory_scoped, once(a(ind, i500))).
-obligation(builtin, theory_scoped, once(a(ind, j500))).
-obligation(builtin, theory_scoped, once(a(ind, n999))).
-obligation(builtin, theory_scoped, once(a(ind, n1000))).
-steps(37).
-verified(20).
+condition('C1', resolution, ok, 1002).
+condition('C2', well_founded, ok, 1002).
+condition('C3', justification, ok, 1002).
+condition('C4', coverage, ok, 1002).
+condition('C5', re_decision, ok, 0).
+steps(1002).
+verified(1002).
 recomputed(0).
-composed(11).
-trusted(6).
-claims(16).
-verdict(checked_with_obligations).
+composed(0).
+trusted(0).
+claims(1).
+verdict(checked).

package/examples/check/deep-taxonomy-10000.pl

@@ -1,18 +1,12 @@
-condition('C1', resolution, ok, 20).
-condition('C2', well_founded, ok, 37).
-condition('C3', justification, ok, 37).
-condition('C4', coverage, ok, 60).
-condition('C5', re_decision, ok, 11).
-obligation(builtin, theory_scoped, once(a(ind, a2))).
-obligation(builtin, theory_scoped, once(a(ind, n5000))).
-obligation(builtin, theory_scoped, once(a(ind, i5000))).
-obligation(builtin, theory_scoped, once(a(ind, j5000))).
-obligation(builtin, theory_scoped, once(a(ind, n9999))).
-obligation(builtin, theory_scoped, once(a(ind, n10000))).
-steps(37).
-verified(20).
+condition('C1', resolution, ok, 10002).
+condition('C2', well_founded, ok, 10002).
+condition('C3', justification, ok, 10002).
+condition('C4', coverage, ok, 10002).
+condition('C5', re_decision, ok, 0).
+steps(10002).
+verified(10002).
 recomputed(0).
-composed(11).
-trusted(6).
-claims(16).
-verdict(checked_with_obligations).
+composed(0).
+trusted(0).
+claims(1).
+verdict(checked).

package/examples/check/deep-taxonomy-100000.pl

@@ -1,18 +1,12 @@
-condition('C1', resolution, ok, 20).
-condition('C2', well_founded, ok, 37).
-condition('C3', justification, ok, 37).
-condition('C4', coverage, ok, 60).
-condition('C5', re_decision, ok, 11).
-obligation(builtin, theory_scoped, once(a(ind, a2))).
-obligation(builtin, theory_scoped, once(a(ind, n50000))).
-obligation(builtin, theory_scoped, once(a(ind, i50000))).
-obligation(builtin, theory_scoped, once(a(ind, j50000))).
-obligation(builtin, theory_scoped, once(a(ind, n99999))).
-obligation(builtin, theory_scoped, once(a(ind, n100000))).
-steps(37).
-verified(20).
+condition('C1', resolution, ok, 100002).
+condition('C2', well_founded, ok, 100002).
+condition('C3', justification, ok, 100002).
+condition('C4', coverage, ok, 100002).
+condition('C5', re_decision, ok, 0).
+steps(100002).
+verified(100002).
 recomputed(0).
-composed(11).
-trusted(6).
-claims(16).
-verdict(checked_with_obligations).
+composed(0).
+trusted(0).
+claims(1).
+verdict(checked).

package/examples/deep-taxonomy-10.pl

@@ -5,18 +5,7 @@
 % the next taxonomy class together with two side labels.
 % =============================================================================================================================
 
-% Output declarations: host-supplied goals select the relations written to this example's golden output.
-%% ?- holds_result(X0, X1).
-
-%% ?- answer(X0, X1).
-
-%% ?- reason(X0, X1).
-
-%% ?- result(X0, X1).
-
-%% ?- checkPassed(X0, X1).
-
-%% ?- arc(X0, X1).
+%% ?- a(ind, a2).
 
 
 :- discontiguous(a/2).
@@ -64,51 +53,3 @@ a(X, j9) :- a(X, n8).
 a(X, n10) :- a(X, n9).
 a(X, i10) :- a(X, n9).
 a(X, j10) :- a(X, n9).
-
-% ARC checks
-
-arc(check1, "C1 OK - the starting classification n0 is present.") :-
- once(a(ind, n0)).
-
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.") :-
- once(a(ind, n1)),
- once(a(ind, i1)),
- once(a(ind, j1)).
-
-arc(check3, "C3 OK - the chain reaches the midpoint n5 and still carries both side-label branches.") :-
- once(a(ind, n5)),
- once(a(ind, i5)),
- once(a(ind, j5)).
-
-arc(check4, "C4 OK - the final taxonomy step from n9 to n10 was completed.") :-
- once(a(ind, n9)),
- once(a(ind, n10)).
-
-arc(check5, "C5 OK - once n10 is reached, the terminal class a2 is derived.") :-
- once(a(ind, n10)),
- once(a(ind, a2)).
-
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-% ARC report
-
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n10 and then as a2.") :-
- once(holds_result(test, true)).
-
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-10 chain: each rule advances one taxonomy level and adds the matching side labels.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-checkPassed(report, Check) :-
- arc(Check, _message).
-
-result(report, success) :-
- once(holds_result(test, true)),
- once(arc(check1, _c1)),
- once(arc(check2, _c2)),
- once(arc(check3, _c3)),
- once(arc(check4, _c4)),
- once(arc(check5, _c5)),
- once(arc(check6, _c6)).

package/examples/deep-taxonomy-100.pl

@@ -5,18 +5,7 @@
 % the next taxonomy class together with two side labels.
 % =============================================================================================================================
 
-% Output declarations: host-supplied goals select the relations written to this example's golden output.
-%% ?- holds_result(X0, X1).
-
-%% ?- answer(X0, X1).
-
-%% ?- reason(X0, X1).
-
-%% ?- result(X0, X1).
-
-%% ?- checkPassed(X0, X1).
-
-%% ?- arc(X0, X1).
+%% ?- a(ind, a2).
 
 
 :- discontiguous(a/2).
@@ -334,51 +323,3 @@ a(X, j99) :- a(X, n98).
 a(X, n100) :- a(X, n99).
 a(X, i100) :- a(X, n99).
 a(X, j100) :- a(X, n99).
-
-% ARC checks
-
-arc(check1, "C1 OK - the starting classification n0 is present.") :-
- once(a(ind, n0)).
-
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.") :-
- once(a(ind, n1)),
- once(a(ind, i1)),
- once(a(ind, j1)).
-
-arc(check3, "C3 OK - the chain reaches the midpoint n50 and still carries both side-label branches.") :-
- once(a(ind, n50)),
- once(a(ind, i50)),
- once(a(ind, j50)).
-
-arc(check4, "C4 OK - the final taxonomy step from n99 to n100 was completed.") :-
- once(a(ind, n99)),
- once(a(ind, n100)).
-
-arc(check5, "C5 OK - once n100 is reached, the terminal class a2 is derived.") :-
- once(a(ind, n100)),
- once(a(ind, a2)).
-
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-% ARC report
-
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n100 and then as a2.") :-
- once(holds_result(test, true)).
-
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-100 chain: each rule advances one taxonomy level and adds the matching side labels.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-checkPassed(report, Check) :-
- arc(Check, _message).
-
-result(report, success) :-
- once(holds_result(test, true)),
- once(arc(check1, _c1)),
- once(arc(check2, _c2)),
- once(arc(check3, _c3)),
- once(arc(check4, _c4)),
- once(arc(check5, _c5)),
- once(arc(check6, _c6)).

package/examples/deep-taxonomy-1000.pl

@@ -5,18 +5,7 @@
 % the next taxonomy class together with two side labels.
 % =============================================================================================================================
 
-% Output declarations: host-supplied goals select the relations written to this example's golden output.
-%% ?- holds_result(X0, X1).
-
-%% ?- answer(X0, X1).
-
-%% ?- reason(X0, X1).
-
-%% ?- result(X0, X1).
-
-%% ?- checkPassed(X0, X1).
-
-%% ?- arc(X0, X1).
+%% ?- a(ind, a2).
 
 
 :- discontiguous(a/2).
@@ -3034,51 +3023,3 @@ a(X, j999) :- a(X, n998).
 a(X, n1000) :- a(X, n999).
 a(X, i1000) :- a(X, n999).
 a(X, j1000) :- a(X, n999).
-
-% ARC checks
-
-arc(check1, "C1 OK - the starting classification n0 is present.") :-
- once(a(ind, n0)).
-
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.") :-
- once(a(ind, n1)),
- once(a(ind, i1)),
- once(a(ind, j1)).
-
-arc(check3, "C3 OK - the chain reaches the midpoint n500 and still carries both side-label branches.") :-
- once(a(ind, n500)),
- once(a(ind, i500)),
- once(a(ind, j500)).
-
-arc(check4, "C4 OK - the final taxonomy step from n999 to n1000 was completed.") :-
- once(a(ind, n999)),
- once(a(ind, n1000)).
-
-arc(check5, "C5 OK - once n1000 is reached, the terminal class a2 is derived.") :-
- once(a(ind, n1000)),
- once(a(ind, a2)).
-
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-% ARC report
-
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n1000 and then as a2.") :-
- once(holds_result(test, true)).
-
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-1000 chain: each rule advances one taxonomy level and adds the matching side labels.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-checkPassed(report, Check) :-
- arc(Check, _message).
-
-result(report, success) :-
- once(holds_result(test, true)),
- once(arc(check1, _c1)),
- once(arc(check2, _c2)),
- once(arc(check3, _c3)),
- once(arc(check4, _c4)),
- once(arc(check5, _c5)),
- once(arc(check6, _c6)).

package/examples/deep-taxonomy-10000.pl

@@ -5,18 +5,7 @@
 % the next taxonomy class together with two side labels.
 % =============================================================================================================================
 
-% Output declarations: host-supplied goals select the relations written to this example's golden output.
-%% ?- holds_result(X0, X1).
-
-%% ?- answer(X0, X1).
-
-%% ?- reason(X0, X1).
-
-%% ?- result(X0, X1).
-
-%% ?- checkPassed(X0, X1).
-
-%% ?- arc(X0, X1).
+%% ?- a(ind, a2).
 
 
 :- discontiguous(a/2).
@@ -30034,51 +30023,3 @@ a(X, j9999) :- a(X, n9998).
 a(X, n10000) :- a(X, n9999).
 a(X, i10000) :- a(X, n9999).
 a(X, j10000) :- a(X, n9999).
-
-% ARC checks
-
-arc(check1, "C1 OK - the starting classification n0 is present.") :-
- once(a(ind, n0)).
-
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.") :-
- once(a(ind, n1)),
- once(a(ind, i1)),
- once(a(ind, j1)).
-
-arc(check3, "C3 OK - the chain reaches the midpoint n5000 and still carries both side-label branches.") :-
- once(a(ind, n5000)),
- once(a(ind, i5000)),
- once(a(ind, j5000)).
-
-arc(check4, "C4 OK - the final taxonomy step from n9999 to n10000 was completed.") :-
- once(a(ind, n9999)),
- once(a(ind, n10000)).
-
-arc(check5, "C5 OK - once n10000 is reached, the terminal class a2 is derived.") :-
- once(a(ind, n10000)),
- once(a(ind, a2)).
-
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-% ARC report
-
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n10000 and then as a2.") :-
- once(holds_result(test, true)).
-
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-10000 chain: each rule advances one taxonomy level and adds the matching side labels.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-checkPassed(report, Check) :-
- arc(Check, _message).
-
-result(report, success) :-
- once(holds_result(test, true)),
- once(arc(check1, _c1)),
- once(arc(check2, _c2)),
- once(arc(check3, _c3)),
- once(arc(check4, _c4)),
- once(arc(check5, _c5)),
- once(arc(check6, _c6)).

package/examples/deep-taxonomy-100000.pl

@@ -5,18 +5,7 @@
 % the next taxonomy class together with two side labels.
 % =============================================================================================================================
 
-% Output declarations: host-supplied goals select the relations written to this example's golden output.
-%% ?- holds_result(X0, X1).
-
-%% ?- answer(X0, X1).
-
-%% ?- reason(X0, X1).
-
-%% ?- result(X0, X1).
-
-%% ?- checkPassed(X0, X1).
-
-%% ?- arc(X0, X1).
+%% ?- a(ind, a2).
 
 
 % Program structure: facts set up the scenario, and rules derive the queried conclusions.
@@ -27,7 +16,6 @@ a(ind, n0).
 % terminal rule
 
 % Derivation rules: each rule below contributes one logical step toward the displayed results.
-holds_result(test, true) :- once(a(ind, a2)).
 a(X, a2) :- a(X, n100000).
 
 % Adjacent N3-style taxonomy rules.
@@ -300032,51 +300020,3 @@ a(X, j99999) :- a(X, n99998).
 a(X, n100000) :- a(X, n99999).
 a(X, i100000) :- a(X, n99999).
 a(X, j100000) :- a(X, n99999).
-
-% ARC checks
-
-arc(check1, "C1 OK - the starting classification n0 is present.") :-
- once(a(ind, n0)).
-
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.") :-
- once(a(ind, n1)),
- once(a(ind, i1)),
- once(a(ind, j1)).
-
-arc(check3, "C3 OK - the chain reaches the midpoint n50000 and still carries both side-label branches.") :-
- once(a(ind, n50000)),
- once(a(ind, i50000)),
- once(a(ind, j50000)).
-
-arc(check4, "C4 OK - the final taxonomy step from n99999 to n100000 was completed.") :-
- once(a(ind, n99999)),
- once(a(ind, n100000)).
-
-arc(check5, "C5 OK - once n100000 is reached, the terminal class a2 is derived.") :-
- once(a(ind, n100000)),
- once(a(ind, a2)).
-
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-% ARC report
-
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n100000 and then as a2.") :-
- once(holds_result(test, true)).
-
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-100000 chain: each rule advances one taxonomy level and adds the matching side labels.") :-
- once(a(ind, a2)),
- once(holds_result(test, true)).
-
-checkPassed(report, Check) :-
- arc(Check, _message).
-
-result(report, success) :-
- once(holds_result(test, true)),
- once(arc(check1, _c1)),
- once(arc(check2, _c2)),
- once(arc(check3, _c3)),
- once(arc(check4, _c4)),
- once(arc(check5, _c5)),
- once(arc(check6, _c6)).

package/examples/output/deep-taxonomy-10.pl

@@ -1,16 +1 @@
-holds_result(test, true).
-arc(check1, "C1 OK - the starting classification n0 is present.").
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.").
-arc(check3, "C3 OK - the chain reaches the midpoint n5 and still carries both side-label branches.").
-arc(check4, "C4 OK - the final taxonomy step from n9 to n10 was completed.").
-arc(check5, "C5 OK - once n10 is reached, the terminal class a2 is derived.").
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.").
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n10 and then as a2.").
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-10 chain: each rule advances one taxonomy level and adds the matching side labels.").
-checkPassed(report, check1).
-checkPassed(report, check2).
-checkPassed(report, check3).
-checkPassed(report, check4).
-checkPassed(report, check5).
-checkPassed(report, check6).
-result(report, success).
+a(ind, a2).

package/examples/output/deep-taxonomy-100.pl

@@ -1,16 +1 @@
-holds_result(test, true).
-arc(check1, "C1 OK - the starting classification n0 is present.").
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.").
-arc(check3, "C3 OK - the chain reaches the midpoint n50 and still carries both side-label branches.").
-arc(check4, "C4 OK - the final taxonomy step from n99 to n100 was completed.").
-arc(check5, "C5 OK - once n100 is reached, the terminal class a2 is derived.").
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.").
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n100 and then as a2.").
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-100 chain: each rule advances one taxonomy level and adds the matching side labels.").
-checkPassed(report, check1).
-checkPassed(report, check2).
-checkPassed(report, check3).
-checkPassed(report, check4).
-checkPassed(report, check5).
-checkPassed(report, check6).
-result(report, success).
+a(ind, a2).

package/examples/output/deep-taxonomy-1000.pl

@@ -1,16 +1 @@
-holds_result(test, true).
-arc(check1, "C1 OK - the starting classification n0 is present.").
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.").
-arc(check3, "C3 OK - the chain reaches the midpoint n500 and still carries both side-label branches.").
-arc(check4, "C4 OK - the final taxonomy step from n999 to n1000 was completed.").
-arc(check5, "C5 OK - once n1000 is reached, the terminal class a2 is derived.").
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.").
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n1000 and then as a2.").
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-1000 chain: each rule advances one taxonomy level and adds the matching side labels.").
-checkPassed(report, check1).
-checkPassed(report, check2).
-checkPassed(report, check3).
-checkPassed(report, check4).
-checkPassed(report, check5).
-checkPassed(report, check6).
-result(report, success).
+a(ind, a2).

package/examples/output/deep-taxonomy-10000.pl

@@ -1,16 +1 @@
-holds_result(test, true).
-arc(check1, "C1 OK - the starting classification n0 is present.").
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.").
-arc(check3, "C3 OK - the chain reaches the midpoint n5000 and still carries both side-label branches.").
-arc(check4, "C4 OK - the final taxonomy step from n9999 to n10000 was completed.").
-arc(check5, "C5 OK - once n10000 is reached, the terminal class a2 is derived.").
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.").
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n10000 and then as a2.").
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-10000 chain: each rule advances one taxonomy level and adds the matching side labels.").
-checkPassed(report, check1).
-checkPassed(report, check2).
-checkPassed(report, check3).
-checkPassed(report, check4).
-checkPassed(report, check5).
-checkPassed(report, check6).
-result(report, success).
+a(ind, a2).

package/examples/output/deep-taxonomy-100000.pl

@@ -1,16 +1 @@
-holds_result(test, true).
-arc(check1, "C1 OK - the starting classification n0 is present.").
-arc(check2, "C2 OK - the first expansion produced n1 together with side labels i1 and j1.").
-arc(check3, "C3 OK - the chain reaches the midpoint n50000 and still carries both side-label branches.").
-arc(check4, "C4 OK - the final taxonomy step from n99999 to n100000 was completed.").
-arc(check5, "C5 OK - once n100000 is reached, the terminal class a2 is derived.").
-arc(check6, "C6 OK - the success flag is raised only after the terminal class a2 is present.").
-answer(report, "The test succeeds: starting from one individual classified as n0, the rules eventually classify it as n100000 and then as a2.").
-reason(report, "The adjacent rules mirror the Eyeling N3 deep-taxonomy-100000 chain: each rule advances one taxonomy level and adds the matching side labels.").
-checkPassed(report, check1).
-checkPassed(report, check2).
-checkPassed(report, check3).
-checkPassed(report, check4).
-checkPassed(report, check5).
-checkPassed(report, check6).
-result(report, success).
+a(ind, a2).