eyeling 1.14.13 → 1.15.0

package/examples/check/output/gps.n3

@@ -0,0 +1,6 @@
+@prefix : <https://eyereasoner.github.io/eye/reasoning#> .
+@prefix gps: <https://eyereasoner.github.io/eye/reasoning/gps/gps-schema#> .
+@prefix xsd: <http://www.w3.org/2001/XMLSchema#> .
+
+:i1 gps:path ((:drive_gent_brugge :drive_brugge_oostende) "2400"^^xsd:decimal "0.01"^^xsd:decimal "0.9408"^^xsd:decimal "0.99"^^xsd:decimal) .
+:i1 gps:path ((:drive_gent_kortrijk :drive_kortrijk_brugge :drive_brugge_oostende) "4100"^^xsd:decimal "0.018"^^xsd:decimal "0.903168"^^xsd:decimal "0.9801"^^xsd:decimal) .

package/examples/check/output/high-trust-rdf-bloom-envelope.n3

@@ -0,0 +1,7 @@
+@prefix : <http://example.org/high-trust-rdf#> .
+@prefix xsd: <http://www.w3.org/2001/XMLSchema#> .
+
+:result :expIntervalCertificate :CertifiedDecimalInterval .
+:result :summary ("parameter-sanity" true "index-agreement" true "transcendental" "exp(-k*n/m)" "lambda" "0.5126953125"^^xsd:decimal "certified-lambda" 0.5126953125 "exp-lower" 0.5988792348 "exp-upper" 0.5988792349 "fp-lower" "0.0016708059567271017"^^xsd:decimal "fp-upper" "0.0016708059596428394"^^xsd:decimal "expected-extra-exact-lookups-upper" "83.54029798214196"^^xsd:decimal "decision" :AcceptForHighTrustUse) .
+:result :withinExactLookupBudget true .
+:result :withinFpRateBudget true .

package/examples/check/output/high-trust-rdf-bloom-tamper-contrast.n3

@@ -0,0 +1,27 @@
+@prefix : <http://example.org/high-trust-rdf#> .
+@prefix xsd: <http://www.w3.org/2001/XMLSchema#> .
+
+:result :decision [
+  :artifact :trustedArtifact ;
+  :hardened :AcceptForHighTrustUse ;
+  :weak :AcceptUnderWeakBudgetOnlyRules
+] .
+:result :decision [
+  :artifact :tamperedArtifact ;
+  :hardened :RejectForHighTrustUse ;
+  :weak :AcceptUnderWeakBudgetOnlyRules
+] .
+:result :rejectReason [
+  :artifact :tamperedArtifact ;
+  :why :NonPositiveBloomBits
+] .
+:result :rejectReason [
+  :artifact :tamperedArtifact ;
+  :why :CertifiedLambdaMismatch
+] .
+:result :rejectReason [
+  :artifact :tamperedArtifact ;
+  :why :MalformedIntervalOrdering
+] .
+:result :summary (:tamperedArtifact "lambda" -700 "certified-lambda" 0.5126953125 "weak-fp-upper" "-194754273881"^^xsd:decimal "weak-extra-exact-upper" "-194754273881"^^xsd:decimal "weak-decision" :AcceptUnderWeakBudgetOnlyRules "hardened-decision" :RejectForHighTrustUse) .
+:result :summary (:trustedArtifact "lambda" "0.5126953125"^^xsd:decimal "certified-lambda" 0.5126953125 "weak-fp-upper" "0.0016708059596428394"^^xsd:decimal "weak-extra-exact-upper" "83.54029798214196"^^xsd:decimal "weak-decision" :AcceptUnderWeakBudgetOnlyRules "hardened-decision" :AcceptForHighTrustUse) .

package/examples/check/output/odrl-dpv-risk-ranked.n3

