11 lines
215 B
Text
11 lines
215 B
Text
case succ
|
|
x : Nat
|
|
ih : isEven (2 * x) = true
|
|
⊢ (match 2 * Nat.succ x with
|
|
| 0 => true
|
|
| Nat.succ n => isOdd n) =
|
|
true
|
|
case succ
|
|
x : Nat
|
|
ih : isEven (2 * x) = true
|
|
⊢ isEven (Nat.add (2 * x) 0) = true
|