eyelang 1.3.8 → 1.4.0

package/examples/output/project-portfolio-optimization.pl

@@ -1,99 +1,6 @@
 bestPortfolio(portfolio2026, result(137, 75, 28, [solar, hvac, training, quality, recycling, cloud, security])).
-why(
-  bestPortfolio(portfolio2026, result(137, 75, 28, [solar, hvac, training, quality, recycling, cloud, security])),
-  proof(
-    goal(bestPortfolio(portfolio2026, result(137, 75, 28, [solar, hvac, training, quality, recycling, cloud, security]))),
-    by(rule("project-portfolio-optimization.pl", clause(19))),
-    bindings([binding("Value", 137), binding("Cost", 75), binding("Risk", 28), binding("Selected", [solar, hvac, training, quality, recycling, cloud, security]), binding("_Key", [137, -75, -28, [solar, hvac, training, quality, recycling, cloud, security]])]),
-    uses([
-      proof(
-        goal(aggregate_max([137, NegCost, NegRisk, [solar, hvac, training, quality, recycling, cloud, security]], result(137, 75, 28, [solar, hvac, training, quality, recycling, cloud, security]), scoredPortfolio([solar, hvac, training, quality, recycling, cloud, security], 137, 75, 28, NegCost, NegRisk), [137, -75, -28, [solar, hvac, training, quality, recycling, cloud, security]], result(137, 75, 28, [solar, hvac, training, quality, recycling, cloud, security]))),
-        by(builtin(aggregate_max, 5))
-      )
-    ])
-  )
-).
-
 lowRiskTarget(portfolio2026, result(126, 74, 23, [solar, battery, hvac, training, quality, cloud])).
-why(
-  lowRiskTarget(portfolio2026, result(126, 74, 23, [solar, battery, hvac, training, quality, cloud])),
-  proof(
-    goal(lowRiskTarget(portfolio2026, result(126, 74, 23, [solar, battery, hvac, training, quality, cloud]))),
-    by(rule("project-portfolio-optimization.pl", clause(20))),
-    bindings([binding("Value", 126), binding("Cost", 74), binding("Risk", 23), binding("Selected", [solar, battery, hvac, training, quality, cloud]), binding("Target", 125), binding("_Key", [23, 74, [solar, battery, hvac, training, quality, cloud]])]),
-    uses([
-      proof(
-        goal(targetValue(portfolio2026, 125)),
-        by(fact("project-portfolio-optimization.pl", clause(9)))
-      ),
-      proof(
-        goal(aggregate_min([23, 74, [solar, battery, hvac, training, quality, cloud]], result(126, 74, 23, [solar, battery, hvac, training, quality, cloud]), targetPortfolio(125, [solar, battery, hvac, training, quality, cloud], 126, 74, 23), [23, 74, [solar, battery, hvac, training, quality, cloud]], result(126, 74, 23, [solar, battery, hvac, training, quality, cloud]))),
-        by(builtin(aggregate_min, 5))
-      )
-    ])
-  )
-).
-
 feasibleCount(portfolio2026, 1390).
-why(
-  feasibleCount(portfolio2026, 1390),
-  proof(
-    goal(feasibleCount(portfolio2026, 1390)),
-    by(rule("project-portfolio-optimization.pl", clause(21))),
-    bindings([binding("Count", 1390)]),
-    uses([
-      proof(
-        goal(countall(feasiblePortfolio(_Selected, _Value, _Cost, _Risk), 1390)),
-        by(builtin(countall, 2))
-      )
-    ])
-  )
-).
-
 projectCount(portfolio2026, 12).
-why(
-  projectCount(portfolio2026, 12),
-  proof(
-    goal(projectCount(portfolio2026, 12)),
-    by(rule("project-portfolio-optimization.pl", clause(22))),
-    bindings([binding("Count", 12)]),
-    uses([
-      proof(
-        goal(countall(project(_Name, _Value, _Cost, _Risk), 12)),
-        by(builtin(countall, 2))
-      )
-    ])
-  )
-).
-
 totalAvailableValue(portfolio2026, 268).
