eyelang 1.3.8 → 1.4.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (219) hide show
  1. package/README.md +19 -14
  2. package/SPEC.md +4 -4
  3. package/conformance/expected/core/001_fact_query.out +0 -8
  4. package/conformance/expected/core/002_rule_recursion.out +0 -41
  5. package/conformance/expected/core/003_terms_and_readback.out +0 -104
  6. package/conformance/expected/core/004_conjunction_and_parentheses.out +0 -25
  7. package/conformance/expected/core/005_list_deconstruction.out +0 -32
  8. package/conformance/expected/core/006_comma_formula_data.out +0 -15
  9. package/conformance/expected/core/007_anonymous_variables.out +0 -19
  10. package/conformance/expected/core/008_graphic_atoms.out +0 -24
  11. package/conformance/expected/core/009_comments_and_whitespace.out +0 -30
  12. package/conformance/expected/core/010_variable_scope_and_reuse.out +0 -52
  13. package/conformance/expected/core/011_predicate_arity.out +0 -30
  14. package/conformance/expected/core/012_nested_compound_unification.out +0 -30
  15. package/conformance/expected/core/013_multiple_clauses_order.out +0 -44
  16. package/conformance/expected/core/014_failure_filters_answers.out +0 -19
  17. package/conformance/expected/core/015_improper_list_unification.out +0 -45
  18. package/conformance/expected/core/016_zero_arity_compound.out +0 -15
  19. package/conformance/expected/core/017_three_step_recursion.out +0 -99
  20. package/conformance/expected/core/018_quoted_atom_readback.out +0 -45
  21. package/conformance/expected/core/019_parenthesized_three_conjuncts.out +0 -36
  22. package/conformance/expected/core/020_nested_list_terms.out +0 -30
  23. package/conformance/expected/extension/001_default_derived_output.out +0 -56
  24. package/conformance/expected/extension/002_materialize_focus.out +0 -22
  25. package/conformance/expected/extension/003_arithmetic_and_comparison.out +0 -148
  26. package/conformance/expected/extension/004_strings_and_atoms.out +0 -58
  27. package/conformance/expected/extension/005_lists_aggregation_ordering.out +0 -135
  28. package/conformance/expected/extension/006_formula_terms.out +0 -76
  29. package/conformance/expected/extension/007_negation_once_generators.out +0 -40
  30. package/conformance/expected/extension/008_equality_and_inequality.out +0 -58
  31. package/conformance/expected/extension/009_list_relations.out +0 -73
  32. package/conformance/expected/extension/010_append_splits.out +0 -45
  33. package/conformance/expected/extension/011_matching_and_comparison.out +0 -70
  34. package/conformance/expected/extension/012_memoize_declaration.out +0 -41
  35. package/conformance/expected/extension/013_numeric_functions.out +0 -105
  36. package/conformance/expected/extension/014_between_enumeration.out +0 -45
  37. package/conformance/expected/extension/015_smallest_divisor.out +0 -15
  38. package/conformance/expected/extension/016_negation_filter.out +0 -38
  39. package/conformance/expected/extension/017_once_user_predicate.out +0 -21
  40. package/conformance/expected/extension/018_findall_user_goal.out +0 -15
  41. package/conformance/expected/extension/019_sort_deduplicates_atoms.out +0 -15
  42. package/conformance/expected/extension/020_append_bound_prefix_suffix.out +0 -30
  43. package/conformance/expected/extension/021_nth0_index_generation.out +0 -15
  44. package/conformance/expected/extension/022_set_nth0_edges.out +0 -30
  45. package/conformance/expected/extension/023_select_duplicate_occurrences.out +0 -30
  46. package/conformance/expected/extension/024_not_member_filter.out +0 -19
  47. package/conformance/expected/extension/025_is_list_filter.out +0 -19
  48. package/conformance/expected/extension/026_nested_formula_terms.out +0 -114
  49. package/conformance/expected/extension/027_materialize_excludes_source_fact.out +0 -14
  50. package/conformance/expected/extension/028_numeric_and_lexical_comparison.out +0 -42
  51. package/conformance/expected/extension/029_string_matching_filters.out +0 -38
  52. package/conformance/expected/extension/030_string_and_atom_concat.out +0 -30
  53. package/conformance/expected/extension/031_countall_empty_and_nonempty.out +0 -18
  54. package/conformance/expected/extension/032_sumall_numeric_template.out +0 -8
  55. package/conformance/expected/extension/033_aggregate_min_template.out +0 -8
  56. package/conformance/expected/extension/034_aggregate_max_compound_key.out +0 -8
  57. package/examples/output/access-control-policy.pl +0 -156
  58. package/examples/output/ackermann.pl +0 -1240
  59. package/examples/output/age.pl +0 -69
  60. package/examples/output/aliases-and-namespaces.pl +0 -73
  61. package/examples/output/alignment-demo.pl +0 -862
  62. package/examples/output/allen-interval-calculus.pl +0 -9169
  63. package/examples/output/ancestor.pl +0 -134
  64. package/examples/output/animal.pl +0 -64
  65. package/examples/output/annotation.pl +0 -76
  66. package/examples/output/backward.pl +0 -21
  67. package/examples/output/basic-monadic.pl +0 -22770
  68. package/examples/output/bayes-diagnosis.pl +0 -195
  69. package/examples/output/bayes-therapy.pl +0 -34873
  70. package/examples/output/beam-deflection.pl +0 -222
  71. package/examples/output/blocks-world-planning.pl +0 -1339
  72. package/examples/output/bmi.pl +0 -1903
  73. package/examples/output/braking-safety-worlds.pl +0 -2452
  74. package/examples/output/buck-converter-design.pl +0 -663
  75. package/examples/output/cache-performance.pl +0 -306
  76. package/examples/output/canary-release.pl +0 -167
  77. package/examples/output/cat-koko.pl +0 -83
  78. package/examples/output/clinical-trial-screening.pl +0 -380
  79. package/examples/output/collatz-1000.pl +0 -19000
  80. package/examples/output/combinatorics-findall-sort.pl +0 -56
  81. package/examples/output/competitive-enzyme-kinetics.pl +0 -563
  82. package/examples/output/complex-matrix-stability.pl +0 -250
  83. package/examples/output/complex.pl +0 -653
  84. package/examples/output/composition-of-injective-functions-is-injective.pl +0 -256
  85. package/examples/output/context-association.pl +0 -75
  86. package/examples/output/control-system.pl +0 -328
  87. package/examples/output/cryptarithmetic-send-more-money.pl +0 -168
  88. package/examples/output/cyclic-path.pl +0 -504
  89. package/examples/output/d3-group.pl +0 -56
  90. package/examples/output/dairy-energy-balance.pl +0 -1034
  91. package/examples/output/data-negotiation.pl +0 -75
  92. package/examples/output/deep-taxonomy-10.pl +0 -1235
  93. package/examples/output/deep-taxonomy-100.pl +0 -1235
  94. package/examples/output/deep-taxonomy-1000.pl +0 -1235
  95. package/examples/output/deep-taxonomy-10000.pl +0 -2915
  96. package/examples/output/deep-taxonomy-100000.pl +0 -20240
  97. package/examples/output/delfour.pl +0 -2829
  98. package/examples/output/dense-hamiltonian-cycle.pl +0 -207
  99. package/examples/output/deontic-logic.pl +0 -105
  100. package/examples/output/derived-rule.pl +0 -41
  101. package/examples/output/diamond-property.pl +0 -303
  102. package/examples/output/dijkstra-findall-sort.pl +0 -484
  103. package/examples/output/dijkstra-risk-path.pl +0 -4841
  104. package/examples/output/dijkstra.pl +0 -1336
  105. package/examples/output/dining-philosophers.pl +0 -21646
  106. package/examples/output/dog.pl +0 -30
  107. package/examples/output/drone-corridor-planner.pl +0 -2466
  108. package/examples/output/easter-computus.pl +0 -5690
  109. package/examples/output/electrical-rc-filter.pl +0 -102
  110. package/examples/output/epidemic-policy.pl +0 -760
  111. package/examples/output/equivalence-classes-overlap-implies-same-class.pl +0 -1080
  112. package/examples/output/eulerian-path.pl +0 -383
  113. package/examples/output/ev-range-worlds.pl +0 -2294
  114. package/examples/output/exact-cover-sudoku.pl +0 -396
  115. package/examples/output/existential-rule.pl +0 -38
  116. package/examples/output/exoplanet-validation-worlds.pl +0 -1904
  117. package/examples/output/expression-eval.pl +0 -104
  118. package/examples/output/family-cousins.pl +0 -3852
  119. package/examples/output/fastpow.pl +0 -1064
  120. package/examples/output/fft8-numeric.pl +0 -2556
  121. package/examples/output/fibonacci.pl +0 -2060
  122. package/examples/output/field-nitrogen-balance.pl +0 -1452
  123. package/examples/output/floating-point.pl +0 -151
  124. package/examples/output/four-color-map.pl +0 -191
  125. package/examples/output/fundamental-theorem-arithmetic.pl +0 -1610
  126. package/examples/output/gcd-bezout-identity.pl +0 -1842
  127. package/examples/output/gd-step-certified.pl +0 -32354
  128. package/examples/output/gdpr-compliance.pl +0 -193
  129. package/examples/output/goldbach-1000.pl +0 -17490
  130. package/examples/output/good-cobbler.pl +0 -15
  131. package/examples/output/gps.pl +0 -4166
  132. package/examples/output/graph-reachability.pl +0 -148
  133. package/examples/output/gray-code-counter.pl +0 -835
  134. package/examples/output/greatest-lower-bound-uniqueness.pl +0 -148
  135. package/examples/output/group-inverse-uniqueness.pl +0 -82
  136. package/examples/output/hamiltonian-cycle.pl +0 -102
  137. package/examples/output/hamiltonian-path.pl +0 -14157
  138. package/examples/output/hamming-code.pl +0 -2665
  139. package/examples/output/hanoi.pl +0 -184
  140. package/examples/output/heat-loss.pl +0 -223
  141. package/examples/output/heron-theorem.pl +0 -253
  142. package/examples/output/ideal-gas-law.pl +0 -148
  143. package/examples/output/illegitimate-reasoning.pl +0 -530
  144. package/examples/output/kaprekar.pl +0 -208
  145. package/examples/output/law-of-cosines.pl +0 -165
  146. package/examples/output/least-squares-regression.pl +0 -1447
  147. package/examples/output/list-collection.pl +0 -49
  148. package/examples/output/lldm.pl +0 -17298
  149. package/examples/output/manufacturing-quality-control.pl +0 -562
  150. package/examples/output/matrix.pl +0 -206
  151. package/examples/output/microgrid-dispatch.pl +0 -787
  152. package/examples/output/monkey-bananas.pl +0 -575
  153. package/examples/output/n-queens.pl +0 -2046
  154. package/examples/output/network-sla.pl +0 -282
  155. package/examples/output/newton-raphson.pl +0 -756
  156. package/examples/output/nixon-diamond.pl +0 -176
  157. package/examples/output/odrl-dpv-healthcare-risk-ranked.pl +0 -6148
  158. package/examples/output/odrl-dpv-risk-ranked.pl +0 -12961
  159. package/examples/output/orbital-transfer-design.pl +0 -961
  160. package/examples/output/path-discovery.pl +0 -333
  161. package/examples/output/peano-arithmetic.pl +0 -1432
  162. package/examples/output/peasant.pl +0 -190
  163. package/examples/output/pendulum-period.pl +0 -271
  164. package/examples/output/polynomial.pl +0 -7952
  165. package/examples/output/project-portfolio-optimization.pl +0 -93
  166. package/examples/output/proof-contrapositive.pl +0 -75
  167. package/examples/output/quadratic-formula.pl +0 -454
  168. package/examples/output/quine-mccluskey.pl +0 -188
  169. package/examples/output/radioactive-decay.pl +0 -299
  170. package/examples/output/sat-dpll.pl +0 -121
  171. package/examples/output/security-incident-correlation.pl +0 -267
  172. package/examples/output/service-impact.pl +0 -457
  173. package/examples/output/sieve.pl +0 -19
  174. package/examples/output/skolem-functions.pl +0 -264
  175. package/examples/output/socket-age.pl +0 -31
  176. package/examples/output/socket-family.pl +0 -56
  177. package/examples/output/socrates.pl +0 -36
  178. package/examples/output/statistics-summary.pl +0 -741
  179. package/examples/output/sudoku.pl +0 -38
  180. package/examples/output/superdense-coding.pl +0 -476
  181. package/examples/output/traveling-salesman.pl +0 -284
  182. package/examples/output/turing.pl +0 -2144
  183. package/examples/output/vector-similarity.pl +0 -421
  184. package/examples/output/witch.pl +0 -209
  185. package/examples/output/wolf-goat-cabbage.pl +0 -900
  186. package/examples/output/zebra.pl +0 -401
  187. package/examples/proof/age.pl +71 -0
  188. package/examples/proof/aliases-and-namespaces.pl +78 -0
  189. package/examples/proof/ancestor.pl +140 -0
  190. package/examples/proof/animal.pl +68 -0
  191. package/examples/proof/annotation.pl +80 -0
  192. package/examples/proof/backward.pl +22 -0
  193. package/examples/proof/cat-koko.pl +86 -0
  194. package/examples/proof/data-negotiation.pl +76 -0
  195. package/examples/proof/derived-rule.pl +43 -0
  196. package/examples/proof/dog.pl +31 -0
  197. package/examples/proof/electrical-rc-filter.pl +105 -0
  198. package/examples/proof/existential-rule.pl +40 -0
  199. package/examples/proof/floating-point.pl +160 -0
  200. package/examples/proof/good-cobbler.pl +16 -0
  201. package/examples/proof/group-inverse-uniqueness.pl +84 -0
  202. package/examples/proof/list-collection.pl +52 -0
  203. package/examples/proof/proof-contrapositive.pl +78 -0
  204. package/examples/proof/socket-age.pl +32 -0
  205. package/examples/proof/socket-family.pl +59 -0
  206. package/examples/proof/socrates.pl +38 -0
  207. package/examples/socket-age.pl +4 -4
  208. package/examples/socket-family.pl +4 -4
  209. package/package.json +1 -1
  210. package/playground-worker.mjs +4 -4
  211. package/playground.html +15 -15
  212. package/src/cli.js +10 -10
  213. package/src/index.js +3 -2
  214. package/src/parser.js +130 -1
  215. package/src/program.js +33 -27
  216. package/test/run-all.js +0 -0
  217. package/test/run-conformance.js +0 -0
  218. package/test/run-examples.js +38 -8
  219. package/test/run-regression.js +29 -28
