Equations
- LO.FirstOrder.Arith.instORingORingExp = LO.FirstOrder.Language.ORing.mk
theorem
LO.FirstOrder.Arith.consequence_of_exp
{L : LO.FirstOrder.Language}
[L.ORing]
(T : LO.FirstOrder.Theory L)
[ππ βΌ T]
[L.Exp]
(Ο : LO.FirstOrder.Sentence L)
(H : β (M : Type u) [inst : Zero M] [inst_1 : One M] [inst_2 : Add M] [inst_3 : Mul M] [inst_4 : Exp M] [inst_5 : LT M]
[inst_6 : LO.FirstOrder.Structure L M] [inst : LO.FirstOrder.Structure.ORing L M]
[inst : LO.FirstOrder.Structure.Exp L M] [inst : M β§β* T], M β§β Ο)
:
T β¨ Ο
- zero: πππ (β!!(LO.FirstOrder.Semiterm.Operator.Exp.exp.operator ![β0β]) = 1β)
- succ: πππ (ββ' !!(LO.FirstOrder.Semiterm.Operator.Exp.exp.operator ![β(!!(LO.FirstOrder.Semiterm.bvar 0) + 1)β]) = (2 * !!(LO.FirstOrder.Semiterm.Operator.Exp.exp.operator ![LO.FirstOrder.Semiterm.bvar 0]))β)
Instances For
Equations
- LO.FirstOrder.Arith.Theory.Β«termπππΒ» = Lean.ParserDescr.node `LO.FirstOrder.Arith.Theory.termπππ 1024 (Lean.ParserDescr.symbol "πππ")
Instances For
@[reducible, inline]
Equations
- ππ = β(LO.FirstOrder.Semiformula.lMap LO.FirstOrder.Language.oringEmb) '' ππβ» + πππ + LO.FirstOrder.Arith.Theory.indScheme ββα΅£(exp) (LO.FirstOrder.Arith.Hierarchy πΊ 0)
Instances For
Equations
- LO.FirstOrder.Arith.Theory.Β«termππΒ» = Lean.ParserDescr.node `LO.FirstOrder.Arith.Theory.termππ 1024 (Lean.ParserDescr.symbol "ππ")
Instances For
theorem
LO.FirstOrder.Arith.Theory.iSigmaβ_subset_EA :
β(LO.FirstOrder.Semiformula.lMap LO.FirstOrder.Language.oringEmb) '' ππΊβ β ππ
theorem
LO.FirstOrder.Arith.standardModelExp_unique'
(M : Type u_1)
[Zero M]
[One M]
[Add M]
[Exp M]
[Mul M]
[LT M]
(s : LO.FirstOrder.Structure ββα΅£(exp) M)
(hZero : LO.FirstOrder.Structure.Zero ββα΅£(exp) M)
(hOne : LO.FirstOrder.Structure.One ββα΅£(exp) M)
(hAdd : LO.FirstOrder.Structure.Add ββα΅£(exp) M)
(hMul : LO.FirstOrder.Structure.Mul ββα΅£(exp) M)
(hExp : LO.FirstOrder.Structure.Exp ββα΅£(exp) M)
(hEq : LO.FirstOrder.Structure.Eq ββα΅£(exp) M)
(hLT : LO.FirstOrder.Structure.LT ββα΅£(exp) M)
:
theorem
LO.FirstOrder.Arith.standardModelExp_unique
(M : Type u_1)
[Zero M]
[One M]
[Add M]
[Exp M]
[Mul M]
[LT M]
(s : LO.FirstOrder.Structure ββα΅£(exp) M)
[hZero : LO.FirstOrder.Structure.Zero ββα΅£(exp) M]
[hOne : LO.FirstOrder.Structure.One ββα΅£(exp) M]
[hAdd : LO.FirstOrder.Structure.Add ββα΅£(exp) M]
[hMul : LO.FirstOrder.Structure.Mul ββα΅£(exp) M]
[hExp : LO.FirstOrder.Structure.Exp ββα΅£(exp) M]
[hEq : LO.FirstOrder.Structure.Eq ββα΅£(exp) M]
[hLT : LO.FirstOrder.Structure.LT ββα΅£(exp) M]
:
Equations
- LO.FirstOrder.Arith.Standard.instExpNat = { exp := fun (x : β) => 2 ^ x }