-why(
-  totalAvailableValue(portfolio2026, 268),
-  proof(
-    goal(totalAvailableValue(portfolio2026, 268)),
-    by(rule("project-portfolio-optimization.pl", clause(23))),
-    bindings([binding("Total", 268)]),
-    uses([
-      proof(
-        goal(sumall(Value, project(_Name, Value, _Cost, _Risk), 268)),
-        by(builtin(sumall, 3))
-      )
-    ])
-  )
-).
-
 note(portfolio2026, "aggregate builtins combine with pruning and memoization to avoid sorted candidate bags").
-why(
-  note(portfolio2026, "aggregate builtins combine with pruning and memoization to avoid sorted candidate bags"),
-  proof(
-    goal(note(portfolio2026, "aggregate builtins combine with pruning and memoization to avoid sorted candidate bags")),
-    by(rule("project-portfolio-optimization.pl", clause(24))),
-    uses([
-      proof(
-        goal(eq(ok, ok)),
-        by(builtin(eq, 2))
-      )
-    ])
-  )
-).
-

package/examples/output/proof-contrapositive.pl

@@ -1,78 +1,3 @@
 refutes(proof1, raining).
-why(
-  refutes(proof1, raining),
-  proof(
-    goal(refutes(proof1, raining)),
-    by(rule("proof-contrapositive.pl", clause(7))),
-    uses([
-      proof(
-        goal(false(raining)),
-        by(rule("proof-contrapositive.pl", clause(6))),
-        bindings([binding("A", raining), binding("B", wet_ground)]),
-        uses([
-          proof(
-            goal(implies(raining, wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(4)))
-          ),
-          proof(
-            goal(false(wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(5)))
-          )
-        ])
-      )
-    ])
-  )
-).
-
 method(proof1, contrapositive).
-why(
-  method(proof1, contrapositive),
-  proof(
-    goal(method(proof1, contrapositive)),
-    by(rule("proof-contrapositive.pl", clause(8))),
-    uses([
-      proof(
-        goal(false(raining)),
-        by(rule("proof-contrapositive.pl", clause(6))),
-        bindings([binding("A", raining), binding("B", wet_ground)]),
-        uses([
-          proof(
-            goal(implies(raining, wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(4)))
-          ),
-          proof(
-            goal(false(wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(5)))
-          )
-        ])
-      )
-    ])
-  )
-).
-
 reason(proof1, "if rain implies wet ground and the ground is not wet, then it is not raining").
-why(
-  reason(proof1, "if rain implies wet ground and the ground is not wet, then it is not raining"),
-  proof(
-    goal(reason(proof1, "if rain implies wet ground and the ground is not wet, then it is not raining")),
-    by(rule("proof-contrapositive.pl", clause(9))),
-    uses([
-      proof(
-        goal(false(raining)),
-        by(rule("proof-contrapositive.pl", clause(6))),
-        bindings([binding("A", raining), binding("B", wet_ground)]),
-        uses([
-          proof(
-            goal(implies(raining, wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(4)))
-          ),
-          proof(
-            goal(false(wet_ground)),
-            by(fact("proof-contrapositive.pl", clause(5)))
-          )
-        ])
-      )
-    ])
-  )
-).
-

package/examples/output/quadratic-formula.pl

@@ -1,460 +1,6 @@
 discriminant(eq1, 1.0).