package/examples/output/microgrid-dispatch.pl CHANGED
@@ -1,793 +1,6 @@
1
1
  renewablePower_kW(campus_interval_17, 270.0).
2
- why(
3
- renewablePower_kW(campus_interval_17, 270.0),
4
- proof(
5
- goal(renewablePower_kW(campus_interval_17, 270.0)),
6
- by(rule("microgrid-dispatch.pl", clause(23))),
7
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0)]),
8
- uses([
9
- proof(
10
- goal(renewable_kW(campus_interval_17, 270.0)),
11
- by(rule("microgrid-dispatch.pl", clause(14))),
12
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
13
- uses([
14
- proof(
15
- goal(solar_kW(campus_interval_17, 180.0)),
16
- by(fact("microgrid-dispatch.pl", clause(9)))
17
- ),
18
- proof(
19
- goal(wind_kW(campus_interval_17, 90.0)),
20
- by(fact("microgrid-dispatch.pl", clause(10)))
21
- ),
22
- proof(
23
- goal(add(180.0, 90.0, 270.0)),
24
- by(builtin(add, 3))
25
- )
26
- ])
27
- )
28
- ])
29
- )
30
- ).
31
-
32
2
  batteryDispatch_kW(campus_interval_17, 240.0).
33
- why(
34
- batteryDispatch_kW(campus_interval_17, 240.0),
35
- proof(
36
- goal(batteryDispatch_kW(campus_interval_17, 240.0)),
37
- by(rule("microgrid-dispatch.pl", clause(24))),
38
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0)]),
39
- uses([
40
- proof(
41
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
42
- by(rule("microgrid-dispatch.pl", clause(17))),
43
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
44
- uses([
45
- proof(
46
- goal(net_deficit_kW(campus_interval_17, 350.0)),
47
- by(rule("microgrid-dispatch.pl", clause(15))),
48
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
49
- uses([
50
- proof(
51
- goal(load_kW(campus_interval_17, 620.0)),
52
- by(fact("microgrid-dispatch.pl", clause(8)))
53
- ),
54
- proof(
55
- goal(renewable_kW(campus_interval_17, 270.0)),
56
- by(rule("microgrid-dispatch.pl", clause(14))),
57
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
58
- uses([
59
- proof(
60
- goal(solar_kW(campus_interval_17, 180.0)),
61
- by(fact("microgrid-dispatch.pl", clause(9)))
62
- ),
63
- proof(
64
- goal(wind_kW(campus_interval_17, 90.0)),
65
- by(fact("microgrid-dispatch.pl", clause(10)))
66
- ),
67
- proof(
68
- goal(add(180.0, 90.0, 270.0)),
69
- by(builtin(add, 3))
70
- )
71
- ])
72
- ),
73
- proof(
74
- goal(sub(620.0, 270.0, 350.0)),
75
- by(builtin(sub, 3))
76
- )
77
- ])
78
- ),
79
- proof(
80
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
81
- by(rule("microgrid-dispatch.pl", clause(16))),
82
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
83
- uses([
84
- proof(
85
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
86
- by(fact("microgrid-dispatch.pl", clause(11)))
87
- ),
88
- proof(
89
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
90
- by(fact("microgrid-dispatch.pl", clause(12)))
91
- ),
92
- proof(
93
- goal(sub(320.0, 80.0, 240.0)),
94
- by(builtin(sub, 3))
95
- )
96
- ])
97
- ),
98
- proof(
99
- goal(min(350.0, 240.0, 240.0)),
100
- by(builtin(min, 3))
101
- )
102
- ])
103
- )
104
- ])
105
- )
106
- ).
107
-
108
3
  gridImport_kW(campus_interval_17, 110.0).
