abbrev
definition
Generation
show as:
view math explainer →
open explainer
Generate a durable explainer page for this declaration.
open lean source
IndisputableMonolith.Foundation.UniversalForcing.BiologyRealization on GitHub at line 18.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
used by
-
all_examples_cproj_two_statement -
gauge_order_product -
three_generations_from_dimension -
gauge_generators_eq_edges -
Generation -
closure_populates_next -
biologyCost -
biologyCost_self -
biologyCost_symm -
biologyInterpret -
biologyRealization -
yardstick -
predict_mass -
color_offset_eq_quark_baseline -
r_tau -
bottom_down_equal_Z -
quark_mass_positive -
genOfTorsion -
ResidueCert -
match_rsbridge_rung -
N_diff_eq_edges_at_D3 -
all_fermion_masses_pos -
Generation -
tau_g -
tauStepCoefficientDerived_matches_paper -
bits_bijection -
dimensions_from_log -
dimensionToGeneration -
Generation -
neutrino_generations_match -
no_fourth_generation -
three_generations -
why_exactly_three -
symmetry_broken -
Generation -
generationTorsion -
massRatioFromRungs -
RSLedger -
RSLedger -
RSLedger
formal source
15open ArithmeticFromLogic
16open Invariance.Universal
17
18abbrev Generation := Nat
19
20def biologyCost (a b : Generation) : Nat :=
21 if a = b then 0 else 1
22
23@[simp] theorem biologyCost_self (a : Generation) : biologyCost a a = 0 := by
24 simp [biologyCost]
25
26theorem biologyCost_symm (a b : Generation) : biologyCost a b = biologyCost b a := by
27 by_cases h : a = b
28 · subst h; simp [biologyCost]
29 · have h' : b ≠ a := by intro hb; exact h hb.symm
30 simp [biologyCost, h, h']
31
32def biologyInterpret (n : LogicNat) : Generation :=
33 LogicNat.toNat n
34
35/-- Biological realization as generation-count comparison. -/
36def biologyRealization : LogicRealization where
37 Carrier := Generation
38 Cost := Nat
39 zeroCost := inferInstance
40 compare := biologyCost
41 zero := 0
42 step := Nat.succ
43 Orbit := LogicNat
44 orbitZero := LogicNat.zero
45 orbitStep := LogicNat.succ
46 interpret := biologyInterpret
47 interpret_zero := by rfl
48 interpret_step := by