Encyclopedia Gravity Gravity Recognition Ledger Recognition Ledger Cert Inhabited

ARTICLE 3 claims 3 theorems

Gravity Recognition Ledger Recognition Ledger Cert Inhabited

A machine-checked certificate proves that a recognition ledger exists for every finite substrate, and that its total cost is zero exactly when the ledger is flat.

The certificate's content

A recognition ledger is a discrete record of comparison costs between cells of a finite substrate. Each pair of cells carries a non-negative cost, the cost is symmetric, and a cell costs zero to compare with itself. The ledger also obeys a triangle-like bound: the cost from one cell to another never exceeds a fixed gate function applied to the costs through any intermediate cell. The gate is R(u,v) = 2uv + 2u + 2v, and the bound is the ledger's subadditivity condition.

The declaration recognitionLedgerCert_inhabited proves that a certificate for these ledgers exists. The certificate packages four facts: for every finite substrate, at least one ledger exists; the flat ledger, where every cost is zero, has total cost zero; every ledger has non-negative total cost; and total cost is zero exactly when the ledger is flat. The flat ledger itself is defined explicitly, with all costs set to zero, and it satisfies every ledger property by construction.

The certificate is a theorem in the machine-checked library of formal theorems, proved with no unproved assumptions. Its content is structural: it establishes that the definition of a recognition ledger is coherent, that flat ledgers exist, and that the total cost behaves as the definition demands. It does not claim that any particular physical ledger exists, that gravity arises from these ledgers, or that the total cost matches any measured value.

What the certificate changes is the status of the ledger definition itself. Before the certificate, one could ask whether the axioms of a recognition ledger are consistent, whether the flat case is genuinely flat, and whether total cost zero forces flatness. The certificate answers all three: consistency holds, flatness is realized, and the zero-cost characterization is proved. The definition is no longer a proposal; it is a working structure with verified properties.

THEOREM recognitionLedgerCert_inhabited · IndisputableMonolith/Gravity/RecognitionLedger.lean
recognitionLedgerCert_inhabited · IndisputableMonolith/Gravity/RecognitionLedger.lean:229
theorem recognitionLedgerCert_inhabited :
    Nonempty RecognitionLedgerCert :=
  ⟨recognitionLedgerCert⟩
THEOREM RecognitionLedgerCert · recognitionLedgerCert · IndisputableMonolith/Gravity/RecognitionLedger.lean
structure RecognitionLedgerCert where
  flat_exists : ∀ (Λ : Type) [Fintype Λ] [DecidableEq Λ],
    Nonempty (RecognitionLedger Λ)
  flat_total_zero : ∀ (Λ : Type) [Fintype Λ] [DecidableEq Λ],
    totalCost (flatLedger Λ) = 0
  total_nonneg : ∀ {Λ : Type} [Fintype Λ] [DecidableEq Λ]
    (L : RecognitionLedger Λ), 0 ≤ totalCost L
  zero_iff_flat : ∀ {Λ : Type} [Fintype Λ] [DecidableEq Λ]
    (L : RecognitionLedger Λ), totalCost L = 0 ↔ isFlat L
def recognitionLedgerCert : RecognitionLedgerCert where
  flat_exists := fun Λ _ _ => ⟨flatLedger Λ⟩
  flat_total_zero := fun Λ _ _ => flatLedger_totalCost_zero Λ
  total_nonneg := fun L => totalCost_nonneg L
  zero_iff_flat := fun L => totalCost_eq_zero_iff_flat L
THEOREM flatLedger · flatLedger_isFlat · IndisputableMonolith/Gravity/RecognitionLedger.lean
/-- The flat (zero) ledger on any finite lattice. -/
def flatLedger (Λ : Type*) [Fintype Λ] [DecidableEq Λ] : RecognitionLedger Λ where
  cost := fun _ _ => 0
  symmetric := fun _ _ => rfl
  diagonal_zero := fun _ => rfl
  nonneg := fun _ _ => le_refl 0
  rcl_subadditive := fun _ _ _ => by unfold rclGate; norm_num
theorem flatLedger_isFlat (Λ : Type*) [Fintype Λ] [DecidableEq Λ] :
    isFlat (flatLedger Λ) :=
  fun _ _ => rfl

What this page does not claim

The certificate does not claim that any particular physical ledger exists in nature. The certificate does not claim that gravity is derived from the ledger structure. The certificate does not claim that the total ledger cost matches any measured physical quantity.

Verify this page

Every tagged claim above names its theorem. To check one yourself rather than trust this page, elaborate the source module with Lean 4 and audit its axiom basis:

$ lake env lean IndisputableMonolith/Gravity/RecognitionLedger.lean
expected axiom basis: [propext, Classical.choice, Quot.sound] (the Lean kernel's standard three; no RS-specific axioms)

A page whose claims cannot be reproduced this way does not ship. In production, every anchor links to the exact declaration in the public source release, and this block carries the build receipt for the page itself.

Derived articles

This page is generated by a question-recursion engine: the questions its answers raise become the next pages. The current agenda, with open targets marked red:

MACHINE LAYER · GROUNDED CLAIM TABLE · CLICK TO EXPAND