109
- why(
110
- gridImport_kW(campus_interval_17, 110.0),
111
- proof(
112
- goal(gridImport_kW(campus_interval_17, 110.0)),
113
- by(rule("microgrid-dispatch.pl", clause(25))),
114
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0)]),
115
- uses([
116
- proof(
117
- goal(grid_import_kW(campus_interval_17, 110.0)),
118
- by(rule("microgrid-dispatch.pl", clause(18))),
119
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0), binding("Deficit", 350.0), binding("Dispatch", 240.0)]),
120
- uses([
121
- proof(
122
- goal(net_deficit_kW(campus_interval_17, 350.0)),
123
- by(rule("microgrid-dispatch.pl", clause(15))),
124
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
125
- uses([
126
- proof(
127
- goal(load_kW(campus_interval_17, 620.0)),
128
- by(fact("microgrid-dispatch.pl", clause(8)))
129
- ),
130
- proof(
131
- goal(renewable_kW(campus_interval_17, 270.0)),
132
- by(rule("microgrid-dispatch.pl", clause(14))),
133
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
134
- uses([
135
- proof(
136
- goal(solar_kW(campus_interval_17, 180.0)),
137
- by(fact("microgrid-dispatch.pl", clause(9)))
138
- ),
139
- proof(
140
- goal(wind_kW(campus_interval_17, 90.0)),
141
- by(fact("microgrid-dispatch.pl", clause(10)))
142
- ),
143
- proof(
144
- goal(add(180.0, 90.0, 270.0)),
145
- by(builtin(add, 3))
146
- )
147
- ])
148
- ),
149
- proof(
150
- goal(sub(620.0, 270.0, 350.0)),
151
- by(builtin(sub, 3))
152
- )
153
- ])
154
- ),
155
- proof(
156
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
157
- by(rule("microgrid-dispatch.pl", clause(17))),
158
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
159
- uses([
160
- proof(
161
- goal(net_deficit_kW(campus_interval_17, 350.0)),
162
- by(rule("microgrid-dispatch.pl", clause(15))),
163
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
164
- uses([
165
- proof(
166
- goal(load_kW(campus_interval_17, 620.0)),
167
- by(fact("microgrid-dispatch.pl", clause(8)))
168
- ),
169
- proof(
170
- goal(renewable_kW(campus_interval_17, 270.0)),
171
- by(rule("microgrid-dispatch.pl", clause(14))),
172
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
173
- uses([
174
- proof(
175
- goal(solar_kW(campus_interval_17, 180.0)),
176
- by(fact("microgrid-dispatch.pl", clause(9)))
177
- ),
178
- proof(
179
- goal(wind_kW(campus_interval_17, 90.0)),
180
- by(fact("microgrid-dispatch.pl", clause(10)))
181
- ),
182
- proof(
183
- goal(add(180.0, 90.0, 270.0)),
184
- by(builtin(add, 3))
185
- )
186
- ])
187
- ),
188
- proof(
189
- goal(sub(620.0, 270.0, 350.0)),
190
- by(builtin(sub, 3))
191
- )
192
- ])
193
- ),
194
- proof(
195
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
196
- by(rule("microgrid-dispatch.pl", clause(16))),
197
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
198
- uses([
199
- proof(
200
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
201
- by(fact("microgrid-dispatch.pl", clause(11)))
202
- ),
203
- proof(
204
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
205
- by(fact("microgrid-dispatch.pl", clause(12)))
206
- ),
207
- proof(
208
- goal(sub(320.0, 80.0, 240.0)),
209
- by(builtin(sub, 3))
210
- )
211
- ])
212
- ),
213
- proof(
214
- goal(min(350.0, 240.0, 240.0)),
215
- by(builtin(min, 3))
216
- )
217
- ])
218
- ),
219
- proof(
220
- goal(sub(350.0, 240.0, 110.0)),
221
- by(builtin(sub, 3))
222
- )
223
- ])
224
- )
225
- ])
226
- )
227
- ).
228
-
229
4
  reserveAfterDispatch_kW(campus_interval_17, 80.0).