@@ -0,0 +1,13 @@
+@prefix : <https://example.org/odrl-dpv-risk-ranked#> .
+@prefix log: <http://www.w3.org/2000/10/swap/log#> .
+
+(:Agreement1 :ConsumerExample 0) log:outputString "\n=== Ranked DPV Risk Report ===\nAgreement: Example Agreement\nProfile: Example consumer profile\n\n" .
+(:Agreement1 :ConsumerExample 1 900 "C1" 0 _:sk_1) log:outputString "score=100 (https://w3id.org/dpv/risk#HighRisk, https://w3id.org/dpv/risk#HighSeverity)  clause C1\n  Risk: account/data removal is permitted without notice safeguards (no notice constraint and no duty to inform). Clause C1: Provider may remove the user account (and associated data) at its discretion.\n\n" .
+(:Agreement1 :ConsumerExample 1 900 "C1" 1 _:sk_1 _:sk_2) log:outputString "  - mitigation for clause C1: Add a notice constraint (minimum noticeDays) before account removal.\n" .
+(:Agreement1 :ConsumerExample 1 900 "C1" 1 _:sk_1 _:sk_4) log:outputString "  - mitigation for clause C1: Add a duty to inform the consumer prior to account removal.\n" .
+(:Agreement1 :ConsumerExample 1 903 "C3" 0 _:sk_12) log:outputString "score=97 (https://w3id.org/dpv/risk#HighRisk, https://w3id.org/dpv/risk#HighSeverity)  clause C3\n  Risk: user data sharing is permitted without an explicit consent constraint. Clause C3: Provider may share user data with partners for business purposes.\n\n" .
+(:Agreement1 :ConsumerExample 1 903 "C3" 1 _:sk_12 _:sk_13) log:outputString "  - mitigation for clause C3: Add an explicit consent constraint before data sharing.\n" .
+(:Agreement1 :ConsumerExample 1 915 "C2" 0 _:sk_7) log:outputString "score=85 (https://w3id.org/dpv/risk#HighRisk, https://w3id.org/dpv/risk#HighSeverity)  clause C2\n  Risk: terms may change with notice (3 days) below consumer requirement (14 days). Clause C2: Provider may change terms by informing users at least 3 days in advance.\n\n" .
+(:Agreement1 :ConsumerExample 1 915 "C2" 1 _:sk_7 _:sk_8) log:outputString "  - mitigation for clause C2: Increase minimum noticeDays in the inform duty to meet the consumer requirement.\n" .
+(:Agreement1 :ConsumerExample 1 930 "C4" 0 _:sk_16) log:outputString "score=70 (https://w3id.org/dpv/risk#ModerateRisk, https://w3id.org/dpv/risk#ModerateSeverity)  clause C4\n  Risk: portability is restricted because exporting user data is prohibited. Clause C4: Users are not permitted to export their data.\n\n" .
+(:Agreement1 :ConsumerExample 1 930 "C4" 1 _:sk_16 _:sk_17) log:outputString "  - mitigation for clause C4: Add a permission allowing data export (or remove the prohibition) to support portability.\n" .

package/examples/decimal-ebike-motor-thermal-envelope.n3

