theorem
proved
term proof
discrete_ledger_computable
show as:
view Lean formalization →
formal statement (Lean)
74theorem discrete_ledger_computable (t : LedgerTransition) :
75 ∃ (table : Finset (DiscreteLedgerState × DiscreteLedgerState)),
76 ∀ (s : DiscreteLedgerState),
77 ∃ (s' : DiscreteLedgerState), (s, s') ∈ table ∧ t s = s' := by
proof body
Term-mode proof.
78 use Finset.image (fun s => (s, t s)) Finset.univ
79 intro s
80 exact ⟨t s, Finset.mem_image.mpr ⟨s, Finset.mem_univ s, rfl⟩, rfl⟩
81
82/-- The number of possible discrete ledger states. -/