230
- why(
231
- reserveAfterDispatch_kW(campus_interval_17, 80.0),
232
- proof(
233
- goal(reserveAfterDispatch_kW(campus_interval_17, 80.0)),
234
- by(rule("microgrid-dispatch.pl", clause(26))),
235
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0)]),
236
- uses([
237
- proof(
238
- goal(battery_reserve_after_dispatch_kW(campus_interval_17, 80.0)),
239
- by(rule("microgrid-dispatch.pl", clause(19))),
240
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0), binding("MaxDischarge", 320.0), binding("Dispatch", 240.0)]),
241
- uses([
242
- proof(
243
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
244
- by(fact("microgrid-dispatch.pl", clause(11)))
245
- ),
246
- proof(
247
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
248
- by(rule("microgrid-dispatch.pl", clause(17))),
249
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
250
- uses([
251
- proof(
252
- goal(net_deficit_kW(campus_interval_17, 350.0)),
253
- by(rule("microgrid-dispatch.pl", clause(15))),
254
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
255
- uses([
256
- proof(
257
- goal(load_kW(campus_interval_17, 620.0)),
258
- by(fact("microgrid-dispatch.pl", clause(8)))
259
- ),
260
- proof(
261
- goal(renewable_kW(campus_interval_17, 270.0)),
262
- by(rule("microgrid-dispatch.pl", clause(14))),
263
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
264
- uses([
265
- proof(
266
- goal(solar_kW(campus_interval_17, 180.0)),
267
- by(fact("microgrid-dispatch.pl", clause(9)))
268
- ),
269
- proof(
270
- goal(wind_kW(campus_interval_17, 90.0)),
271
- by(fact("microgrid-dispatch.pl", clause(10)))
272
- ),
273
- proof(
274
- goal(add(180.0, 90.0, 270.0)),
275
- by(builtin(add, 3))
276
- )
277
- ])
278
- ),
279
- proof(
280
- goal(sub(620.0, 270.0, 350.0)),
281
- by(builtin(sub, 3))
282
- )
283
- ])
284
- ),
285
- proof(
286
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
287
- by(rule("microgrid-dispatch.pl", clause(16))),
288
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
289
- uses([
290
- proof(
291
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
292
- by(fact("microgrid-dispatch.pl", clause(11)))
293
- ),
294
- proof(
295
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
296
- by(fact("microgrid-dispatch.pl", clause(12)))
297
- ),
298
- proof(
299
- goal(sub(320.0, 80.0, 240.0)),
300
- by(builtin(sub, 3))
301
- )
302
- ])
303
- ),
304
- proof(
305
- goal(min(350.0, 240.0, 240.0)),
306
- by(builtin(min, 3))
307
- )
308
- ])
309
- ),
310
- proof(
311
- goal(sub(320.0, 240.0, 80.0)),
312
- by(builtin(sub, 3))
313
- )
314
- ])
315
- )
316
- ])
317
- )
318
- ).
319
-
320
5
  status(campus_interval_17, stable_dispatch).
