pith. machine review for the scientific record. sign in
def

pointInterface

definition
show as:
view math explainer →
module
IndisputableMonolith.Foundation.ObserverFromRecognition
domain
Foundation
line
91 · github
papers citing
none yet

open explainer

Read the cached plain-language explainer.

open lean source

IndisputableMonolith.Foundation.ObserverFromRecognition on GitHub at line 91.

browse module

All declarations in this module, on Recognition.

explainer page

A cached Ask Recognition explainer exists for this declaration.

open explainer

depends on

used by

formal source

  88/-- The canonical two-outcome interface that asks whether the input is the
  89chosen reference point `x₀`. This is the minimal finite recognizer induced by
  90one named distinction. -/
  91noncomputable def pointInterface {K : Type*} (x₀ : K) :
  92    PrimitiveInterface K where
  93  n := 2
  94  hpos := by norm_num
  95  observe := fun x =>
  96    if x = x₀ then (1 : Fin 2) else (0 : Fin 2)
  97
  98/-- The point interface recognizes its reference point as outcome `1`. -/
  99theorem pointInterface_at_ref {K : Type*} (x₀ : K) :
 100    (pointInterface x₀).observe x₀ = (1 : Fin 2) := by
 101  unfold pointInterface
 102  simp
 103
 104/-- Any point distinct from the reference is recognized as outcome `0`. -/
 105theorem pointInterface_away {K : Type*} {x₀ y : K} (h : y ≠ x₀) :
 106    (pointInterface x₀).observe y = (0 : Fin 2) := by
 107  unfold pointInterface
 108  simp [h]
 109
 110/-- The point interface separates any point from any distinct point. -/
 111theorem pointInterface_separates {K : Type*} {x₀ y : K} (h : x₀ ≠ y) :
 112    Separates (pointInterface x₀) x₀ y := by
 113  unfold Separates
 114  rw [pointInterface_at_ref x₀]
 115  have hy : y ≠ x₀ := fun h' => h h'.symm
 116  rw [pointInterface_away hy]
 117  norm_num
 118
 119/-! ## Main Theorem -/
 120
 121/-- **Observer from recognition.**