Lemmas about Nat
, Int
, and Fin
needed internally by omega
. #
These statements are useful for constructing proof expressions,
but unlikely to be widely useful, so are inside the Lean.Omega
namespace.
If you do find a use for them, please move them into the appropriate file and namespace!
theorem
Lean.Omega.Int.natAbs_dichotomy
{a : Int}
:
0 ≤ a ∧ ↑(Int.natAbs a) = a ∨ a < 0 ∧ ↑(Int.natAbs a) = -a
theorem
Lean.Omega.Fin.ofNat_val_natCast
{n : Nat}
{x : Nat}
{y : Nat}
(h : y = x % (n + 1))
:
↑↑(OfNat.ofNat x) = OfNat.ofNat y