theorem
LO.Arith.numeral_add_numeral
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
(n : β)
(m : β)
:
theorem
LO.Arith.numeral_mul_numeral
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
(n : β)
(m : β)
:
theorem
LO.Arith.numeral_ne_numeral_of_ne
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{n : β}
{m : β}
(h : n β m)
:
theorem
LO.Arith.lt_numeral_iff
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{x : M}
{n : β}
:
x < LO.ORingStruc.numeral n β β (i : Fin n), x = LO.ORingStruc.numeral βi
@[simp]
theorem
LO.Arith.numeral_inj_iff
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{n : β}
{m : β}
:
LO.ORingStruc.numeral n = LO.ORingStruc.numeral m β n = m
@[simp]
theorem
LO.Arith.numeral_lt_numeral_iff
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{n : β}
{m : β}
:
LO.ORingStruc.numeral n < LO.ORingStruc.numeral m β n < m
theorem
LO.Arith.val_numeral
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{ΞΎ : Type u_2}
{n : β}
(t : LO.FirstOrder.Semiterm ββα΅£ ΞΎ n)
(v : Fin n β β)
(f : ΞΎ β β)
:
LO.FirstOrder.Semiterm.valm M (fun (x : Fin n) => LO.ORingStruc.numeral (v x))
(fun (x : ΞΎ) => LO.ORingStruc.numeral (f x)) t = LO.ORingStruc.numeral (LO.FirstOrder.Semiterm.valm β v f t)
theorem
LO.Arith.bold_sigma_one_completeness
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{ΞΎ : Type u_2}
{n : β}
{p : LO.FirstOrder.Semiformula ββα΅£ ΞΎ n}
(hp : LO.FirstOrder.Arith.Hierarchy πΊ 1 p)
{e : Fin n β β}
{f : ΞΎ β β}
:
(LO.FirstOrder.Semiformula.Evalm β e f) p β
(LO.FirstOrder.Semiformula.Evalm M (fun (x : Fin n) => LO.ORingStruc.numeral (e x)) fun (x : ΞΎ) =>
LO.ORingStruc.numeral (f x))
p
theorem
LO.Arith.sigma_one_completeness
{M : Type u_1}
[LO.ORingStruc M]
[M β§β* πβ]
{Ο : LO.FirstOrder.Sentence ββα΅£}
(hΟ : LO.FirstOrder.Arith.Hierarchy πΊ 1 Ο)
:
theorem
LO.FirstOrder.Arith.sigma_one_completeness
{T : LO.FirstOrder.Theory ββα΅£}
[πβ βΌ T]
{Ο : LO.FirstOrder.Sentence ββα΅£}
(hΟ : LO.FirstOrder.Arith.Hierarchy πΊ 1 Ο)
:
theorem
LO.FirstOrder.Arith.sigma_one_completeness_iff
{T : LO.FirstOrder.Theory ββα΅£}
[πβ βΌ T]
[ss : LO.FirstOrder.Arith.Sigma1Sound T]
{Ο : LO.FirstOrder.Sentence ββα΅£}
(hΟ : LO.FirstOrder.Arith.Hierarchy πΊ 1 Ο)
: