Merge pull request #64 from yannickseurin/add_right_eq_self

alternate proof for `add_right_eq_self`
This commit is contained in:
Jon Eugster
2024-08-28 23:51:30 +02:00
committed by GitHub

View File

@@ -48,19 +48,17 @@ rw [add_comm]
exact add_left_eq_self y x
```
Alternatively you can just prove it by induction on `x`
(the dots in the proof just indicate the two goals and
can be omitted):
Alternatively you can just prove it by induction on `x`:
```
induction x with d hd
· intro h
rw [zero_add] at h
assumption
· intro h
rw [succ_add] at h
apply succ_inj at h
apply hd at h
assumption
induction x with d hd
intro h
rw [zero_add] at h
exact h
intro h
rw [succ_add] at h
apply succ_inj at h
apply hd at h
exact h
```
"