321
- why(
322
- status(campus_interval_17, stable_dispatch),
323
- proof(
324
- goal(status(campus_interval_17, stable_dispatch)),
325
- by(rule("microgrid-dispatch.pl", clause(27))),
326
- bindings([binding("Site", campus_interval_17)]),
327
- uses([
328
- proof(
329
- goal(stable_dispatch(campus_interval_17)),
330
- by(rule("microgrid-dispatch.pl", clause(22))),
331
- bindings([binding("Site", campus_interval_17)]),
332
- uses([
333
- proof(
334
- goal(contract_ok(campus_interval_17)),
335
- by(rule("microgrid-dispatch.pl", clause(20))),
336
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0), binding("Limit", 150.0)]),
337
- uses([
338
- proof(
339
- goal(grid_import_kW(campus_interval_17, 110.0)),
340
- by(rule("microgrid-dispatch.pl", clause(18))),
341
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0), binding("Deficit", 350.0), binding("Dispatch", 240.0)]),
342
- uses([
343
- proof(
344
- goal(net_deficit_kW(campus_interval_17, 350.0)),
345
- by(rule("microgrid-dispatch.pl", clause(15))),
346
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
347
- uses([
348
- proof(
349
- goal(load_kW(campus_interval_17, 620.0)),
350
- by(fact("microgrid-dispatch.pl", clause(8)))
351
- ),
352
- proof(
353
- goal(renewable_kW(campus_interval_17, 270.0)),
354
- by(rule("microgrid-dispatch.pl", clause(14))),
355
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
356
- uses([
357
- proof(
358
- goal(solar_kW(campus_interval_17, 180.0)),
359
- by(fact("microgrid-dispatch.pl", clause(9)))
360
- ),
361
- proof(
362
- goal(wind_kW(campus_interval_17, 90.0)),
363
- by(fact("microgrid-dispatch.pl", clause(10)))
364
- ),
365
- proof(
366
- goal(add(180.0, 90.0, 270.0)),
367
- by(builtin(add, 3))
368
- )
369
- ])
370
- ),
371
- proof(
372
- goal(sub(620.0, 270.0, 350.0)),
373
- by(builtin(sub, 3))
374
- )
375
- ])
376
- ),
377
- proof(
378
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
379
- by(rule("microgrid-dispatch.pl", clause(17))),
380
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
381
- uses([
382
- proof(
383
- goal(net_deficit_kW(campus_interval_17, 350.0)),
384
- by(rule("microgrid-dispatch.pl", clause(15))),
385
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
386
- uses([
387
- proof(
388
- goal(load_kW(campus_interval_17, 620.0)),
389
- by(fact("microgrid-dispatch.pl", clause(8)))
390
- ),
391
- proof(
392
- goal(renewable_kW(campus_interval_17, 270.0)),
393
- by(rule("microgrid-dispatch.pl", clause(14))),
394
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
395
- uses([
396
- proof(
397
- goal(solar_kW(campus_interval_17, 180.0)),
398
- by(fact("microgrid-dispatch.pl", clause(9)))
399
- ),
400
- proof(
401
- goal(wind_kW(campus_interval_17, 90.0)),
402
- by(fact("microgrid-dispatch.pl", clause(10)))
403
- ),
404
- proof(
405
- goal(add(180.0, 90.0, 270.0)),
406
- by(builtin(add, 3))
407
- )
408
- ])
409
- ),
410
- proof(
411
- goal(sub(620.0, 270.0, 350.0)),
412
- by(builtin(sub, 3))
413
- )
414
- ])
415
- ),
416
- proof(
417
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
418
- by(rule("microgrid-dispatch.pl", clause(16))),
419
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
420
- uses([
421
- proof(
422
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
423
- by(fact("microgrid-dispatch.pl", clause(11)))
424
- ),
425
- proof(
426
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
427
- by(fact("microgrid-dispatch.pl", clause(12)))
428
- ),
429
- proof(
430
- goal(sub(320.0, 80.0, 240.0)),
431
- by(builtin(sub, 3))
432
- )
433
- ])
434
- ),
435
- proof(
436
- goal(min(350.0, 240.0, 240.0)),
437
- by(builtin(min, 3))
438
- )
439
- ])
440
- ),
441
- proof(
442
- goal(sub(350.0, 240.0, 110.0)),
443
- by(builtin(sub, 3))
444
- )
445
- ])
446
- ),
447
- proof(
448
- goal(grid_contract_limit_kW(campus_interval_17, 150.0)),
449
- by(fact("microgrid-dispatch.pl", clause(13)))
450
- ),
451
- proof(
452
- goal(le(110.0, 150.0)),
453
- by(builtin(le, 2))
454
- )
455
- ])
456
- ),
457
- proof(
458
- goal(reserve_ok(campus_interval_17)),
459
- by(rule("microgrid-dispatch.pl", clause(21))),
460
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0), binding("Required", 80.0)]),
461
- uses([
462
- proof(
463
- goal(battery_reserve_after_dispatch_kW(campus_interval_17, 80.0)),
464
- by(rule("microgrid-dispatch.pl", clause(19))),
465
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0), binding("MaxDischarge", 320.0), binding("Dispatch", 240.0)]),
466
- uses([
467
- proof(
468
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
469
- by(fact("microgrid-dispatch.pl", clause(11)))
470
- ),
471
- proof(
472
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
473
- by(rule("microgrid-dispatch.pl", clause(17))),
474
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
475
- uses([
476
- proof(
477
- goal(net_deficit_kW(campus_interval_17, 350.0)),
478
- by(rule("microgrid-dispatch.pl", clause(15))),
479
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
480
- uses([
481
- proof(
482
- goal(load_kW(campus_interval_17, 620.0)),
483
- by(fact("microgrid-dispatch.pl", clause(8)))
484
- ),
485
- proof(
486
- goal(renewable_kW(campus_interval_17, 270.0)),
487
- by(rule("microgrid-dispatch.pl", clause(14))),
488
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
489
- uses([
490
- proof(
491
- goal(solar_kW(campus_interval_17, 180.0)),
492
- by(fact("microgrid-dispatch.pl", clause(9)))
493
- ),
494
- proof(
495
- goal(wind_kW(campus_interval_17, 90.0)),
496
- by(fact("microgrid-dispatch.pl", clause(10)))
497
- ),
498
- proof(
499
- goal(add(180.0, 90.0, 270.0)),
500
- by(builtin(add, 3))
501
- )
502
- ])
503
- ),
504
- proof(
505
- goal(sub(620.0, 270.0, 350.0)),
506
- by(builtin(sub, 3))
507
- )
508
- ])
509
- ),
510
- proof(
511
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
512
- by(rule("microgrid-dispatch.pl", clause(16))),
513
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
514
- uses([
515
- proof(
516
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
517
- by(fact("microgrid-dispatch.pl", clause(11)))
518
- ),
519
- proof(
520
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
521
- by(fact("microgrid-dispatch.pl", clause(12)))
522
- ),
523
- proof(
524
- goal(sub(320.0, 80.0, 240.0)),
525
- by(builtin(sub, 3))
526
- )
527
- ])
528
- ),
529
- proof(
530
- goal(min(350.0, 240.0, 240.0)),
531
- by(builtin(min, 3))
532
- )
533
- ])
534
- ),
535
- proof(
536
- goal(sub(320.0, 240.0, 80.0)),
537
- by(builtin(sub, 3))
538
- )
539
- ])
540
- ),
541
- proof(
542
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
543
- by(fact("microgrid-dispatch.pl", clause(12)))
544
- ),
545
- proof(
546
- goal(ge(80.0, 80.0)),
547
- by(builtin(ge, 2))
548
- )
549
- ])
550
- )
551
- ])
552
- )
553
- ])
554
- )
555
- ).
556
-
557
6
  reason(campus_interval_17, "battery dispatch covers the deficit while preserving reserve and grid contract limits").