-why(
-  discriminant(eq1, 1.0),
-  proof(
-    goal(discriminant(eq1, 1.0)),
-    by(rule("quadratic-formula.pl", clause(5))),
-    bindings([binding("Case", eq1), binding("D", 1.0), binding("A", 1.0), binding("B", -5.0), binding("C", 6.0), binding("B2", 25.0), binding("FourA", 4.0), binding("FourAC", 24.0)]),
-    uses([
-      proof(
-        goal(equation(eq1, 1.0, -5.0, 6.0)),
-        by(fact("quadratic-formula.pl", clause(3)))
-      ),
-      proof(
-        goal(pow(-5.0, 2.0, 25.0)),
-        by(builtin(pow, 3))
-      ),
-      proof(
-        goal(mul(4.0, 1.0, 4.0)),
-        by(builtin(mul, 3))
-      ),
-      proof(
-        goal(mul(4.0, 6.0, 24.0)),
-        by(builtin(mul, 3))
-      ),
-      proof(
-        goal(sub(25.0, 24.0, 1.0)),
-        by(builtin(sub, 3))
-      )
-    ])
-  )
-).
-
 discriminant(eq2, 64.0).
-why(
-  discriminant(eq2, 64.0),
-  proof(
-    goal(discriminant(eq2, 64.0)),
-    by(rule("quadratic-formula.pl", clause(5))),
-    bindings([binding("Case", eq2), binding("D", 64.0), binding("A", 2.0), binding("B", -4.0), binding("C", -6.0), binding("B2", 16.0), binding("FourA", 8.0), binding("FourAC", -48.0)]),
-    uses([
-      proof(
-        goal(equation(eq2, 2.0, -4.0, -6.0)),
-        by(fact("quadratic-formula.pl", clause(4)))
-      ),
-      proof(
-        goal(pow(-4.0, 2.0, 16.0)),
-        by(builtin(pow, 3))
-      ),
-      proof(
-        goal(mul(4.0, 2.0, 8.0)),
-        by(builtin(mul, 3))
-      ),
-      proof(
-        goal(mul(8.0, -6.0, -48.0)),
-        by(builtin(mul, 3))
-      ),
-      proof(
-        goal(sub(16.0, -48.0, 64.0)),
-        by(builtin(sub, 3))
-      )
-    ])
-  )
-).
-
 root(eq1, 3.0).
