structure
definition
RecognitionEvent
show as:
view math explainer →
open explainer
Read the cached plain-language explainer.
open lean source
IndisputableMonolith.Information.InformationIsLedger on GitHub at line 46.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
used by
-
add_event -
add_event_balanced -
add_event_balanced_list -
balanced_list -
conservation_from_balance -
event_cost -
flow_contribution -
flow_contribution_reciprocal -
Ledger -
ledger_forcing_principle -
paired_log_sum_zero -
reciprocal -
reciprocal_eq_iff -
reciprocal_inj -
reciprocal_reciprocal -
reciprocity -
RecognitionEvent -
CoherentRecognition -
cooper_paired_reference_yields_observer -
cooper_pairing_yields_persistent -
cost -
cost_nonneg -
identity -
identity_cost -
identity_persistent -
IsPersistent -
nontrivial_recognition_forces_observer -
observer_forcing_certificate -
observer_forcing_status -
persistent_event_state_eq_identity -
persistent_state_unique -
RecognitionEvent -
config_to_recognition -
cost_minima_are_recognition -
cost_to_recognition_bridge -
global_minimum_is_self_recognition -
nontrivial_recognition_positive_cost -
recognition_cost -
recognition_forcing_complete -
recognition_is_cost_structure
formal source
43
44/-- A recognition event: a positive ratio x in the ledger.
45 Each physical fact is encoded as such a ratio. -/
46structure RecognitionEvent where
47 /-- The recognition ratio x > 0. -/
48 ratio : ℝ
49 /-- Positivity is required for J-cost to be well-defined. -/
50 ratio_pos : ratio > 0
51
52/-- The information cost of a recognition event = J(x). -/
53noncomputable def infoCost (e : RecognitionEvent) : ℝ := Jcost e.ratio
54
55/-- **THEOREM IC-001.1**: Every recognition event has non-negative information cost.
56 J(x) ≥ 0 for all x > 0. This follows from AM-GM: (x + 1/x)/2 ≥ 1. -/
57theorem info_cost_nonneg (e : RecognitionEvent) : infoCost e ≥ 0 :=
58 Jcost_nonneg e.ratio_pos
59
60/-- **THEOREM IC-001.2**: Information cost is zero iff the ratio is 1.
61 J(x) = 0 ↔ x = 1 — the unique balanced/zero-defect state. -/
62theorem info_cost_zero_iff_unit (e : RecognitionEvent) :
63 infoCost e = 0 ↔ e.ratio = 1 := by
64 unfold infoCost
65 constructor
66 · intro h
67 rw [Jcost_eq_sq e.ratio_pos.ne'] at h
68 have hden_pos : 0 < 2 * e.ratio := by linarith [e.ratio_pos]
69 have hden_ne : (2 * e.ratio) ≠ 0 := ne_of_gt hden_pos
70 have hsq : (e.ratio - 1) ^ 2 = 0 := by
71 rwa [div_eq_zero_iff, or_iff_left hden_ne] at h
72 nlinarith [sq_nonneg (e.ratio - 1)]
73 · intro h; rw [h]; exact Jcost_unit0
74
75/-- **THEOREM IC-001.3**: Any ratio x ≠ 1 carries strictly positive information cost.
76 J(x) > 0 for all x > 0, x ≠ 1. -/