558
- why(
559
- reason(campus_interval_17, "battery dispatch covers the deficit while preserving reserve and grid contract limits"),
560
- proof(
561
- goal(reason(campus_interval_17, "battery dispatch covers the deficit while preserving reserve and grid contract limits")),
562
- by(rule("microgrid-dispatch.pl", clause(28))),
563
- bindings([binding("Site", campus_interval_17)]),
564
- uses([
565
- proof(
566
- goal(stable_dispatch(campus_interval_17)),
567
- by(rule("microgrid-dispatch.pl", clause(22))),
568
- bindings([binding("Site", campus_interval_17)]),
569
- uses([
570
- proof(
571
- goal(contract_ok(campus_interval_17)),
572
- by(rule("microgrid-dispatch.pl", clause(20))),
573
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0), binding("Limit", 150.0)]),
574
- uses([
575
- proof(
576
- goal(grid_import_kW(campus_interval_17, 110.0)),
577
- by(rule("microgrid-dispatch.pl", clause(18))),
578
- bindings([binding("Site", campus_interval_17), binding("Import", 110.0), binding("Deficit", 350.0), binding("Dispatch", 240.0)]),
579
- uses([
580
- proof(
581
- goal(net_deficit_kW(campus_interval_17, 350.0)),
582
- by(rule("microgrid-dispatch.pl", clause(15))),
583
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
584
- uses([
585
- proof(
586
- goal(load_kW(campus_interval_17, 620.0)),
587
- by(fact("microgrid-dispatch.pl", clause(8)))
588
- ),
589
- proof(
590
- goal(renewable_kW(campus_interval_17, 270.0)),
591
- by(rule("microgrid-dispatch.pl", clause(14))),
592
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
593
- uses([
594
- proof(
595
- goal(solar_kW(campus_interval_17, 180.0)),
596
- by(fact("microgrid-dispatch.pl", clause(9)))
597
- ),
598
- proof(
599
- goal(wind_kW(campus_interval_17, 90.0)),
600
- by(fact("microgrid-dispatch.pl", clause(10)))
601
- ),
602
- proof(
603
- goal(add(180.0, 90.0, 270.0)),
604
- by(builtin(add, 3))
605
- )
606
- ])
607
- ),
608
- proof(
609
- goal(sub(620.0, 270.0, 350.0)),
610
- by(builtin(sub, 3))
611
- )
612
- ])
613
- ),
614
- proof(
615
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
616
- by(rule("microgrid-dispatch.pl", clause(17))),
617
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
618
- uses([
619
- proof(
620
- goal(net_deficit_kW(campus_interval_17, 350.0)),
621
- by(rule("microgrid-dispatch.pl", clause(15))),
622
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
623
- uses([
624
- proof(
625
- goal(load_kW(campus_interval_17, 620.0)),
626
- by(fact("microgrid-dispatch.pl", clause(8)))
627
- ),
628
- proof(
629
- goal(renewable_kW(campus_interval_17, 270.0)),
630
- by(rule("microgrid-dispatch.pl", clause(14))),
631
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
632
- uses([
633
- proof(
634
- goal(solar_kW(campus_interval_17, 180.0)),
635
- by(fact("microgrid-dispatch.pl", clause(9)))
636
- ),
637
- proof(
638
- goal(wind_kW(campus_interval_17, 90.0)),
639
- by(fact("microgrid-dispatch.pl", clause(10)))
640
- ),
641
- proof(
642
- goal(add(180.0, 90.0, 270.0)),
643
- by(builtin(add, 3))
644
- )
645
- ])
646
- ),
647
- proof(
648
- goal(sub(620.0, 270.0, 350.0)),
649
- by(builtin(sub, 3))
650
- )
651
- ])
652
- ),
653
- proof(
654
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
655
- by(rule("microgrid-dispatch.pl", clause(16))),
656
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
657
- uses([
658
- proof(
659
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
660
- by(fact("microgrid-dispatch.pl", clause(11)))
661
- ),
662
- proof(
663
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
664
- by(fact("microgrid-dispatch.pl", clause(12)))
665
- ),
666
- proof(
667
- goal(sub(320.0, 80.0, 240.0)),
668
- by(builtin(sub, 3))
669
- )
670
- ])
671
- ),
672
- proof(
673
- goal(min(350.0, 240.0, 240.0)),
674
- by(builtin(min, 3))
675
- )
676
- ])
677
- ),
678
- proof(
679
- goal(sub(350.0, 240.0, 110.0)),
680
- by(builtin(sub, 3))
681
- )
682
- ])
683
- ),
684
- proof(
685
- goal(grid_contract_limit_kW(campus_interval_17, 150.0)),
686
- by(fact("microgrid-dispatch.pl", clause(13)))
687
- ),
688
- proof(
689
- goal(le(110.0, 150.0)),
690
- by(builtin(le, 2))
691
- )
692
- ])
693
- ),
694
- proof(
695
- goal(reserve_ok(campus_interval_17)),
696
- by(rule("microgrid-dispatch.pl", clause(21))),
697
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0), binding("Required", 80.0)]),
698
- uses([
699
- proof(
700
- goal(battery_reserve_after_dispatch_kW(campus_interval_17, 80.0)),
701
- by(rule("microgrid-dispatch.pl", clause(19))),
702
- bindings([binding("Site", campus_interval_17), binding("ReserveLeft", 80.0), binding("MaxDischarge", 320.0), binding("Dispatch", 240.0)]),
703
- uses([
704
- proof(
705
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
706
- by(fact("microgrid-dispatch.pl", clause(11)))
707
- ),
708
- proof(
709
- goal(battery_dispatch_kW(campus_interval_17, 240.0)),
710
- by(rule("microgrid-dispatch.pl", clause(17))),
711
- bindings([binding("Site", campus_interval_17), binding("Dispatch", 240.0), binding("Deficit", 350.0), binding("Limit", 240.0)]),
712
- uses([
713
- proof(
714
- goal(net_deficit_kW(campus_interval_17, 350.0)),
715
- by(rule("microgrid-dispatch.pl", clause(15))),
716
- bindings([binding("Site", campus_interval_17), binding("Deficit", 350.0), binding("Load", 620.0), binding("Renewable", 270.0)]),
717
- uses([
718
- proof(
719
- goal(load_kW(campus_interval_17, 620.0)),
720
- by(fact("microgrid-dispatch.pl", clause(8)))
721
- ),
722
- proof(
723
- goal(renewable_kW(campus_interval_17, 270.0)),
724
- by(rule("microgrid-dispatch.pl", clause(14))),
725
- bindings([binding("Site", campus_interval_17), binding("Renewable", 270.0), binding("Solar", 180.0), binding("Wind", 90.0)]),
726
- uses([
727
- proof(
728
- goal(solar_kW(campus_interval_17, 180.0)),
729
- by(fact("microgrid-dispatch.pl", clause(9)))
730
- ),
731
- proof(
732
- goal(wind_kW(campus_interval_17, 90.0)),
733
- by(fact("microgrid-dispatch.pl", clause(10)))
734
- ),
735
- proof(
736
- goal(add(180.0, 90.0, 270.0)),
737
- by(builtin(add, 3))
738
- )
739
- ])
740
- ),
741
- proof(
742
- goal(sub(620.0, 270.0, 350.0)),
743
- by(builtin(sub, 3))
744
- )
745
- ])
746
- ),
747
- proof(
748
- goal(reserve_aware_battery_limit_kW(campus_interval_17, 240.0)),
749
- by(rule("microgrid-dispatch.pl", clause(16))),
750
- bindings([binding("Site", campus_interval_17), binding("Limit", 240.0), binding("MaxDischarge", 320.0), binding("Reserve", 80.0)]),
751
- uses([
752
- proof(
753
- goal(battery_max_discharge_kW(campus_interval_17, 320.0)),
754
- by(fact("microgrid-dispatch.pl", clause(11)))
755
- ),
756
- proof(
757
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
758
- by(fact("microgrid-dispatch.pl", clause(12)))
759
- ),
760
- proof(
761
- goal(sub(320.0, 80.0, 240.0)),
762
- by(builtin(sub, 3))
763
- )
764
- ])
765
- ),
766
- proof(
767
- goal(min(350.0, 240.0, 240.0)),
768
- by(builtin(min, 3))
769
- )
770
- ])
771
- ),
772
- proof(
773
- goal(sub(320.0, 240.0, 80.0)),
774
- by(builtin(sub, 3))
775
- )
776
- ])
777
- ),
778
- proof(
779
- goal(required_battery_reserve_kW(campus_interval_17, 80.0)),
780
- by(fact("microgrid-dispatch.pl", clause(12)))
781
- ),
782
- proof(
783
- goal(ge(80.0, 80.0)),
784
- by(builtin(ge, 2))
785
- )
786
- ])
787
- )
788
- ])
789
- )
790
- ])
791
- )
792
- ).
793
-