@@ -0,0 +1,286 @@
+# ===============================================================================
+# Decimal transcendental motor-thermal envelope for an e-bike climb
+#
+# Why this example exists:
+#   It shows how xsd:decimal can carry a machine-checkable certificate in an
+#   e-biking setting where a transcendental quantity naturally appears.
+#
+# Physical story:
+#   During a climb, an e-bike motor heats up from rider-selected assist modes,
+#   while also cooling toward ambient temperature.
+#
+#   A simple sampled model for the motor temperature excess over ambient is
+#
+#       e(k+1) = a * e(k) + g(mode(k))
+#
+#   where
+#       a = exp(-Ts/tau)
+#
+#   is the exact cooling factor, Ts is the sample period, tau is the thermal
+#   time constant, and g(mode) is the per-sample heat injection for the chosen
+#   assist mode.
+#
+# The transcendental part:
+#   For Ts = 5 s and tau = 20 s we get
+#
+#       a = exp(-1/4)
+#
+#   which is transcendental. We therefore do not pretend to store the exact real.
+#   Instead we keep a certified xsd:decimal interval
+#
+#       0.7788007830 <= exp(-1/4) <= 0.7788007831
+#
+#   and propagate an exact decimal envelope for the motor temperature.
+#
+# Ride plan:
+#   * samples 0..2  : Turbo assist
+#   * samples 3..4  : Tour assist
+#   * samples 5..7  : Eco assist
+#   * samples 8..11 : Coast (no drive heat)
+#
+# What is certified:
+#   * the cooling interval is well-formed and contractive
+#   * the motor stays below the hard limit during the whole sampled ride plan
+#   * after the climb, the upper temperature envelope drops below the warning
+#     threshold again at sample 8, i.e. after 40 s
+# ===============================================================================
+
+@prefix :     <http://example.org/ebike-thermal#>.
+@prefix math: <http://www.w3.org/2000/10/swap/math#>.
+@prefix log:  <http://www.w3.org/2000/10/swap/log#>.
+@prefix xsd:  <http://www.w3.org/2001/XMLSchema#>.
+
+# ----------
+# Parameters
+# ----------
+
+:ride a :EBikeThermalAssessment;
+  :samplePeriod "5.0"^^xsd:decimal;
+  :thermalTimeConstant "20.0"^^xsd:decimal;
+  :exactCoolingSymbol "exp(-1/4)";
+  :coolingLower "0.7788007830"^^xsd:decimal;
+  :coolingUpper "0.7788007831"^^xsd:decimal;
+  :ambient "25.0"^^xsd:decimal;
+  :initialMotorTemperature "33.0"^^xsd:decimal;
+  :warningLimit "35.0"^^xsd:decimal;
+  :hardLimit "45.0"^^xsd:decimal;
+  :maxStep 12.
+
+:Turbo :heatingLower "4.8"^^xsd:decimal; :heatingUpper "4.8"^^xsd:decimal.
+:Tour  :heatingLower "2.4"^^xsd:decimal; :heatingUpper "2.4"^^xsd:decimal.
+:Eco   :heatingLower "1.2"^^xsd:decimal; :heatingUpper "1.2"^^xsd:decimal.
+:Coast :heatingLower "0.0"^^xsd:decimal; :heatingUpper "0.0"^^xsd:decimal.
+
+:ride :assistAt (0 :Turbo).
+:ride :assistAt (1 :Turbo).
+:ride :assistAt (2 :Turbo).
+:ride :assistAt (3 :Tour).
+:ride :assistAt (4 :Tour).
+:ride :assistAt (5 :Eco).
+:ride :assistAt (6 :Eco).
+:ride :assistAt (7 :Eco).
+:ride :assistAt (8 :Coast).
+:ride :assistAt (9 :Coast).
+:ride :assistAt (10 :Coast).
+:ride :assistAt (11 :Coast).
+
+# ----------------------------------------------------------
+# The decimal interval is a finite certificate for exp(-1/4)
+# ----------------------------------------------------------
+
+{
+  :ride :coolingLower ?lo; :coolingUpper ?hi.
+  ?lo math:lessThan ?hi.
+  ?lo math:greaterThan 0.
+  ?hi math:lessThan 1.
+}
+=>
+{
+  :ride :coolingCertificate :CertifiedDecimalInterval.
+  :ride :contractiveCooling true.
+}.
+
+# ----------------
+# Initial envelope
+# ----------------
+
+{
+  :ride :ambient ?amb; :initialMotorTemperature ?t0.
+  ( ?t0 ?amb ) math:difference ?e0.
+}
+=>
+{
+  :ride :excessEnvelopeAt (0 ?e0 ?e0).
+}.
+
+# --------------------------------------------------------------------------
+# Envelope propagation
+#   excessLower(k+1) = coolingLower * excessLower(k) + heatingLower(mode(k))
+#   excessUpper(k+1) = coolingUpper * excessUpper(k) + heatingUpper(mode(k))
+# --------------------------------------------------------------------------
+
+{
+  :ride :coolingLower ?aLo;
+        :coolingUpper ?aHi;
+        :maxStep ?max.
+  :ride :assistAt (?k ?mode).
+  ?mode :heatingLower ?gLo; :heatingUpper ?gHi.
+  :ride :excessEnvelopeAt (?k ?lo ?hi).
+  ?k math:lessThan ?max.
+  ( ?k 1 ) math:sum ?k1.
+  ( ?aLo ?lo ) math:product ?decayedLo.
+  ( ?aHi ?hi ) math:product ?decayedHi.
+  ( ?decayedLo ?gLo ) math:sum ?lo1.
+  ( ?decayedHi ?gHi ) math:sum ?hi1.
+}
+=>
+{
+  :ride :excessEnvelopeAt (?k1 ?lo1 ?hi1).
+}.
+
+# ---------------------------------------------
+# Convert excess-over-ambient to absolute motor
+# temperature envelopes for each sample.
+# ---------------------------------------------
+
+{
+  :ride :ambient ?amb.
+  :ride :excessEnvelopeAt (?k ?lo ?hi).
+  ( ?amb ?lo ) math:sum ?tLo.
+  ( ?amb ?hi ) math:sum ?tHi.
+}
+=>
+{
+  :ride :motorTemperatureEnvelopeAt (?k ?tLo ?tHi).
+}.
+
+# ------------------------
+# Threshold certifications
+# ------------------------
+
+{
+  :ride :motorTemperatureEnvelopeAt (?k ?tLo ?tHi).
+  :ride :hardLimit ?lim.
+  ?tHi math:lessThan ?lim.
+}
+=>
+{
+  :ride :belowHardLimitAt ?k.
+}.
+
+{
+  :ride :motorTemperatureEnvelopeAt (?k ?tLo ?tHi).
+  :ride :warningLimit ?lim.
+  ?tHi math:lessThan ?lim.
+}
+=>
+{
+  :ride :belowWarningAt ?k.
+}.
+
+# ---------------------------------------------------
+# Detect where the upper temperature envelope starts
+# moving downward again after the harder climb phase.
+# ---------------------------------------------------
+
+{
+  :ride :motorTemperatureEnvelopeAt (?k ?tLo ?tHi).
+  ( ?k 1 ) math:sum ?k1.
+  :ride :motorTemperatureEnvelopeAt (?k1 ?tLo1 ?tHi1).
+  ?tHi1 math:lessThan ?tHi.
+}
+=>
+{
+  :ride :upperEnvelopeDecreasesAt ?k.
+}.
+
+# --------------------------------------------------------
+# First return below the warning limit after being at/over
+# the warning limit in the previous sample.
+# --------------------------------------------------------
+
+{
+  :ride :belowWarningAt ?k.
+  ?k math:greaterThan 0.
+  ( ?k 1 ) math:difference ?km1.
+  :ride :motorTemperatureEnvelopeAt (?km1 ?prevLo ?prevHi).
+  :ride :warningLimit ?lim.
+  ?prevHi math:notLessThan ?lim.
+}
+=>
+{
+  :ride :firstRecoveredWarningAt ?k.
+}.
+
+{
+  :ride :firstRecoveredWarningAt ?k;
+        :samplePeriod ?ts.
+  ( ?k ?ts ) math:product ?t.
+}
+=>
+{
+  :ride :firstRecoveredWarningTime ?t.
+}.
+
+# ----------------------------------------------------------------------
+# Acceptance argument for this fixed ride plan:
+#   * samples 0..3 are individually below the hard limit
+#   * from sample 3 onward the upper envelope decreases at every step
+#   * therefore all later samples stay below the sample-3 upper envelope
+#   * the envelope returns below the warning limit at sample 8 = 40 s
+# ----------------------------------------------------------------------
+
+{
+  :ride :belowHardLimitAt 0, 1, 2, 3.
+  :ride :upperEnvelopeDecreasesAt 3, 4, 5, 6, 7, 8, 9, 10, 11.
+  :ride :firstRecoveredWarningAt 8.
+}
+=>
+{
+  :ride :rideDecision :ThermallySafeForThisAssistPlan.
+}.
+
+# ---------------
+# Readable output
+# ---------------
+
+{
+  :ride :exactCoolingSymbol ?sym;
+        :coolingLower ?aLo;
+        :coolingUpper ?aHi;
+        :warningLimit ?warn;
+        :hardLimit ?hard;
+        :firstRecoveredWarningAt ?k;
+        :firstRecoveredWarningTime ?t;
+        :rideDecision ?decision.
+}
+log:query
+{
+  :result :summary (
+    "cooling-symbol" ?sym
+    "cooling-lower" ?aLo
+    "cooling-upper" ?aHi
+    "warning-limit-C" ?warn
+    "hard-limit-C" ?hard
+    "warning-recovery-step" ?k
+    "warning-recovery-time-s" ?t
+    "decision" ?decision
+  ).
+}.
+
+{
+  :ride :assistAt (?k ?mode).
+  :ride :motorTemperatureEnvelopeAt (?k ?tLo ?tHi).
+}
+log:query
+{
+  :result :temperatureTrace (?k ?mode ?tLo ?tHi).
+}.
+
+{
+  :ride :upperEnvelopeDecreasesAt ?k.
+}
+log:query
+{
+  :result :coolingStep ?k.
+}.