-why(
-  root(eq1, 3.0),
-  proof(
-    goal(root(eq1, 3.0)),
-    by(rule("quadratic-formula.pl", clause(11))),
-    bindings([binding("Case", eq1), binding("Root", 3.0)]),
-    uses([
-      proof(
-        goal(root_plus(eq1, 3.0)),
-        by(rule("quadratic-formula.pl", clause(9))),
-        bindings([binding("Case", eq1), binding("Root", 3.0), binding("NB", 5.0), binding("S", 1.0), binding("Den", 2.0), binding("Numerator", 6.0)]),
-        uses([
-          proof(
-            goal(negative_b(eq1, 5.0)),
-            by(rule("quadratic-formula.pl", clause(7))),
-            bindings([binding("Case", eq1), binding("NB", 5.0), binding("_A", 1.0), binding("B", -5.0), binding("_C", 6.0)]),
-            uses([
-              proof(
-                goal(equation(eq1, 1.0, -5.0, 6.0)),
-                by(fact("quadratic-formula.pl", clause(3)))
-              ),
-              proof(
-                goal(neg(-5.0, 5.0)),
-                by(builtin(neg, 2))
-              )
-            ])
-          ),
-          proof(
-            goal(sqrt_discriminant(eq1, 1.0)),
-            by(rule("quadratic-formula.pl", clause(6))),
-            bindings([binding("Case", eq1), binding("S", 1.0), binding("D", 1.0)]),
-            uses([
-              proof(
-                goal(discriminant(eq1, 1.0)),
-                by(rule("quadratic-formula.pl", clause(5))),
-                bindings([binding("Case", eq1), binding("D", 1.0), binding("A", 1.0), binding("B", -5.0), binding("C", 6.0), binding("B2", 25.0), binding("FourA", 4.0), binding("FourAC", 24.0)]),
-                uses([
-                  proof(
-                    goal(equation(eq1, 1.0, -5.0, 6.0)),
-                    by(fact("quadratic-formula.pl", clause(3)))
-                  ),
-                  proof(
-                    goal(pow(-5.0, 2.0, 25.0)),
-                    by(builtin(pow, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 1.0, 4.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 6.0, 24.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(sub(25.0, 24.0, 1.0)),
-                    by(builtin(sub, 3))
-                  )
-                ])
-              ),
-              proof(
-                goal(ge(1.0, 0.0)),
-                by(builtin(ge, 2))
-              ),
-              proof(
-                goal(pow(1.0, 0.5, 1.0)),
-                by(builtin(pow, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(denominator(eq1, 2.0)),
-            by(rule("quadratic-formula.pl", clause(8))),
-            bindings([binding("Case", eq1), binding("Den", 2.0), binding("A", 1.0), binding("_B", -5.0), binding("_C", 6.0)]),
-            uses([
-              proof(
-                goal(equation(eq1, 1.0, -5.0, 6.0)),
-                by(fact("quadratic-formula.pl", clause(3)))
-              ),
-              proof(
-                goal(mul(2.0, 1.0, 2.0)),
-                by(builtin(mul, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(add(5.0, 1.0, 6.0)),
-            by(builtin(add, 3))
-          ),
-          proof(
-            goal(div(6.0, 2.0, 3.0)),
-            by(builtin(div, 3))
-          )
-        ])
-      )
-    ])
-  )
-).
-
 root(eq2, 3.0).
-why(
-  root(eq2, 3.0),
-  proof(
-    goal(root(eq2, 3.0)),
-    by(rule("quadratic-formula.pl", clause(11))),
-    bindings([binding("Case", eq2), binding("Root", 3.0)]),
-    uses([
-      proof(
-        goal(root_plus(eq2, 3.0)),
-        by(rule("quadratic-formula.pl", clause(9))),
-        bindings([binding("Case", eq2), binding("Root", 3.0), binding("NB", 4.0), binding("S", 8.0), binding("Den", 4.0), binding("Numerator", 12.0)]),
-        uses([
-          proof(
-            goal(negative_b(eq2, 4.0)),
-            by(rule("quadratic-formula.pl", clause(7))),
-            bindings([binding("Case", eq2), binding("NB", 4.0), binding("_A", 2.0), binding("B", -4.0), binding("_C", -6.0)]),
-            uses([
-              proof(
-                goal(equation(eq2, 2.0, -4.0, -6.0)),
-                by(fact("quadratic-formula.pl", clause(4)))
-              ),
-              proof(
-                goal(neg(-4.0, 4.0)),
-                by(builtin(neg, 2))
-              )
-            ])
-          ),
-          proof(
-            goal(sqrt_discriminant(eq2, 8.0)),
-            by(rule("quadratic-formula.pl", clause(6))),
-            bindings([binding("Case", eq2), binding("S", 8.0), binding("D", 64.0)]),
-            uses([
-              proof(
-                goal(discriminant(eq2, 64.0)),
-                by(rule("quadratic-formula.pl", clause(5))),
-                bindings([binding("Case", eq2), binding("D", 64.0), binding("A", 2.0), binding("B", -4.0), binding("C", -6.0), binding("B2", 16.0), binding("FourA", 8.0), binding("FourAC", -48.0)]),
-                uses([
-                  proof(
-                    goal(equation(eq2, 2.0, -4.0, -6.0)),
-                    by(fact("quadratic-formula.pl", clause(4)))
-                  ),
-                  proof(
-                    goal(pow(-4.0, 2.0, 16.0)),
-                    by(builtin(pow, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 2.0, 8.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(mul(8.0, -6.0, -48.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(sub(16.0, -48.0, 64.0)),
-                    by(builtin(sub, 3))
-                  )
-                ])
-              ),
-              proof(
-                goal(ge(64.0, 0.0)),
-                by(builtin(ge, 2))
-              ),
-              proof(
-                goal(pow(64.0, 0.5, 8.0)),
-                by(builtin(pow, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(denominator(eq2, 4.0)),
-            by(rule("quadratic-formula.pl", clause(8))),
-            bindings([binding("Case", eq2), binding("Den", 4.0), binding("A", 2.0), binding("_B", -4.0), binding("_C", -6.0)]),
-            uses([
-              proof(
-                goal(equation(eq2, 2.0, -4.0, -6.0)),
-                by(fact("quadratic-formula.pl", clause(4)))
-              ),
-              proof(
-                goal(mul(2.0, 2.0, 4.0)),
-                by(builtin(mul, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(add(4.0, 8.0, 12.0)),
-            by(builtin(add, 3))
-          ),
-          proof(
-            goal(div(12.0, 4.0, 3.0)),
-            by(builtin(div, 3))
-          )
-        ])
-      )
-    ])
-  )
-).
-
 root(eq1, 2.0).
-why(
-  root(eq1, 2.0),
-  proof(
-    goal(root(eq1, 2.0)),
-    by(rule("quadratic-formula.pl", clause(12))),
-    bindings([binding("Case", eq1), binding("Root", 2.0)]),
-    uses([
-      proof(
-        goal(root_minus(eq1, 2.0)),
-        by(rule("quadratic-formula.pl", clause(10))),
-        bindings([binding("Case", eq1), binding("Root", 2.0), binding("NB", 5.0), binding("S", 1.0), binding("Den", 2.0), binding("Numerator", 4.0)]),
-        uses([
-          proof(
-            goal(negative_b(eq1, 5.0)),
-            by(rule("quadratic-formula.pl", clause(7))),
-            bindings([binding("Case", eq1), binding("NB", 5.0), binding("_A", 1.0), binding("B", -5.0), binding("_C", 6.0)]),
-            uses([
-              proof(
-                goal(equation(eq1, 1.0, -5.0, 6.0)),
-                by(fact("quadratic-formula.pl", clause(3)))
-              ),
-              proof(
-                goal(neg(-5.0, 5.0)),
-                by(builtin(neg, 2))
-              )
-            ])
-          ),
-          proof(
-            goal(sqrt_discriminant(eq1, 1.0)),
-            by(rule("quadratic-formula.pl", clause(6))),
-            bindings([binding("Case", eq1), binding("S", 1.0), binding("D", 1.0)]),
-            uses([
-              proof(
-                goal(discriminant(eq1, 1.0)),
-                by(rule("quadratic-formula.pl", clause(5))),
-                bindings([binding("Case", eq1), binding("D", 1.0), binding("A", 1.0), binding("B", -5.0), binding("C", 6.0), binding("B2", 25.0), binding("FourA", 4.0), binding("FourAC", 24.0)]),
-                uses([
-                  proof(
-                    goal(equation(eq1, 1.0, -5.0, 6.0)),
-                    by(fact("quadratic-formula.pl", clause(3)))
-                  ),
-                  proof(
-                    goal(pow(-5.0, 2.0, 25.0)),
-                    by(builtin(pow, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 1.0, 4.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 6.0, 24.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(sub(25.0, 24.0, 1.0)),
-                    by(builtin(sub, 3))
-                  )
-                ])
-              ),
-              proof(
-                goal(ge(1.0, 0.0)),
-                by(builtin(ge, 2))
-              ),
-              proof(
-                goal(pow(1.0, 0.5, 1.0)),
-                by(builtin(pow, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(denominator(eq1, 2.0)),
-            by(rule("quadratic-formula.pl", clause(8))),
-            bindings([binding("Case", eq1), binding("Den", 2.0), binding("A", 1.0), binding("_B", -5.0), binding("_C", 6.0)]),
-            uses([
-              proof(
-                goal(equation(eq1, 1.0, -5.0, 6.0)),
-                by(fact("quadratic-formula.pl", clause(3)))
-              ),
-              proof(
-                goal(mul(2.0, 1.0, 2.0)),
-                by(builtin(mul, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(sub(5.0, 1.0, 4.0)),
-            by(builtin(sub, 3))
-          ),
-          proof(
-            goal(div(4.0, 2.0, 2.0)),
-            by(builtin(div, 3))
-          )
-        ])
-      )
-    ])
-  )
-).
-
 root(eq2, -1.0).
-why(
-  root(eq2, -1.0),
-  proof(
-    goal(root(eq2, -1.0)),
-    by(rule("quadratic-formula.pl", clause(12))),
-    bindings([binding("Case", eq2), binding("Root", -1.0)]),
-    uses([
-      proof(
-        goal(root_minus(eq2, -1.0)),
-        by(rule("quadratic-formula.pl", clause(10))),
-        bindings([binding("Case", eq2), binding("Root", -1.0), binding("NB", 4.0), binding("S", 8.0), binding("Den", 4.0), binding("Numerator", -4.0)]),
-        uses([
-          proof(
-            goal(negative_b(eq2, 4.0)),
-            by(rule("quadratic-formula.pl", clause(7))),
-            bindings([binding("Case", eq2), binding("NB", 4.0), binding("_A", 2.0), binding("B", -4.0), binding("_C", -6.0)]),
-            uses([
-              proof(
-                goal(equation(eq2, 2.0, -4.0, -6.0)),
-                by(fact("quadratic-formula.pl", clause(4)))
-              ),
-              proof(
-                goal(neg(-4.0, 4.0)),
-                by(builtin(neg, 2))
-              )
-            ])
-          ),
-          proof(
-            goal(sqrt_discriminant(eq2, 8.0)),
-            by(rule("quadratic-formula.pl", clause(6))),
-            bindings([binding("Case", eq2), binding("S", 8.0), binding("D", 64.0)]),
-            uses([
-              proof(
-                goal(discriminant(eq2, 64.0)),
-                by(rule("quadratic-formula.pl", clause(5))),
-                bindings([binding("Case", eq2), binding("D", 64.0), binding("A", 2.0), binding("B", -4.0), binding("C", -6.0), binding("B2", 16.0), binding("FourA", 8.0), binding("FourAC", -48.0)]),
-                uses([
-                  proof(
-                    goal(equation(eq2, 2.0, -4.0, -6.0)),
-                    by(fact("quadratic-formula.pl", clause(4)))
-                  ),
-                  proof(
-                    goal(pow(-4.0, 2.0, 16.0)),
-                    by(builtin(pow, 3))
-                  ),
-                  proof(
-                    goal(mul(4.0, 2.0, 8.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(mul(8.0, -6.0, -48.0)),
-                    by(builtin(mul, 3))
-                  ),
-                  proof(
-                    goal(sub(16.0, -48.0, 64.0)),
-                    by(builtin(sub, 3))
-                  )
-                ])
-              ),
-              proof(
-                goal(ge(64.0, 0.0)),
-                by(builtin(ge, 2))
-              ),
-              proof(
-                goal(pow(64.0, 0.5, 8.0)),
-                by(builtin(pow, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(denominator(eq2, 4.0)),
-            by(rule("quadratic-formula.pl", clause(8))),
-            bindings([binding("Case", eq2), binding("Den", 4.0), binding("A", 2.0), binding("_B", -4.0), binding("_C", -6.0)]),
-            uses([
-              proof(
-                goal(equation(eq2, 2.0, -4.0, -6.0)),
-                by(fact("quadratic-formula.pl", clause(4)))
-              ),
-              proof(
-                goal(mul(2.0, 2.0, 4.0)),
-                by(builtin(mul, 3))
-              )
-            ])
-          ),
-          proof(
-            goal(sub(4.0, 8.0, -4.0)),
-            by(builtin(sub, 3))
-          ),
-          proof(
-            goal(div(-4.0, 4.0, -1.0)),
-            by(builtin(div, 3))
-          )
-        ])
-      )
-    ])
-  )
-).
-