eyelang 0.1.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.
- package/LICENSE.md +9 -0
- package/README.md +61 -0
- package/bin/eyelang.js +7 -0
- package/docs/guide.md +525 -0
- package/docs/language-reference.md +697 -0
- package/examples/access-control-policy.pl +52 -0
- package/examples/ackermann.pl +46 -0
- package/examples/age.pl +28 -0
- package/examples/aliases-and-namespaces.pl +22 -0
- package/examples/alignment-demo.pl +44 -0
- package/examples/allen-interval-calculus.pl +64 -0
- package/examples/ancestor.pl +21 -0
- package/examples/animal.pl +21 -0
- package/examples/annotation.pl +34 -0
- package/examples/auroracare.pl +309 -0
- package/examples/backward.pl +12 -0
- package/examples/basic-monadic.pl +10032 -0
- package/examples/bayes-diagnosis.pl +108 -0
- package/examples/bayes-therapy.pl +182 -0
- package/examples/beam-deflection.pl +50 -0
- package/examples/blocks-world-planning.pl +75 -0
- package/examples/bmi.pl +232 -0
- package/examples/braking-safety-worlds.pl +69 -0
- package/examples/buck-converter-design.pl +78 -0
- package/examples/cache-performance.pl +54 -0
- package/examples/canary-release.pl +49 -0
- package/examples/cat-koko.pl +24 -0
- package/examples/clinical-trial-screening.pl +92 -0
- package/examples/combinatorics-findall-sort.pl +37 -0
- package/examples/competitive-enzyme-kinetics.pl +78 -0
- package/examples/complex.pl +121 -0
- package/examples/composition-of-injective-functions-is-injective.pl +50 -0
- package/examples/context-association.pl +53 -0
- package/examples/context-schema-audit.pl +46 -0
- package/examples/control-system.pl +72 -0
- package/examples/cyclic-path.pl +16 -0
- package/examples/d3-group.pl +100 -0
- package/examples/dairy-energy-balance.pl +65 -0
- package/examples/data-negotiation.pl +39 -0
- package/examples/deep-taxonomy-10.pl +115 -0
- package/examples/deep-taxonomy-100.pl +385 -0
- package/examples/deep-taxonomy-1000.pl +3085 -0
- package/examples/deep-taxonomy-10000.pl +30094 -0
- package/examples/deep-taxonomy-100000.pl +300184 -0
- package/examples/delfour.pl +281 -0
- package/examples/deontic-logic.pl +52 -0
- package/examples/derived-backward-rule.pl +30 -0
- package/examples/derived-rule.pl +27 -0
- package/examples/diamond-property.pl +38 -0
- package/examples/dijkstra-findall-sort.pl +44 -0
- package/examples/dijkstra-risk-path.pl +86 -0
- package/examples/dijkstra.pl +46 -0
- package/examples/dining-philosophers.pl +140 -0
- package/examples/dog.pl +25 -0
- package/examples/dpv-odrl-purpose-mapping.pl +46 -0
- package/examples/drone-corridor-planner.pl +51 -0
- package/examples/easter-computus.pl +89 -0
- package/examples/electrical-rc-filter.pl +36 -0
- package/examples/epidemic-policy.pl +67 -0
- package/examples/equivalence-classes-overlap-implies-same-class.pl +27 -0
- package/examples/eulerian-path.pl +85 -0
- package/examples/ev-range-worlds.pl +82 -0
- package/examples/existential-rule.pl +18 -0
- package/examples/exoplanet-validation-worlds.pl +88 -0
- package/examples/expression-eval.pl +43 -0
- package/examples/family-cousins.pl +65 -0
- package/examples/fastpow.pl +53 -0
- package/examples/fft8-numeric.pl +83 -0
- package/examples/fibonacci.pl +53 -0
- package/examples/field-nitrogen-balance.pl +70 -0
- package/examples/flandor.pl +296 -0
- package/examples/floating-point.pl +23 -0
- package/examples/four-color-map.pl +127 -0
- package/examples/fundamental-theorem-arithmetic.pl +113 -0
- package/examples/gd-step-certified.pl +158 -0
- package/examples/gdpr-compliance.pl +69 -0
- package/examples/good-cobbler.pl +14 -0
- package/examples/gps.pl +152 -0
- package/examples/graph-reachability.pl +36 -0
- package/examples/gray-code-counter.pl +48 -0
- package/examples/greatest-lower-bound-uniqueness.pl +28 -0
- package/examples/group-inverse-uniqueness.pl +34 -0
- package/examples/hamiltonian-path.pl +49 -0
- package/examples/hamming-code.pl +105 -0
- package/examples/hanoi.pl +20 -0
- package/examples/heat-loss.pl +51 -0
- package/examples/heron-theorem.pl +36 -0
- package/examples/ideal-gas-law.pl +37 -0
- package/examples/illegitimate-reasoning.pl +88 -0
- package/examples/knowledge-engineering-alignment-flow.pl +40 -0
- package/examples/law-of-cosines.pl +31 -0
- package/examples/least-squares-regression.pl +81 -0
- package/examples/list-collection.pl +33 -0
- package/examples/lldm.pl +78 -0
- package/examples/manufacturing-quality-control.pl +73 -0
- package/examples/microgrid-dispatch.pl +85 -0
- package/examples/monkey-bananas.pl +45 -0
- package/examples/network-sla.pl +48 -0
- package/examples/newton-raphson.pl +49 -0
- package/examples/nixon-diamond.pl +37 -0
- package/examples/observability-log-correlation.pl +34 -0
- package/examples/odrl-dpv-fpv-trust-flow.pl +43 -0
- package/examples/odrl-dpv-healthcare-risk-ranked.pl +266 -0
- package/examples/odrl-dpv-risk-ranked.pl +320 -0
- package/examples/orbital-transfer-design.pl +113 -0
- package/examples/output/access-control-policy.pl +2 -0
- package/examples/output/ackermann.pl +12 -0
- package/examples/output/age.pl +2 -0
- package/examples/output/aliases-and-namespaces.pl +5 -0
- package/examples/output/alignment-demo.pl +32 -0
- package/examples/output/allen-interval-calculus.pl +154 -0
- package/examples/output/ancestor.pl +6 -0
- package/examples/output/animal.pl +4 -0
- package/examples/output/annotation.pl +4 -0
- package/examples/output/auroracare.pl +117 -0
- package/examples/output/backward.pl +1 -0
- package/examples/output/basic-monadic.pl +1518 -0
- package/examples/output/bayes-diagnosis.pl +13 -0
- package/examples/output/bayes-therapy.pl +23 -0
- package/examples/output/beam-deflection.pl +5 -0
- package/examples/output/blocks-world-planning.pl +4 -0
- package/examples/output/bmi.pl +32 -0
- package/examples/output/braking-safety-worlds.pl +18 -0
- package/examples/output/buck-converter-design.pl +6 -0
- package/examples/output/cache-performance.pl +4 -0
- package/examples/output/canary-release.pl +5 -0
- package/examples/output/cat-koko.pl +3 -0
- package/examples/output/clinical-trial-screening.pl +9 -0
- package/examples/output/combinatorics-findall-sort.pl +2 -0
- package/examples/output/competitive-enzyme-kinetics.pl +6 -0
- package/examples/output/complex.pl +1 -0
- package/examples/output/composition-of-injective-functions-is-injective.pl +2 -0
- package/examples/output/context-association.pl +3 -0
- package/examples/output/context-schema-audit.pl +12 -0
- package/examples/output/control-system.pl +6 -0
- package/examples/output/cyclic-path.pl +16 -0
- package/examples/output/d3-group.pl +2 -0
- package/examples/output/dairy-energy-balance.pl +13 -0
- package/examples/output/data-negotiation.pl +1 -0
- package/examples/output/deep-taxonomy-10.pl +16 -0
- package/examples/output/deep-taxonomy-100.pl +16 -0
- package/examples/output/deep-taxonomy-1000.pl +16 -0
- package/examples/output/deep-taxonomy-10000.pl +16 -0
- package/examples/output/deep-taxonomy-100000.pl +16 -0
- package/examples/output/delfour.pl +31 -0
- package/examples/output/deontic-logic.pl +4 -0
- package/examples/output/derived-backward-rule.pl +3 -0
- package/examples/output/derived-rule.pl +2 -0
- package/examples/output/diamond-property.pl +4 -0
- package/examples/output/dijkstra-findall-sort.pl +2 -0
- package/examples/output/dijkstra-risk-path.pl +29 -0
- package/examples/output/dijkstra.pl +16 -0
- package/examples/output/dining-philosophers.pl +350 -0
- package/examples/output/dog.pl +1 -0
- package/examples/output/dpv-odrl-purpose-mapping.pl +18 -0
- package/examples/output/drone-corridor-planner.pl +17 -0
- package/examples/output/easter-computus.pl +30 -0
- package/examples/output/electrical-rc-filter.pl +3 -0
- package/examples/output/epidemic-policy.pl +14 -0
- package/examples/output/equivalence-classes-overlap-implies-same-class.pl +18 -0
- package/examples/output/eulerian-path.pl +3 -0
- package/examples/output/ev-range-worlds.pl +19 -0
- package/examples/output/existential-rule.pl +2 -0
- package/examples/output/exoplanet-validation-worlds.pl +22 -0
- package/examples/output/expression-eval.pl +1 -0
- package/examples/output/family-cousins.pl +28 -0
- package/examples/output/fastpow.pl +6 -0
- package/examples/output/fft8-numeric.pl +4 -0
- package/examples/output/fibonacci.pl +6 -0
- package/examples/output/field-nitrogen-balance.pl +21 -0
- package/examples/output/flandor.pl +43 -0
- package/examples/output/floating-point.pl +9 -0
- package/examples/output/four-color-map.pl +3 -0
- package/examples/output/fundamental-theorem-arithmetic.pl +9 -0
- package/examples/output/gd-step-certified.pl +79 -0
- package/examples/output/gdpr-compliance.pl +6 -0
- package/examples/output/good-cobbler.pl +1 -0
- package/examples/output/gps.pl +21 -0
- package/examples/output/graph-reachability.pl +3 -0
- package/examples/output/gray-code-counter.pl +1 -0
- package/examples/output/greatest-lower-bound-uniqueness.pl +2 -0
- package/examples/output/group-inverse-uniqueness.pl +2 -0
- package/examples/output/hamiltonian-path.pl +121 -0
- package/examples/output/hamming-code.pl +6 -0
- package/examples/output/hanoi.pl +1 -0
- package/examples/output/heat-loss.pl +5 -0
- package/examples/output/heron-theorem.pl +4 -0
- package/examples/output/ideal-gas-law.pl +3 -0
- package/examples/output/illegitimate-reasoning.pl +15 -0
- package/examples/output/knowledge-engineering-alignment-flow.pl +17 -0
- package/examples/output/law-of-cosines.pl +3 -0
- package/examples/output/least-squares-regression.pl +5 -0
- package/examples/output/list-collection.pl +3 -0
- package/examples/output/lldm.pl +6 -0
- package/examples/output/manufacturing-quality-control.pl +6 -0
- package/examples/output/microgrid-dispatch.pl +6 -0
- package/examples/output/monkey-bananas.pl +5 -0
- package/examples/output/network-sla.pl +4 -0
- package/examples/output/newton-raphson.pl +3 -0
- package/examples/output/nixon-diamond.pl +5 -0
- package/examples/output/observability-log-correlation.pl +28 -0
- package/examples/output/odrl-dpv-fpv-trust-flow.pl +9 -0
- package/examples/output/odrl-dpv-healthcare-risk-ranked.pl +42 -0
- package/examples/output/odrl-dpv-risk-ranked.pl +120 -0
- package/examples/output/orbital-transfer-design.pl +7 -0
- package/examples/output/path-discovery.pl +3 -0
- package/examples/output/peano-arithmetic.pl +3 -0
- package/examples/output/peasant.pl +10 -0
- package/examples/output/pendulum-period.pl +4 -0
- package/examples/output/polynomial.pl +14 -0
- package/examples/output/proof-contrapositive.pl +3 -0
- package/examples/output/quadratic-formula.pl +6 -0
- package/examples/output/radioactive-decay.pl +5 -0
- package/examples/output/reusable-builtins.pl +5 -0
- package/examples/output/riemann-hypothesis.pl +12 -0
- package/examples/output/security-incident-correlation.pl +3 -0
- package/examples/output/service-impact.pl +11 -0
- package/examples/output/sieve.pl +1 -0
- package/examples/output/skolem-functions.pl +16 -0
- package/examples/output/socket-age.pl +1 -0
- package/examples/output/socket-family.pl +3 -0
- package/examples/output/socrates.pl +2 -0
- package/examples/output/statistics-summary.pl +4 -0
- package/examples/output/superdense-coding.pl +6 -0
- package/examples/output/term-tools.pl +6 -0
- package/examples/output/trust-flow-provenance-threshold.pl +6 -0
- package/examples/output/turing.pl +12 -0
- package/examples/output/vector-similarity.pl +4 -0
- package/examples/output/vulnerability-impact.pl +20 -0
- package/examples/output/witch.pl +7 -0
- package/examples/output/wolf-goat-cabbage.pl +3 -0
- package/examples/output/zebra.pl +3 -0
- package/examples/path-discovery.pl +45013 -0
- package/examples/peano-arithmetic.pl +31 -0
- package/examples/peasant.pl +30 -0
- package/examples/pendulum-period.pl +50 -0
- package/examples/polynomial.pl +124 -0
- package/examples/proof/age.pl +71 -0
- package/examples/proof/aliases-and-namespaces.pl +78 -0
- package/examples/proof/ancestor.pl +140 -0
- package/examples/proof/animal.pl +68 -0
- package/examples/proof/annotation.pl +80 -0
- package/examples/proof/backward.pl +22 -0
- package/examples/proof/cat-koko.pl +86 -0
- package/examples/proof/data-negotiation.pl +76 -0
- package/examples/proof/derived-rule.pl +43 -0
- package/examples/proof/dog.pl +31 -0
- package/examples/proof/electrical-rc-filter.pl +105 -0
- package/examples/proof/existential-rule.pl +40 -0
- package/examples/proof/floating-point.pl +160 -0
- package/examples/proof/good-cobbler.pl +16 -0
- package/examples/proof/group-inverse-uniqueness.pl +84 -0
- package/examples/proof/list-collection.pl +52 -0
- package/examples/proof/proof-contrapositive.pl +78 -0
- package/examples/proof/socket-age.pl +32 -0
- package/examples/proof/socket-family.pl +59 -0
- package/examples/proof/socrates.pl +38 -0
- package/examples/proof-contrapositive.pl +27 -0
- package/examples/quadratic-formula.pl +54 -0
- package/examples/radioactive-decay.pl +56 -0
- package/examples/reusable-builtins.pl +32 -0
- package/examples/riemann-hypothesis.pl +110 -0
- package/examples/security-incident-correlation.pl +69 -0
- package/examples/service-impact.pl +41 -0
- package/examples/sieve.pl +20 -0
- package/examples/skolem-functions.pl +52 -0
- package/examples/socket-age.pl +39 -0
- package/examples/socket-family.pl +28 -0
- package/examples/socrates.pl +19 -0
- package/examples/statistics-summary.pl +54 -0
- package/examples/superdense-coding.pl +84 -0
- package/examples/term-tools.pl +23 -0
- package/examples/trust-flow-provenance-threshold.pl +40 -0
- package/examples/turing.pl +67 -0
- package/examples/vector-similarity.pl +56 -0
- package/examples/vulnerability-impact.pl +70 -0
- package/examples/witch.pl +38 -0
- package/examples/wolf-goat-cabbage.pl +56 -0
- package/examples/zebra.pl +44 -0
- package/index.d.ts +80 -0
- package/index.js +4 -0
- package/package.json +48 -0
- package/src/bin.js +7 -0
- package/src/builtins/aggregation.js +81 -0
- package/src/builtins/arithmetic.js +208 -0
- package/src/builtins/context.js +42 -0
- package/src/builtins/control.js +34 -0
- package/src/builtins/core.js +78 -0
- package/src/builtins/lists.js +283 -0
- package/src/builtins/registry.js +48 -0
- package/src/builtins/strings.js +234 -0
- package/src/builtins/terms.js +66 -0
- package/src/cli.js +180 -0
- package/src/explain.js +324 -0
- package/src/hash.js +294 -0
- package/src/index.js +47 -0
- package/src/parser.js +428 -0
- package/src/program.js +237 -0
- package/src/solver.js +237 -0
- package/src/term.js +328 -0
- package/test/conformance/README.md +43 -0
- package/test/conformance/cases/001_fact_output.pl +4 -0
- package/test/conformance/cases/002_rule_recursion.pl +7 -0
- package/test/conformance/cases/002_rule_recursion.query +1 -0
- package/test/conformance/cases/003_terms_and_readback.pl +16 -0
- package/test/conformance/cases/003_terms_and_readback.query +1 -0
- package/test/conformance/cases/004_conjunction_and_parentheses.pl +5 -0
- package/test/conformance/cases/004_conjunction_and_parentheses.query +1 -0
- package/test/conformance/cases/005_list_deconstruction.pl +6 -0
- package/test/conformance/cases/005_list_deconstruction.query +1 -0
- package/test/conformance/cases/006_comma_formula_data.pl +4 -0
- package/test/conformance/cases/006_comma_formula_data.query +1 -0
- package/test/conformance/cases/007_anonymous_variables.pl +5 -0
- package/test/conformance/cases/007_anonymous_variables.query +1 -0
- package/test/conformance/cases/008_graphic_atoms.pl +6 -0
- package/test/conformance/cases/008_graphic_atoms.query +1 -0
- package/test/conformance/cases/009_comments_and_whitespace.pl +5 -0
- package/test/conformance/cases/009_comments_and_whitespace.query +1 -0
- package/test/conformance/cases/010_variable_scope_and_reuse.pl +8 -0
- package/test/conformance/cases/010_variable_scope_and_reuse.query +1 -0
- package/test/conformance/cases/011_predicate_arity.pl +6 -0
- package/test/conformance/cases/011_predicate_arity.query +1 -0
- package/test/conformance/cases/012_nested_compound_unification.pl +5 -0
- package/test/conformance/cases/012_nested_compound_unification.query +1 -0
- package/test/conformance/cases/013_multiple_clauses_order.pl +6 -0
- package/test/conformance/cases/013_multiple_clauses_order.query +1 -0
- package/test/conformance/cases/014_failure_filters_answers.pl +7 -0
- package/test/conformance/cases/014_failure_filters_answers.query +1 -0
- package/test/conformance/cases/015_improper_list_unification.pl +6 -0
- package/test/conformance/cases/015_improper_list_unification.query +1 -0
- package/test/conformance/cases/016_zero_arity_compound.pl +4 -0
- package/test/conformance/cases/016_zero_arity_compound.query +1 -0
- package/test/conformance/cases/017_three_step_recursion.pl +8 -0
- package/test/conformance/cases/017_three_step_recursion.query +1 -0
- package/test/conformance/cases/018_quoted_atom_readback.pl +6 -0
- package/test/conformance/cases/018_quoted_atom_readback.query +1 -0
- package/test/conformance/cases/019_parenthesized_three_conjuncts.pl +7 -0
- package/test/conformance/cases/019_parenthesized_three_conjuncts.query +1 -0
- package/test/conformance/cases/020_nested_list_terms.pl +5 -0
- package/test/conformance/cases/020_nested_list_terms.query +1 -0
- package/test/conformance/cases/021_repeated_variable_head.pl +7 -0
- package/test/conformance/cases/022_rule_head_structure.pl +5 -0
- package/test/conformance/cases/023_quoted_escapes_readback.pl +5 -0
- package/test/conformance/cases/024_numeric_literal_readback.pl +6 -0
- package/test/conformance/cases/025_body_parentheses_with_formula_data.pl +5 -0
- package/test/conformance/cases/026_underscore_named_variable_reuse.pl +5 -0
- package/test/conformance/cases/027_default_derived_output.pl +5 -0
- package/test/conformance/cases/028_materialize_focus.pl +5 -0
- package/test/conformance/cases/029_arithmetic_and_comparison.pl +11 -0
- package/test/conformance/cases/029_arithmetic_and_comparison.query +1 -0
- package/test/conformance/cases/030_strings_and_atoms.pl +4 -0
- package/test/conformance/cases/030_strings_and_atoms.query +1 -0
- package/test/conformance/cases/031_lists_aggregation_ordering.pl +10 -0
- package/test/conformance/cases/031_lists_aggregation_ordering.query +1 -0
- package/test/conformance/cases/032_holds_parts.pl +4 -0
- package/test/conformance/cases/033_negation_once_generators.pl +7 -0
- package/test/conformance/cases/033_negation_once_generators.query +1 -0
- package/test/conformance/cases/034_equality_and_inequality.pl +6 -0
- package/test/conformance/cases/034_equality_and_inequality.query +1 -0
- package/test/conformance/cases/035_list_relations.pl +5 -0
- package/test/conformance/cases/035_list_relations.query +1 -0
- package/test/conformance/cases/036_append_splits.pl +3 -0
- package/test/conformance/cases/036_append_splits.query +1 -0
- package/test/conformance/cases/037_matching_and_comparison.pl +7 -0
- package/test/conformance/cases/037_matching_and_comparison.query +1 -0
- package/test/conformance/cases/038_memoize_declaration.pl +8 -0
- package/test/conformance/cases/038_memoize_declaration.query +1 -0
- package/test/conformance/cases/039_numeric_functions.pl +9 -0
- package/test/conformance/cases/039_numeric_functions.query +1 -0
- package/test/conformance/cases/040_between_enumeration.pl +3 -0
- package/test/conformance/cases/040_between_enumeration.query +1 -0
- package/test/conformance/cases/041_smallest_divisor.pl +3 -0
- package/test/conformance/cases/041_smallest_divisor.query +1 -0
- package/test/conformance/cases/042_negation_filter.pl +7 -0
- package/test/conformance/cases/042_negation_filter.query +1 -0
- package/test/conformance/cases/043_once_user_predicate.pl +5 -0
- package/test/conformance/cases/043_once_user_predicate.query +1 -0
- package/test/conformance/cases/044_findall_user_goal.pl +6 -0
- package/test/conformance/cases/044_findall_user_goal.query +1 -0
- package/test/conformance/cases/045_sort_deduplicates_atoms.pl +3 -0
- package/test/conformance/cases/045_sort_deduplicates_atoms.query +1 -0
- package/test/conformance/cases/046_append_bound_prefix_suffix.pl +4 -0
- package/test/conformance/cases/046_append_bound_prefix_suffix.query +1 -0
- package/test/conformance/cases/047_nth0_index_generation.pl +3 -0
- package/test/conformance/cases/047_nth0_index_generation.query +1 -0
- package/test/conformance/cases/048_set_nth0_edges.pl +4 -0
- package/test/conformance/cases/048_set_nth0_edges.query +1 -0
- package/test/conformance/cases/049_select_duplicate_occurrences.pl +3 -0
- package/test/conformance/cases/049_select_duplicate_occurrences.query +1 -0
- package/test/conformance/cases/050_not_member_filter.pl +6 -0
- package/test/conformance/cases/050_not_member_filter.query +1 -0
- package/test/conformance/cases/051_nested_holds_parts.pl +4 -0
- package/test/conformance/cases/052_holds_member.pl +3 -0
- package/test/conformance/cases/053_materialize_excludes_source_fact.pl +6 -0
- package/test/conformance/cases/054_numeric_and_lexical_comparison.pl +5 -0
- package/test/conformance/cases/054_numeric_and_lexical_comparison.query +1 -0
- package/test/conformance/cases/055_string_matching_filters.pl +6 -0
- package/test/conformance/cases/055_string_matching_filters.query +1 -0
- package/test/conformance/cases/056_string_and_atom_concat.pl +3 -0
- package/test/conformance/cases/056_string_and_atom_concat.query +1 -0
- package/test/conformance/cases/057_countall_empty_and_nonempty.pl +4 -0
- package/test/conformance/cases/057_countall_empty_and_nonempty.query +1 -0
- package/test/conformance/cases/058_sumall_numeric_template.pl +5 -0
- package/test/conformance/cases/058_sumall_numeric_template.query +1 -0
- package/test/conformance/cases/059_aggregate_min_template.pl +5 -0
- package/test/conformance/cases/059_aggregate_min_template.query +1 -0
- package/test/conformance/cases/060_aggregate_max_compound_key.pl +5 -0
- package/test/conformance/cases/060_aggregate_max_compound_key.query +1 -0
- package/test/conformance/cases/061_date_difference.pl +4 -0
- package/test/conformance/cases/062_reusable_numeric_builtins.pl +10 -0
- package/test/conformance/cases/063_reusable_list_builtins.pl +11 -0
- package/test/conformance/cases/064_reusable_string_builtins.pl +12 -0
- package/test/conformance/cases/065_reusable_term_control_builtins.pl +11 -0
- package/test/conformance/cases/066_numeric_edges.pl +14 -0
- package/test/conformance/cases/067_list_edges.pl +10 -0
- package/test/conformance/cases/068_list_generation_order.pl +7 -0
- package/test/conformance/cases/069_list_summaries_and_sets.pl +9 -0
- package/test/conformance/cases/070_matches_named_captures.pl +13 -0
- package/test/conformance/cases/071_string_edges.pl +10 -0
- package/test/conformance/cases/072_string_conversions.pl +10 -0
- package/test/conformance/cases/073_term_introspection_edges.pl +10 -0
- package/test/conformance/cases/074_forall_edges.pl +10 -0
- package/test/conformance/cases/075_aggregation_edges.pl +12 -0
- package/test/conformance/cases/076_composed_reusable_builtins.pl +8 -0
- package/test/conformance/cases/077_recursive_path_with_lists.pl +10 -0
- package/test/conformance/cases/078_mutual_recursion_with_arithmetic.pl +7 -0
- package/test/conformance/cases/079_big_integer_arithmetic.pl +8 -0
- package/test/conformance/cases/080_rounding_modes.pl +10 -0
- package/test/conformance/cases/081_zero_safe_numeric_functions.pl +9 -0
- package/test/conformance/cases/082_comparison_semantics.pl +10 -0
- package/test/conformance/cases/083_between_modes_and_empty_ranges.pl +8 -0
- package/test/conformance/cases/084_append_and_select_composition.pl +7 -0
- package/test/conformance/cases/085_nth_and_update_edges.pl +8 -0
- package/test/conformance/cases/086_slicing_pipeline.pl +10 -0
- package/test/conformance/cases/087_sort_reverse_length.pl +8 -0
- package/test/conformance/cases/088_list_summaries_failures.pl +8 -0
- package/test/conformance/cases/089_string_split_join_pipeline.pl +7 -0
- package/test/conformance/cases/090_string_substring_replace_edges.pl +9 -0
- package/test/conformance/cases/091_string_case_and_trim.pl +7 -0
- package/test/conformance/cases/092_scalar_string_conversions.pl +9 -0
- package/test/conformance/cases/093_regex_named_captures_context.pl +8 -0
- package/test/conformance/cases/094_context_holds_enumeration.pl +7 -0
- package/test/conformance/cases/095_term_introspection_roundtrip.pl +8 -0
- package/test/conformance/cases/096_functor_scalar_edges.pl +8 -0
- package/test/conformance/cases/097_control_negation_once_forall.pl +13 -0
- package/test/conformance/cases/098_aggregation_nested_templates.pl +11 -0
- package/test/conformance/cases/099_materialize_multiple_arities.pl +8 -0
- package/test/conformance/cases/100_reusable_builtin_workflow.pl +10 -0
- package/test/conformance/expected/001_fact_output.pl +1 -0
- package/test/conformance/expected/002_rule_recursion.pl +2 -0
- package/test/conformance/expected/003_terms_and_readback.pl +13 -0
- package/test/conformance/expected/004_conjunction_and_parentheses.pl +1 -0
- package/test/conformance/expected/005_list_deconstruction.pl +2 -0
- package/test/conformance/expected/006_comma_formula_data.pl +1 -0
- package/test/conformance/expected/007_anonymous_variables.pl +1 -0
- package/test/conformance/expected/008_graphic_atoms.pl +3 -0
- package/test/conformance/expected/009_comments_and_whitespace.pl +2 -0
- package/test/conformance/expected/010_variable_scope_and_reuse.pl +2 -0
- package/test/conformance/expected/011_predicate_arity.pl +2 -0
- package/test/conformance/expected/012_nested_compound_unification.pl +2 -0
- package/test/conformance/expected/013_multiple_clauses_order.pl +2 -0
- package/test/conformance/expected/014_failure_filters_answers.pl +1 -0
- package/test/conformance/expected/015_improper_list_unification.pl +3 -0
- package/test/conformance/expected/016_zero_arity_compound.pl +1 -0
- package/test/conformance/expected/017_three_step_recursion.pl +3 -0
- package/test/conformance/expected/018_quoted_atom_readback.pl +3 -0
- package/test/conformance/expected/019_parenthesized_three_conjuncts.pl +1 -0
- package/test/conformance/expected/020_nested_list_terms.pl +2 -0
- package/test/conformance/expected/021_repeated_variable_head.pl +2 -0
- package/test/conformance/expected/022_rule_head_structure.pl +2 -0
- package/test/conformance/expected/023_quoted_escapes_readback.pl +2 -0
- package/test/conformance/expected/024_numeric_literal_readback.pl +3 -0
- package/test/conformance/expected/025_body_parentheses_with_formula_data.pl +1 -0
- package/test/conformance/expected/026_underscore_named_variable_reuse.pl +1 -0
- package/test/conformance/expected/027_default_derived_output.pl +3 -0
- package/test/conformance/expected/028_materialize_focus.pl +1 -0
- package/test/conformance/expected/029_arithmetic_and_comparison.pl +9 -0
- package/test/conformance/expected/030_strings_and_atoms.pl +2 -0
- package/test/conformance/expected/031_lists_aggregation_ordering.pl +9 -0
- package/test/conformance/expected/032_holds_parts.pl +3 -0
- package/test/conformance/expected/033_negation_once_generators.pl +2 -0
- package/test/conformance/expected/034_equality_and_inequality.pl +4 -0
- package/test/conformance/expected/035_list_relations.pl +4 -0
- package/test/conformance/expected/036_append_splits.pl +3 -0
- package/test/conformance/expected/037_matching_and_comparison.pl +5 -0
- package/test/conformance/expected/038_memoize_declaration.pl +2 -0
- package/test/conformance/expected/039_numeric_functions.pl +7 -0
- package/test/conformance/expected/040_between_enumeration.pl +3 -0
- package/test/conformance/expected/041_smallest_divisor.pl +1 -0
- package/test/conformance/expected/042_negation_filter.pl +2 -0
- package/test/conformance/expected/043_once_user_predicate.pl +1 -0
- package/test/conformance/expected/044_findall_user_goal.pl +1 -0
- package/test/conformance/expected/045_sort_deduplicates_atoms.pl +1 -0
- package/test/conformance/expected/046_append_bound_prefix_suffix.pl +2 -0
- package/test/conformance/expected/047_nth0_index_generation.pl +1 -0
- package/test/conformance/expected/048_set_nth0_edges.pl +2 -0
- package/test/conformance/expected/049_select_duplicate_occurrences.pl +2 -0
- package/test/conformance/expected/050_not_member_filter.pl +1 -0
- package/test/conformance/expected/051_nested_holds_parts.pl +3 -0
- package/test/conformance/expected/052_holds_member.pl +2 -0
- package/test/conformance/expected/053_materialize_excludes_source_fact.pl +1 -0
- package/test/conformance/expected/054_numeric_and_lexical_comparison.pl +3 -0
- package/test/conformance/expected/055_string_matching_filters.pl +2 -0
- package/test/conformance/expected/056_string_and_atom_concat.pl +1 -0
- package/test/conformance/expected/057_countall_empty_and_nonempty.pl +1 -0
- package/test/conformance/expected/058_sumall_numeric_template.pl +1 -0
- package/test/conformance/expected/059_aggregate_min_template.pl +1 -0
- package/test/conformance/expected/060_aggregate_max_compound_key.pl +1 -0
- package/test/conformance/expected/061_date_difference.pl +2 -0
- package/test/conformance/expected/062_reusable_numeric_builtins.pl +8 -0
- package/test/conformance/expected/063_reusable_list_builtins.pl +9 -0
- package/test/conformance/expected/064_reusable_string_builtins.pl +10 -0
- package/test/conformance/expected/065_reusable_term_control_builtins.pl +6 -0
- package/test/conformance/expected/066_numeric_edges.pl +12 -0
- package/test/conformance/expected/067_list_edges.pl +8 -0
- package/test/conformance/expected/068_list_generation_order.pl +10 -0
- package/test/conformance/expected/069_list_summaries_and_sets.pl +7 -0
- package/test/conformance/expected/070_matches_named_captures.pl +1 -0
- package/test/conformance/expected/071_string_edges.pl +8 -0
- package/test/conformance/expected/072_string_conversions.pl +8 -0
- package/test/conformance/expected/073_term_introspection_edges.pl +8 -0
- package/test/conformance/expected/074_forall_edges.pl +5 -0
- package/test/conformance/expected/075_aggregation_edges.pl +7 -0
- package/test/conformance/expected/076_composed_reusable_builtins.pl +5 -0
- package/test/conformance/expected/077_recursive_path_with_lists.pl +3 -0
- package/test/conformance/expected/078_mutual_recursion_with_arithmetic.pl +7 -0
- package/test/conformance/expected/079_big_integer_arithmetic.pl +6 -0
- package/test/conformance/expected/080_rounding_modes.pl +8 -0
- package/test/conformance/expected/081_zero_safe_numeric_functions.pl +7 -0
- package/test/conformance/expected/082_comparison_semantics.pl +8 -0
- package/test/conformance/expected/083_between_modes_and_empty_ranges.pl +8 -0
- package/test/conformance/expected/084_append_and_select_composition.pl +10 -0
- package/test/conformance/expected/085_nth_and_update_edges.pl +8 -0
- package/test/conformance/expected/086_slicing_pipeline.pl +7 -0
- package/test/conformance/expected/087_sort_reverse_length.pl +6 -0
- package/test/conformance/expected/088_list_summaries_failures.pl +6 -0
- package/test/conformance/expected/089_string_split_join_pipeline.pl +4 -0
- package/test/conformance/expected/090_string_substring_replace_edges.pl +7 -0
- package/test/conformance/expected/091_string_case_and_trim.pl +5 -0
- package/test/conformance/expected/092_scalar_string_conversions.pl +7 -0
- package/test/conformance/expected/093_regex_named_captures_context.pl +5 -0
- package/test/conformance/expected/094_context_holds_enumeration.pl +8 -0
- package/test/conformance/expected/095_term_introspection_roundtrip.pl +6 -0
- package/test/conformance/expected/096_functor_scalar_edges.pl +6 -0
- package/test/conformance/expected/097_control_negation_once_forall.pl +5 -0
- package/test/conformance/expected/098_aggregation_nested_templates.pl +5 -0
- package/test/conformance/expected/099_materialize_multiple_arities.pl +4 -0
- package/test/conformance/expected/100_reusable_builtin_workflow.pl +6 -0
- package/test/run-all.mjs +20 -0
- package/test/run-conformance.mjs +78 -0
- package/test/run-examples.mjs +125 -0
- package/test/run-regression.mjs +612 -0
- package/test/test-style.mjs +94 -0
|
@@ -0,0 +1,283 @@
|
|
|
1
|
+
// List builtins for proper lists, selection, membership, sorting, indexing, slicing, and summaries.
|
|
2
|
+
// Several predicates support both checking and generation, so the argument modes are handled explicitly.
|
|
3
|
+
import {
|
|
4
|
+
compareTerms,
|
|
5
|
+
copyResolved,
|
|
6
|
+
deref,
|
|
7
|
+
isDecimalInteger,
|
|
8
|
+
isCons,
|
|
9
|
+
lexicalValue,
|
|
10
|
+
listFromItems,
|
|
11
|
+
numberTerm,
|
|
12
|
+
numberTextFromDouble,
|
|
13
|
+
parseFiniteNumber,
|
|
14
|
+
properListItems,
|
|
15
|
+
unify,
|
|
16
|
+
} from '../term.js';
|
|
17
|
+
|
|
18
|
+
export const listBuiltins = {
|
|
19
|
+
register(registry) {
|
|
20
|
+
registry.add('append', 3, append);
|
|
21
|
+
registry.add('nth0', 3, nth0);
|
|
22
|
+
registry.add('set_nth0', 4, setNth0, { deterministic: true });
|
|
23
|
+
registry.add('head', 2, head, { deterministic: true, fallbackWhenNotReady: true, ready: firstConsReady });
|
|
24
|
+
registry.add('rest', 2, rest, { deterministic: true, fallbackWhenNotReady: true, ready: firstConsReady });
|
|
25
|
+
registry.add('last', 2, last, { deterministic: true, fallbackWhenNotReady: true, ready: firstProperListReady });
|
|
26
|
+
registry.add('take', 3, take, { deterministic: true, fallbackWhenNotReady: true, ready: countAndListReady });
|
|
27
|
+
registry.add('drop', 3, drop, { deterministic: true, fallbackWhenNotReady: true, ready: countAndListReady });
|
|
28
|
+
registry.add('slice', 4, slice, { deterministic: true, fallbackWhenNotReady: true, ready: sliceReady });
|
|
29
|
+
registry.add('member', 2, member);
|
|
30
|
+
registry.add('select', 3, select);
|
|
31
|
+
registry.add('not_member', 2, notMember, { deterministic: true });
|
|
32
|
+
registry.add('reverse', 2, reverse, { deterministic: true });
|
|
33
|
+
registry.add('length', 2, lengthBuiltin, { deterministic: true });
|
|
34
|
+
registry.add('sum_list', 2, sumList, { deterministic: true, fallbackWhenNotReady: true, ready: firstProperListReady });
|
|
35
|
+
registry.add('min_list', 2, minList, { deterministic: true, fallbackWhenNotReady: true, ready: firstProperListReady });
|
|
36
|
+
registry.add('max_list', 2, maxList, { deterministic: true, fallbackWhenNotReady: true, ready: firstProperListReady });
|
|
37
|
+
registry.add('list_to_set', 2, listToSet, { deterministic: true, fallbackWhenNotReady: true, ready: firstProperListReady });
|
|
38
|
+
registry.add('sort', 2, sortBuiltin, { deterministic: true });
|
|
39
|
+
}
|
|
40
|
+
};
|
|
41
|
+
|
|
42
|
+
|
|
43
|
+
|
|
44
|
+
function firstConsReady(goal, env) {
|
|
45
|
+
return isCons(deref(goal.args[0], env));
|
|
46
|
+
}
|
|
47
|
+
|
|
48
|
+
function firstProperListReady(goal, env) {
|
|
49
|
+
return properListItems(goal.args[0], env) !== null;
|
|
50
|
+
}
|
|
51
|
+
|
|
52
|
+
function countAndListReady(goal, env) {
|
|
53
|
+
return safeIndex(goal.args[0], env) !== null && properListItems(goal.args[1], env) !== null;
|
|
54
|
+
}
|
|
55
|
+
|
|
56
|
+
function sliceReady(goal, env) {
|
|
57
|
+
return safeIndex(goal.args[0], env) !== null && safeIndex(goal.args[1], env) !== null && properListItems(goal.args[2], env) !== null;
|
|
58
|
+
}
|
|
59
|
+
|
|
60
|
+
function listFromItemsExcept(items, skip) {
|
|
61
|
+
const copy = new Array(items.length - 1);
|
|
62
|
+
for (let i = 0, j = 0; i < items.length; i++) if (i !== skip) copy[j++] = items[i];
|
|
63
|
+
return listFromItems(copy);
|
|
64
|
+
}
|
|
65
|
+
|
|
66
|
+
function* append({ goal, env }) {
|
|
67
|
+
let items = properListItems(goal.args[0], env);
|
|
68
|
+
if (items) {
|
|
69
|
+
const result = listFromItems(items, 0, items.length, deref(goal.args[1], env));
|
|
70
|
+
const next = env.clone();
|
|
71
|
+
if (unify(goal.args[2], result, next)) yield next;
|
|
72
|
+
return;
|
|
73
|
+
}
|
|
74
|
+
items = properListItems(goal.args[2], env);
|
|
75
|
+
if (!items) return;
|
|
76
|
+
for (let split = 0; split <= items.length; split++) {
|
|
77
|
+
const prefix = listFromItems(items, 0, split);
|
|
78
|
+
const suffix = listFromItems(items, split, items.length);
|
|
79
|
+
const next = env.clone();
|
|
80
|
+
if (unify(goal.args[0], prefix, next) && unify(goal.args[1], suffix, next)) yield next;
|
|
81
|
+
}
|
|
82
|
+
}
|
|
83
|
+
|
|
84
|
+
function* nth0({ goal, env }) {
|
|
85
|
+
const items = properListItems(goal.args[1], env);
|
|
86
|
+
if (!items) return;
|
|
87
|
+
const indexText = lexicalValue(goal.args[0], env);
|
|
88
|
+
if (/^-?\d+$/.test(indexText ?? '')) {
|
|
89
|
+
const index = Number(indexText);
|
|
90
|
+
if (Number.isSafeInteger(index) && index >= 0 && index < items.length) {
|
|
91
|
+
const next = env.clone();
|
|
92
|
+
if (unify(goal.args[2], items[index], next)) yield next;
|
|
93
|
+
}
|
|
94
|
+
return;
|
|
95
|
+
}
|
|
96
|
+
if (deref(goal.args[0], env).type !== 'var') return;
|
|
97
|
+
for (let i = 0; i < items.length; i++) {
|
|
98
|
+
const next = env.clone();
|
|
99
|
+
if (unify(goal.args[0], numberTerm(i), next) && unify(goal.args[2], items[i], next)) yield next;
|
|
100
|
+
}
|
|
101
|
+
}
|
|
102
|
+
|
|
103
|
+
function* setNth0({ goal, env }) {
|
|
104
|
+
const index = safeIndex(goal.args[0], env);
|
|
105
|
+
if (index == null) return;
|
|
106
|
+
const items = properListItems(goal.args[1], env);
|
|
107
|
+
if (!items || index >= items.length) return;
|
|
108
|
+
const out = items.slice();
|
|
109
|
+
out[index] = goal.args[2];
|
|
110
|
+
const next = env.clone();
|
|
111
|
+
if (unify(goal.args[3], listFromItems(out), next)) yield next;
|
|
112
|
+
}
|
|
113
|
+
|
|
114
|
+
function* head({ goal, env }) {
|
|
115
|
+
const list = deref(goal.args[0], env);
|
|
116
|
+
if (!isCons(list)) return;
|
|
117
|
+
const next = env.clone();
|
|
118
|
+
if (unify(goal.args[1], list.args[0], next)) yield next;
|
|
119
|
+
}
|
|
120
|
+
|
|
121
|
+
function* rest({ goal, env }) {
|
|
122
|
+
const list = deref(goal.args[0], env);
|
|
123
|
+
if (!isCons(list)) return;
|
|
124
|
+
const next = env.clone();
|
|
125
|
+
if (unify(goal.args[1], list.args[1], next)) yield next;
|
|
126
|
+
}
|
|
127
|
+
|
|
128
|
+
function* last({ goal, env }) {
|
|
129
|
+
const items = properListItems(goal.args[0], env);
|
|
130
|
+
if (!items || items.length === 0) return;
|
|
131
|
+
const next = env.clone();
|
|
132
|
+
if (unify(goal.args[1], items[items.length - 1], next)) yield next;
|
|
133
|
+
}
|
|
134
|
+
|
|
135
|
+
function* take({ goal, env }) {
|
|
136
|
+
const count = safeIndex(goal.args[0], env);
|
|
137
|
+
if (count == null) return;
|
|
138
|
+
const items = properListItems(goal.args[1], env);
|
|
139
|
+
if (!items || count > items.length) return;
|
|
140
|
+
const next = env.clone();
|
|
141
|
+
if (unify(goal.args[2], listFromItems(items, 0, count), next)) yield next;
|
|
142
|
+
}
|
|
143
|
+
|
|
144
|
+
function* drop({ goal, env }) {
|
|
145
|
+
const count = safeIndex(goal.args[0], env);
|
|
146
|
+
if (count == null) return;
|
|
147
|
+
const items = properListItems(goal.args[1], env);
|
|
148
|
+
if (!items || count > items.length) return;
|
|
149
|
+
const next = env.clone();
|
|
150
|
+
if (unify(goal.args[2], listFromItems(items, count, items.length), next)) yield next;
|
|
151
|
+
}
|
|
152
|
+
|
|
153
|
+
function* slice({ goal, env }) {
|
|
154
|
+
const start = safeIndex(goal.args[0], env);
|
|
155
|
+
const count = safeIndex(goal.args[1], env);
|
|
156
|
+
if (start == null || count == null) return;
|
|
157
|
+
const items = properListItems(goal.args[2], env);
|
|
158
|
+
if (!items || start + count > items.length) return;
|
|
159
|
+
const next = env.clone();
|
|
160
|
+
if (unify(goal.args[3], listFromItems(items, start, start + count), next)) yield next;
|
|
161
|
+
}
|
|
162
|
+
|
|
163
|
+
function* member({ goal, env }) {
|
|
164
|
+
const items = properListItems(goal.args[1], env);
|
|
165
|
+
if (!items) return;
|
|
166
|
+
for (const item of items) {
|
|
167
|
+
const next = env.clone();
|
|
168
|
+
if (unify(goal.args[0], item, next)) yield next;
|
|
169
|
+
}
|
|
170
|
+
}
|
|
171
|
+
|
|
172
|
+
function* select({ goal, env }) {
|
|
173
|
+
const items = properListItems(goal.args[1], env);
|
|
174
|
+
if (!items) return;
|
|
175
|
+
for (let i = 0; i < items.length; i++) {
|
|
176
|
+
const next = env.clone();
|
|
177
|
+
if (unify(goal.args[0], items[i], next) && unify(goal.args[2], listFromItemsExcept(items, i), next)) yield next;
|
|
178
|
+
}
|
|
179
|
+
}
|
|
180
|
+
|
|
181
|
+
function* notMember({ goal, env }) {
|
|
182
|
+
const items = properListItems(goal.args[1], env);
|
|
183
|
+
if (!items) return;
|
|
184
|
+
const value = deref(goal.args[0], env);
|
|
185
|
+
if (value.type === 'number' || value.type === 'atom' || value.type === 'string') {
|
|
186
|
+
for (const item of items) {
|
|
187
|
+
const resolved = deref(item, env);
|
|
188
|
+
if (resolved.type === value.type && resolved.name === value.name) return;
|
|
189
|
+
}
|
|
190
|
+
yield env;
|
|
191
|
+
return;
|
|
192
|
+
}
|
|
193
|
+
for (const item of items) {
|
|
194
|
+
const attempt = env.clone();
|
|
195
|
+
if (unify(goal.args[0], item, attempt)) return;
|
|
196
|
+
}
|
|
197
|
+
yield env;
|
|
198
|
+
}
|
|
199
|
+
|
|
200
|
+
function* reverse({ goal, env }) {
|
|
201
|
+
const items = properListItems(goal.args[0], env);
|
|
202
|
+
if (!items) return;
|
|
203
|
+
const next = env.clone();
|
|
204
|
+
if (unify(goal.args[1], listFromItems([...items].reverse()), next)) yield next;
|
|
205
|
+
}
|
|
206
|
+
|
|
207
|
+
function* lengthBuiltin({ goal, env }) {
|
|
208
|
+
const items = properListItems(goal.args[0], env);
|
|
209
|
+
if (!items) return;
|
|
210
|
+
const next = env.clone();
|
|
211
|
+
if (unify(goal.args[1], numberTerm(items.length), next)) yield next;
|
|
212
|
+
}
|
|
213
|
+
|
|
214
|
+
function* sumList({ goal, env }) {
|
|
215
|
+
const items = properListItems(goal.args[0], env);
|
|
216
|
+
if (!items) return;
|
|
217
|
+
let intSum = 0n;
|
|
218
|
+
let floatMode = false;
|
|
219
|
+
let floatSum = 0;
|
|
220
|
+
for (const item of items) {
|
|
221
|
+
const text = lexicalValue(item, env);
|
|
222
|
+
if (text == null) return;
|
|
223
|
+
if (!floatMode && isDecimalInteger(text)) intSum += BigInt(text);
|
|
224
|
+
else {
|
|
225
|
+
const value = parseFiniteNumber(text);
|
|
226
|
+
if (value == null) return;
|
|
227
|
+
if (!floatMode) { floatSum = Number(intSum); floatMode = true; }
|
|
228
|
+
floatSum += value;
|
|
229
|
+
}
|
|
230
|
+
}
|
|
231
|
+
const out = floatMode ? numberTextFromDouble(floatSum) : intSum.toString();
|
|
232
|
+
const next = env.clone();
|
|
233
|
+
if (unify(goal.args[1], numberTerm(out), next)) yield next;
|
|
234
|
+
}
|
|
235
|
+
|
|
236
|
+
function* minList({ goal, env }) {
|
|
237
|
+
yield* minMaxList(goal, env, true);
|
|
238
|
+
}
|
|
239
|
+
|
|
240
|
+
function* maxList({ goal, env }) {
|
|
241
|
+
yield* minMaxList(goal, env, false);
|
|
242
|
+
}
|
|
243
|
+
|
|
244
|
+
function* minMaxList(goal, env, wantMin) {
|
|
245
|
+
const items = properListItems(goal.args[0], env);
|
|
246
|
+
if (!items || items.length === 0) return;
|
|
247
|
+
let best = copyResolved(items[0], env);
|
|
248
|
+
for (let i = 1; i < items.length; i++) {
|
|
249
|
+
const item = copyResolved(items[i], env);
|
|
250
|
+
const cmp = compareTerms(item, best);
|
|
251
|
+
if ((wantMin && cmp < 0) || (!wantMin && cmp > 0)) best = item;
|
|
252
|
+
}
|
|
253
|
+
const next = env.clone();
|
|
254
|
+
if (unify(goal.args[1], best, next)) yield next;
|
|
255
|
+
}
|
|
256
|
+
|
|
257
|
+
function* listToSet({ goal, env }) {
|
|
258
|
+
const items = properListItems(goal.args[0], env);
|
|
259
|
+
if (!items) return;
|
|
260
|
+
const unique = [];
|
|
261
|
+
for (const item of items.map((entry) => copyResolved(entry, env))) {
|
|
262
|
+
if (!unique.some((seen) => compareTerms(seen, item) === 0)) unique.push(item);
|
|
263
|
+
}
|
|
264
|
+
const next = env.clone();
|
|
265
|
+
if (unify(goal.args[1], listFromItems(unique), next)) yield next;
|
|
266
|
+
}
|
|
267
|
+
|
|
268
|
+
function* sortBuiltin({ goal, env }) {
|
|
269
|
+
const items = properListItems(goal.args[0], env);
|
|
270
|
+
if (!items) return;
|
|
271
|
+
const sorted = items.map((item) => copyResolved(item, env)).sort(compareTerms);
|
|
272
|
+
const unique = [];
|
|
273
|
+
for (const item of sorted) if (unique.length === 0 || compareTerms(unique[unique.length - 1], item) !== 0) unique.push(item);
|
|
274
|
+
const next = env.clone();
|
|
275
|
+
if (unify(goal.args[1], listFromItems(unique), next)) yield next;
|
|
276
|
+
}
|
|
277
|
+
|
|
278
|
+
function safeIndex(term, env) {
|
|
279
|
+
const text = lexicalValue(term, env);
|
|
280
|
+
if (!/^-?\d+$/.test(text ?? '')) return null;
|
|
281
|
+
const index = Number(text);
|
|
282
|
+
return Number.isSafeInteger(index) && index >= 0 ? index : null;
|
|
283
|
+
}
|
|
@@ -0,0 +1,48 @@
|
|
|
1
|
+
// Registry for builtins and their execution metadata.
|
|
2
|
+
// The solver uses the metadata to know when a builtin is deterministic, mode-ready, or should fall back to user clauses.
|
|
3
|
+
import { arithmeticBuiltins } from './arithmetic.js';
|
|
4
|
+
import { coreBuiltins } from './core.js';
|
|
5
|
+
import { stringBuiltins } from './strings.js';
|
|
6
|
+
import { listBuiltins } from './lists.js';
|
|
7
|
+
import { aggregationBuiltins } from './aggregation.js';
|
|
8
|
+
import { contextBuiltins } from './context.js';
|
|
9
|
+
import { controlBuiltins } from './control.js';
|
|
10
|
+
import { termBuiltins } from './terms.js';
|
|
11
|
+
|
|
12
|
+
export class BuiltinRegistry {
|
|
13
|
+
constructor() {
|
|
14
|
+
this.defs = new Map();
|
|
15
|
+
}
|
|
16
|
+
add(name, arity, handler, options = {}) {
|
|
17
|
+
// ready() describes the argument mode in which the builtin is safe to run;
|
|
18
|
+
// fallbackWhenNotReady keeps user-defined clauses visible outside that mode.
|
|
19
|
+
this.defs.set(`${name}/${arity}`, {
|
|
20
|
+
name,
|
|
21
|
+
arity,
|
|
22
|
+
handler,
|
|
23
|
+
deterministic: options.deterministic ?? false,
|
|
24
|
+
ready: options.ready ?? null,
|
|
25
|
+
fallbackWhenNotReady: options.fallbackWhenNotReady ?? false,
|
|
26
|
+
shouldUse: options.shouldUse ?? null,
|
|
27
|
+
});
|
|
28
|
+
return this;
|
|
29
|
+
}
|
|
30
|
+
get(name, arity) {
|
|
31
|
+
return this.defs.get(`${name}/${arity}`) ?? null;
|
|
32
|
+
}
|
|
33
|
+
}
|
|
34
|
+
|
|
35
|
+
export function createDefaultRegistry() {
|
|
36
|
+
const registry = new BuiltinRegistry();
|
|
37
|
+
for (const mod of [coreBuiltins, arithmeticBuiltins, stringBuiltins, listBuiltins, aggregationBuiltins, contextBuiltins, controlBuiltins, termBuiltins]) {
|
|
38
|
+
mod.register(registry);
|
|
39
|
+
}
|
|
40
|
+
return registry;
|
|
41
|
+
}
|
|
42
|
+
|
|
43
|
+
let defaultRegistry = null;
|
|
44
|
+
|
|
45
|
+
export function getDefaultRegistry() {
|
|
46
|
+
if (defaultRegistry == null) defaultRegistry = createDefaultRegistry();
|
|
47
|
+
return defaultRegistry;
|
|
48
|
+
}
|
|
@@ -0,0 +1,234 @@
|
|
|
1
|
+
// String builtins.
|
|
2
|
+
// They mostly project from already-ground terms to avoid guessing string domains.
|
|
3
|
+
import {
|
|
4
|
+
atom,
|
|
5
|
+
compound,
|
|
6
|
+
deref,
|
|
7
|
+
isDecimalInteger,
|
|
8
|
+
lexicalValue,
|
|
9
|
+
listFromItems,
|
|
10
|
+
numberTerm,
|
|
11
|
+
parseFiniteNumber,
|
|
12
|
+
properListItems,
|
|
13
|
+
stringTerm,
|
|
14
|
+
termToString,
|
|
15
|
+
unify,
|
|
16
|
+
} from '../term.js';
|
|
17
|
+
|
|
18
|
+
export const stringBuiltins = {
|
|
19
|
+
register(registry) {
|
|
20
|
+
registry.add('str_concat', 3, concat, { deterministic: true });
|
|
21
|
+
for (const name of ['contains', 'matches', 'not_matches']) registry.add(name, 2, contains(name), { deterministic: true });
|
|
22
|
+
registry.add('matches', 3, matchCaptures, { deterministic: true });
|
|
23
|
+
registry.add('split', 3, split, { deterministic: true, fallbackWhenNotReady: true, ready: firstTwoLexicalReady });
|
|
24
|
+
registry.add('join', 3, join, { deterministic: true, fallbackWhenNotReady: true, ready: listAndSecondLexicalReady });
|
|
25
|
+
registry.add('substring', 4, substring, { deterministic: true, fallbackWhenNotReady: true, ready: substringReady });
|
|
26
|
+
registry.add('replace', 4, replace, { deterministic: true, fallbackWhenNotReady: true, ready: firstThreeLexicalReady });
|
|
27
|
+
registry.add('lowercase', 2, caseFold('lower'), { deterministic: true, fallbackWhenNotReady: true, ready: firstLexicalReady });
|
|
28
|
+
registry.add('uppercase', 2, caseFold('upper'), { deterministic: true, fallbackWhenNotReady: true, ready: firstLexicalReady });
|
|
29
|
+
registry.add('trim', 2, trim, { deterministic: true, fallbackWhenNotReady: true, ready: firstLexicalReady });
|
|
30
|
+
registry.add('number_string', 2, numberString, { deterministic: true, fallbackWhenNotReady: true, ready: numberStringReady });
|
|
31
|
+
registry.add('atom_string', 2, atomString, { deterministic: true, fallbackWhenNotReady: true, ready: atomStringReady });
|
|
32
|
+
registry.add('term_string', 2, termString, { deterministic: true, fallbackWhenNotReady: true, ready: firstNonvarReady });
|
|
33
|
+
}
|
|
34
|
+
};
|
|
35
|
+
|
|
36
|
+
|
|
37
|
+
|
|
38
|
+
function firstLexicalReady(goal, env) {
|
|
39
|
+
return lexicalValue(goal.args[0], env) !== null;
|
|
40
|
+
}
|
|
41
|
+
|
|
42
|
+
function firstTwoLexicalReady(goal, env) {
|
|
43
|
+
return lexicalValue(goal.args[0], env) !== null && lexicalValue(goal.args[1], env) !== null;
|
|
44
|
+
}
|
|
45
|
+
|
|
46
|
+
function firstThreeLexicalReady(goal, env) {
|
|
47
|
+
return firstTwoLexicalReady(goal, env) && lexicalValue(goal.args[2], env) !== null;
|
|
48
|
+
}
|
|
49
|
+
|
|
50
|
+
function listAndSecondLexicalReady(goal, env) {
|
|
51
|
+
return properListItems(goal.args[0], env) !== null && lexicalValue(goal.args[1], env) !== null;
|
|
52
|
+
}
|
|
53
|
+
|
|
54
|
+
function substringReady(goal, env) {
|
|
55
|
+
return lexicalValue(goal.args[0], env) !== null && safeIndex(goal.args[1], env) !== null && safeIndex(goal.args[2], env) !== null;
|
|
56
|
+
}
|
|
57
|
+
|
|
58
|
+
function numberStringReady(goal, env) {
|
|
59
|
+
const left = deref(goal.args[0], env);
|
|
60
|
+
const right = deref(goal.args[1], env);
|
|
61
|
+
return left.type === 'number' || right.type === 'string' || right.type === 'atom';
|
|
62
|
+
}
|
|
63
|
+
|
|
64
|
+
function atomStringReady(goal, env) {
|
|
65
|
+
const left = deref(goal.args[0], env);
|
|
66
|
+
const right = deref(goal.args[1], env);
|
|
67
|
+
return left.type === 'atom' || right.type === 'string' || right.type === 'atom' || right.type === 'number';
|
|
68
|
+
}
|
|
69
|
+
|
|
70
|
+
function firstNonvarReady(goal, env) {
|
|
71
|
+
return deref(goal.args[0], env).type !== 'var';
|
|
72
|
+
}
|
|
73
|
+
|
|
74
|
+
function* concat({ goal, env }) {
|
|
75
|
+
const left = lexicalValue(goal.args[0], env);
|
|
76
|
+
const right = lexicalValue(goal.args[1], env);
|
|
77
|
+
if (left == null || right == null) return;
|
|
78
|
+
const next = env.clone();
|
|
79
|
+
if (unify(goal.args[2], stringTerm(left + right), next)) yield next;
|
|
80
|
+
}
|
|
81
|
+
|
|
82
|
+
function contains(name) {
|
|
83
|
+
return function* ({ goal, env }) {
|
|
84
|
+
const haystack = lexicalValue(goal.args[0], env);
|
|
85
|
+
const needle = lexicalValue(goal.args[1], env);
|
|
86
|
+
if (haystack == null || needle == null) return;
|
|
87
|
+
const has = haystack.includes(needle);
|
|
88
|
+
const matches = simpleAlternationMatch(haystack, needle);
|
|
89
|
+
const pass = (name === 'contains' && has) ||
|
|
90
|
+
(name === 'matches' && matches) ||
|
|
91
|
+
(name === 'not_matches' && !matches);
|
|
92
|
+
if (pass) yield env;
|
|
93
|
+
};
|
|
94
|
+
}
|
|
95
|
+
|
|
96
|
+
function* matchCaptures({ goal, env }) {
|
|
97
|
+
const text = lexicalValue(goal.args[0], env);
|
|
98
|
+
const pattern = lexicalValue(goal.args[1], env);
|
|
99
|
+
if (text == null || pattern == null) return;
|
|
100
|
+
|
|
101
|
+
let match;
|
|
102
|
+
try {
|
|
103
|
+
match = new RegExp(pattern).exec(text);
|
|
104
|
+
} catch (_) {
|
|
105
|
+
return;
|
|
106
|
+
}
|
|
107
|
+
if (!match?.groups) return;
|
|
108
|
+
|
|
109
|
+
const context = contextFromGroups(match.groups);
|
|
110
|
+
if (context == null) return;
|
|
111
|
+
|
|
112
|
+
const next = env.clone();
|
|
113
|
+
if (unify(goal.args[2], context, next)) yield next;
|
|
114
|
+
}
|
|
115
|
+
|
|
116
|
+
function* split({ goal, env }) {
|
|
117
|
+
const text = lexicalValue(goal.args[0], env);
|
|
118
|
+
const separator = lexicalValue(goal.args[1], env);
|
|
119
|
+
if (text == null || separator == null) return;
|
|
120
|
+
const parts = text.split(separator).map(stringTerm);
|
|
121
|
+
const next = env.clone();
|
|
122
|
+
if (unify(goal.args[2], listFromItems(parts), next)) yield next;
|
|
123
|
+
}
|
|
124
|
+
|
|
125
|
+
function* join({ goal, env }) {
|
|
126
|
+
const items = properListItems(goal.args[0], env);
|
|
127
|
+
const separator = lexicalValue(goal.args[1], env);
|
|
128
|
+
if (!items || separator == null) return;
|
|
129
|
+
const strings = [];
|
|
130
|
+
for (const item of items) {
|
|
131
|
+
const value = lexicalValue(item, env);
|
|
132
|
+
if (value == null) return;
|
|
133
|
+
strings.push(value);
|
|
134
|
+
}
|
|
135
|
+
const next = env.clone();
|
|
136
|
+
if (unify(goal.args[2], stringTerm(strings.join(separator)), next)) yield next;
|
|
137
|
+
}
|
|
138
|
+
|
|
139
|
+
function* substring({ goal, env }) {
|
|
140
|
+
const text = lexicalValue(goal.args[0], env);
|
|
141
|
+
const start = safeIndex(goal.args[1], env);
|
|
142
|
+
const count = safeIndex(goal.args[2], env);
|
|
143
|
+
if (text == null || start == null || count == null || start + count > text.length) return;
|
|
144
|
+
const next = env.clone();
|
|
145
|
+
if (unify(goal.args[3], stringTerm(text.slice(start, start + count)), next)) yield next;
|
|
146
|
+
}
|
|
147
|
+
|
|
148
|
+
function* replace({ goal, env }) {
|
|
149
|
+
const text = lexicalValue(goal.args[0], env);
|
|
150
|
+
const search = lexicalValue(goal.args[1], env);
|
|
151
|
+
const replacement = lexicalValue(goal.args[2], env);
|
|
152
|
+
if (text == null || search == null || replacement == null) return;
|
|
153
|
+
const out = search === '' ? text : text.split(search).join(replacement);
|
|
154
|
+
const next = env.clone();
|
|
155
|
+
if (unify(goal.args[3], stringTerm(out), next)) yield next;
|
|
156
|
+
}
|
|
157
|
+
|
|
158
|
+
function caseFold(direction) {
|
|
159
|
+
return function* ({ goal, env }) {
|
|
160
|
+
const text = lexicalValue(goal.args[0], env);
|
|
161
|
+
if (text == null) return;
|
|
162
|
+
const next = env.clone();
|
|
163
|
+
const out = direction === 'lower' ? text.toLowerCase() : text.toUpperCase();
|
|
164
|
+
if (unify(goal.args[1], stringTerm(out), next)) yield next;
|
|
165
|
+
};
|
|
166
|
+
}
|
|
167
|
+
|
|
168
|
+
function* trim({ goal, env }) {
|
|
169
|
+
const text = lexicalValue(goal.args[0], env);
|
|
170
|
+
if (text == null) return;
|
|
171
|
+
const next = env.clone();
|
|
172
|
+
if (unify(goal.args[1], stringTerm(text.trim()), next)) yield next;
|
|
173
|
+
}
|
|
174
|
+
|
|
175
|
+
function* numberString({ goal, env }) {
|
|
176
|
+
const left = deref(goal.args[0], env);
|
|
177
|
+
const right = deref(goal.args[1], env);
|
|
178
|
+
const next = env.clone();
|
|
179
|
+
if (left.type === 'number') {
|
|
180
|
+
if (unify(goal.args[1], stringTerm(left.name), next)) yield next;
|
|
181
|
+
return;
|
|
182
|
+
}
|
|
183
|
+
if (right.type === 'string' || right.type === 'atom') {
|
|
184
|
+
if (!numericText(right.name)) return;
|
|
185
|
+
if (unify(goal.args[0], numberTerm(right.name), next)) yield next;
|
|
186
|
+
}
|
|
187
|
+
}
|
|
188
|
+
|
|
189
|
+
function* atomString({ goal, env }) {
|
|
190
|
+
const left = deref(goal.args[0], env);
|
|
191
|
+
const right = deref(goal.args[1], env);
|
|
192
|
+
const next = env.clone();
|
|
193
|
+
if (left.type === 'atom') {
|
|
194
|
+
if (unify(goal.args[1], stringTerm(left.name), next)) yield next;
|
|
195
|
+
return;
|
|
196
|
+
}
|
|
197
|
+
if (right.type === 'string' || right.type === 'atom' || right.type === 'number') {
|
|
198
|
+
if (unify(goal.args[0], atom(right.name), next)) yield next;
|
|
199
|
+
}
|
|
200
|
+
}
|
|
201
|
+
|
|
202
|
+
function* termString({ goal, env }) {
|
|
203
|
+
const term = deref(goal.args[0], env);
|
|
204
|
+
if (term.type === 'var') return;
|
|
205
|
+
const next = env.clone();
|
|
206
|
+
if (unify(goal.args[1], stringTerm(termToString(term, env, true)), next)) yield next;
|
|
207
|
+
}
|
|
208
|
+
|
|
209
|
+
function contextFromGroups(groups) {
|
|
210
|
+
const terms = [];
|
|
211
|
+
for (const [name, value] of Object.entries(groups)) {
|
|
212
|
+
if (value !== undefined) terms.push(compound(name, [stringTerm(value)]));
|
|
213
|
+
}
|
|
214
|
+
if (terms.length === 0) return null;
|
|
215
|
+
|
|
216
|
+
let context = terms[terms.length - 1];
|
|
217
|
+
for (let i = terms.length - 2; i >= 0; i--) context = compound(',', [terms[i], context]);
|
|
218
|
+
return context;
|
|
219
|
+
}
|
|
220
|
+
|
|
221
|
+
function simpleAlternationMatch(haystack, pattern) {
|
|
222
|
+
return pattern.split('|').some((part) => part === '' || haystack.includes(part));
|
|
223
|
+
}
|
|
224
|
+
|
|
225
|
+
function safeIndex(term, env) {
|
|
226
|
+
const text = lexicalValue(term, env);
|
|
227
|
+
if (!/^-?\d+$/.test(text ?? '')) return null;
|
|
228
|
+
const index = Number(text);
|
|
229
|
+
return Number.isSafeInteger(index) && index >= 0 ? index : null;
|
|
230
|
+
}
|
|
231
|
+
|
|
232
|
+
function numericText(text) {
|
|
233
|
+
return isDecimalInteger(text) || parseFiniteNumber(text) != null;
|
|
234
|
+
}
|
|
@@ -0,0 +1,66 @@
|
|
|
1
|
+
// Term-inspection builtins for reusable meta-programming over eyelang terms.
|
|
2
|
+
import { atom, compound, deref, listFromItems, lexicalValue, numberTerm, properListItems, stringTerm, unify } from '../term.js';
|
|
3
|
+
|
|
4
|
+
export const termBuiltins = {
|
|
5
|
+
register(registry) {
|
|
6
|
+
registry.add('functor', 3, functorBuiltin, { deterministic: true, fallbackWhenNotReady: true, ready: firstNonvarReady });
|
|
7
|
+
registry.add('arg', 3, argBuiltin, { deterministic: true, fallbackWhenNotReady: true, ready: argReady });
|
|
8
|
+
registry.add('compound_name_arguments', 3, compoundNameArguments, { deterministic: true, fallbackWhenNotReady: true, ready: compoundNameArgumentsReady });
|
|
9
|
+
}
|
|
10
|
+
};
|
|
11
|
+
|
|
12
|
+
|
|
13
|
+
function firstNonvarReady(goal, env) {
|
|
14
|
+
return deref(goal.args[0], env).type !== 'var';
|
|
15
|
+
}
|
|
16
|
+
|
|
17
|
+
function argReady(goal, env) {
|
|
18
|
+
return /^\d+$/.test(lexicalValue(goal.args[0], env) ?? '') && deref(goal.args[1], env).type === 'compound';
|
|
19
|
+
}
|
|
20
|
+
|
|
21
|
+
function compoundNameArgumentsReady(goal, env) {
|
|
22
|
+
const term = deref(goal.args[0], env);
|
|
23
|
+
if (term.type === 'compound') return true;
|
|
24
|
+
return term.type === 'var' && lexicalValue(goal.args[1], env) !== null && properListItems(goal.args[2], env) !== null;
|
|
25
|
+
}
|
|
26
|
+
|
|
27
|
+
function* functorBuiltin({ goal, env }) {
|
|
28
|
+
const term = deref(goal.args[0], env);
|
|
29
|
+
if (term.type === 'var') return;
|
|
30
|
+
const nameTerm = term.type === 'compound' ? atom(term.name) : scalarNameTerm(term);
|
|
31
|
+
const arity = term.type === 'compound' ? term.arity : 0;
|
|
32
|
+
const next = env.clone();
|
|
33
|
+
if (unify(goal.args[1], nameTerm, next) && unify(goal.args[2], numberTerm(arity), next)) yield next;
|
|
34
|
+
}
|
|
35
|
+
|
|
36
|
+
function* argBuiltin({ goal, env }) {
|
|
37
|
+
const indexText = lexicalValue(goal.args[0], env);
|
|
38
|
+
if (!/^\d+$/.test(indexText ?? '')) return;
|
|
39
|
+
const index = Number(indexText);
|
|
40
|
+
const term = deref(goal.args[1], env);
|
|
41
|
+
if (term.type !== 'compound' || !Number.isSafeInteger(index) || index < 1 || index > term.arity) return;
|
|
42
|
+
const next = env.clone();
|
|
43
|
+
if (unify(goal.args[2], term.args[index - 1], next)) yield next;
|
|
44
|
+
}
|
|
45
|
+
|
|
46
|
+
function* compoundNameArguments({ goal, env }) {
|
|
47
|
+
const term = deref(goal.args[0], env);
|
|
48
|
+
if (term.type === 'compound') {
|
|
49
|
+
const next = env.clone();
|
|
50
|
+
if (unify(goal.args[1], atom(term.name), next) && unify(goal.args[2], listFromItems(term.args), next)) yield next;
|
|
51
|
+
return;
|
|
52
|
+
}
|
|
53
|
+
if (term.type !== 'var') return;
|
|
54
|
+
|
|
55
|
+
const name = lexicalValue(goal.args[1], env);
|
|
56
|
+
const args = properListItems(goal.args[2], env);
|
|
57
|
+
if (name == null || !args) return;
|
|
58
|
+
const next = env.clone();
|
|
59
|
+
if (unify(goal.args[0], compound(name, args), next)) yield next;
|
|
60
|
+
}
|
|
61
|
+
|
|
62
|
+
function scalarNameTerm(term) {
|
|
63
|
+
if (term.type === 'atom') return atom(term.name);
|
|
64
|
+
if (term.type === 'number') return numberTerm(term.name);
|
|
65
|
+
return stringTerm(term.name);
|
|
66
|
+
}
|