package/examples/decimal-transcendental-servo-envelope.n3

@@ -0,0 +1,197 @@
+# =======================================================================================
+# Decimal transcendental servo envelope
+#
+# Why this example exists:
+#   It illustrates the “integer-first” idea in a setting where a genuinely transcendental
+#   constant appears in control engineering.
+#
+# Physical story:
+#   A sampled first-order servo has error dynamics
+#
+#       e(k+1) = a * e(k)
+#
+#   with exact discrete pole
+#
+#       a = exp(-Ts/tau) = exp(-1/3)
+#
+#   for Ts = 20 ms and tau = 60 ms.
+#
+#   The number exp(-1/3) is transcendental, so it is not available as a finite exact
+#   decimal. But for engineering we do not need mystical access to the exact real.
+#   We only need a finite certificate with controlled error.
+#
+# Integer-first / decimal-first move:
+#   We store a certified xsd:decimal interval
+#
+#       0.7165313105 <= exp(-1/3) <= 0.7165313106
+#
+#   and propagate an exact decimal error envelope. Because xsd:decimal is finite symbolic
+#   data (effectively an integer coefficient plus a base-10 scale), the whole certificate
+#   remains machine-checkable and reproducible.
+#
+# What is certified:
+#   * the interval is nonempty and contractive
+#   * the error envelope shrinks at every sample
+#   * from an initial error of 12.5, the loop is guaranteed inside ±0.5 by sample 10
+#   * with Ts = 0.020 s, that means guaranteed settling by 0.200 s
+# =======================================================================================
+
+@prefix :     <http://example.org/decimal-servo#>.
+@prefix math: <http://www.w3.org/2000/10/swap/math#>.
+@prefix log:  <http://www.w3.org/2000/10/swap/log#>.
+@prefix xsd:  <http://www.w3.org/2001/XMLSchema#>.
+
+# ----------
+# Parameters
+# ----------
+
+:servo a :SampledServoEnvelope;
+  :samplePeriod "0.020"^^xsd:decimal;
+  :timeConstant "0.060"^^xsd:decimal;
+  :exactPoleSymbol "exp(-1/3)";
+  :poleLower "0.7165313105"^^xsd:decimal;
+  :poleUpper "0.7165313106"^^xsd:decimal;
+  :initialAbsError "12.5"^^xsd:decimal;
+  :tolerance "0.5"^^xsd:decimal;
+  :maxStep 12.
+
+# -----------------------------------------------------------------
+# The decimal interval is a finite certificate for a transcendental
+# -----------------------------------------------------------------
+
+{
+  :servo :poleLower ?lo; :poleUpper ?hi.
+  ?lo math:lessThan ?hi.
+  ?hi math:lessThan 1.
+  ?lo math:greaterThan 0.
+}
+=>
+{
+  :servo :poleCertificate :CertifiedDecimalInterval.
+  :servo :contractivePole true.
+}.
+
+# ----------------
+# Initial envelope
+# ----------------
+
+{
+  :servo :initialAbsError ?e0.
+}
+=>
+{
+  :servo :errorEnvelopeAt (0 ?e0 ?e0).
+}.
+
+# -----------------------------------
+# Envelope propagation
+#   lower(k+1) = poleLower * lower(k)
+#   upper(k+1) = poleUpper * upper(k)
+# -----------------------------------
+
+{
+  :servo :maxStep ?max;
+         :poleLower ?aLo;
+         :poleUpper ?aHi.
+  :servo :errorEnvelopeAt (?k ?lo ?hi).
+  ?k math:lessThan ?max.
+  ( ?k 1 ) math:sum ?k1.
+  ( ?aLo ?lo ) math:product ?lo1.
+  ( ?aHi ?hi ) math:product ?hi1.
+}
+=>
+{
+  :servo :errorEnvelopeAt (?k1 ?lo1 ?hi1).
+}.
+
+# -----------------------------
+# The envelope shrinks strictly
+# -----------------------------
+
+{
+  :servo :errorEnvelopeAt (?k ?lo ?hi).
+  ( ?k 1 ) math:sum ?k1.
+  :servo :errorEnvelopeAt (?k1 ?lo1 ?hi1).
+  ?hi1 math:lessThan ?hi.
+}
+=>
+{
+  :servo :strictContractionAt ?k.
+}.
+
+# --------------------------------
+# Settlement in the tolerance band
+# --------------------------------
+
+{
+  :servo :errorEnvelopeAt (?k ?lo ?hi).
+  :servo :tolerance ?tol.
+  ?hi math:lessThan ?tol.
+}
+=>
+{
+  :servo :settledCandidate ?k.
+}.
+
+{
+  :servo :settledCandidate ?k.
+  ?k math:greaterThan 0.
+  ( ?k 1 ) math:difference ?km1.
+  :servo :errorEnvelopeAt (?km1 ?prevLo ?prevHi).
+  :servo :tolerance ?tol.
+  ?prevHi math:notLessThan ?tol.
+}
+=>
+{
+  :servo :firstSettledStep ?k.
+}.
+
+{
+  :servo :firstSettledStep ?k.
+  :servo :samplePeriod ?ts.
+  ( ?k ?ts ) math:product ?t.
+}
+=>
+{
+  :servo :firstSettledTime ?t.
+}.
+
+# --------------------------------------------------------
+# Readable engineering summary for the decimal certificate
+# --------------------------------------------------------
+
+{
+  :servo :firstSettledStep ?k;
+         :firstSettledTime ?t;
+         :tolerance ?tol;
+         :exactPoleSymbol ?sym;
+         :poleLower ?aLo;
+         :poleUpper ?aHi.
+}
+log:query
+{
+  :result :summary (
+    "exact-pole" ?sym
+    "decimal-lower" ?aLo
+    "decimal-upper" ?aHi
+    "tolerance" ?tol
+    "first-settled-step" ?k
+    "first-settled-time-s" ?t
+  ).
+}.
+
+{
+  :servo :errorEnvelopeAt (?k ?lo ?hi).
+}
+log:query
+{
+  :result :envelope (?k ?lo ?hi).
+}.
+
+{
+  :servo :strictContractionAt ?k.
+}
+log:query
+{
+  :result :contractionAt ?k.
+}.