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

strict_arith_universal_initial

definition
show as:
view math explainer →
module
IndisputableMonolith.Foundation.UniversalForcing.Strict.Invariance
domain
Foundation
line
18 · github
papers citing
none yet

open explainer

Read the cached plain-language explainer.

open lean source

IndisputableMonolith.Foundation.UniversalForcing.Strict.Invariance on GitHub at line 18.

browse module

All declarations in this module, on Recognition.

explainer page

A cached Ask Recognition explainer exists for this declaration.

open explainer

depends on

formal source

  15
  16/-- Every strict realization's derived forced arithmetic is canonically
  17equivalent to `LogicNat`. -/
  18def strict_arith_universal_initial (R : StrictLogicRealization) :
  19    (StrictLogicRealization.arith R).peano.carrier ≃ ArithmeticFromLogic.LogicNat :=
  20  (StrictLogicRealization.toLightweight R).orbitEquivLogicNat
  21
  22/-- **Strict Universal Forcing.**
  23
  24For any two strict Law-of-Logic realizations, the arithmetic derived from
  25their native law data is canonically equivalent. -/
  26noncomputable def strict_universal_forcing (R S : StrictLogicRealization) :
  27    (StrictLogicRealization.arith R).peano.carrier
  28      ≃ (StrictLogicRealization.arith S).peano.carrier :=
  29  ArithmeticOf.equivOfInitial (StrictLogicRealization.arith R)
  30    (StrictLogicRealization.arith S)
  31
  32/-- The Peano surface for every strict realization. -/
  33theorem strict_peano_surface (R : StrictLogicRealization) :
  34    ArithmeticOf.PeanoSurface (StrictLogicRealization.arith R) :=
  35  StrictLogicRealization.peano_surface R
  36
  37end Invariance
  38end Strict
  39end UniversalForcing
  40end Foundation
  41end IndisputableMonolith