mirror of
https://github.com/allaunthefox/Research-Stack.git
synced 2026-07-31 03:05:21 +00:00
36 lines
1.2 KiB
Text
36 lines
1.2 KiB
Text
import Semantics.FixedPoint
|
|
import Semantics.Bind
|
|
|
|
namespace Semantics.FuzzyAssociation
|
|
|
|
open Semantics
|
|
|
|
/--
|
|
FuzzyMatch: Represents a non-explicit connection between two concepts.
|
|
Confidence is a Q0.16 value between 0 and 1 (2-byte pure fraction).
|
|
-/
|
|
structure FuzzyMatch where
|
|
sourcePkg : String
|
|
targetPkg : String
|
|
confidence : Q0_16
|
|
rationale : String
|
|
|
|
/--
|
|
Fuzzy Admissibility: A match is 'Interesting' if its confidence
|
|
is above the discovery threshold (0.4 ≈ 0x3333 in Q0.16).
|
|
-/
|
|
def isInteresting (m : FuzzyMatch) : Bool :=
|
|
let threshold := Q0_16.ofFloat 0.4
|
|
Q0_16.gt m.confidence threshold
|
|
|
|
/--
|
|
The Fuzzy Bind: Connects an external paper to a local research node
|
|
via 'Near-Neighbor' semantic projection.
|
|
-/
|
|
def fuzzyBind (matchInfo : FuzzyMatch) (g : Metric) : Bind FuzzyMatch String :=
|
|
controlBind matchInfo matchInfo.targetPkg g
|
|
(fun m _ _ => Q16_16.sub Q16_16.one (Q16_16.ofFloat (Q0_16.toFloat m.confidence))) -- Convert Q0_16 to Q16_16 for compatibility
|
|
(fun m => if isInteresting m then "fuzzy_bridge_detected" else "below_discovery_threshold")
|
|
(fun targetPkg => s!"witness:fuzzy_connection:{matchInfo.sourcePkg}-->{targetPkg}")
|
|
|
|
end Semantics.FuzzyAssociation
|