23 lines
437 B
Text
23 lines
437 B
Text
|
||
|
||
theorem tst1 (x y z : Nat) : y = z → x = x → x = y → x = z :=
|
||
by {
|
||
intros h1 h2 h3;
|
||
revert h2;
|
||
intro h2;
|
||
exact Eq.trans h3 h1
|
||
}
|
||
|
||
theorem tst2 (x y z : Nat) : y = z → x = x → x = y → x = z :=
|
||
by {
|
||
intros h1 h2 h3;
|
||
revert y;
|
||
intros y hb ha;
|
||
exact Eq.trans ha hb
|
||
}
|
||
|
||
theorem tst3 (x y z : Nat) : y = z → x = x → x = y → x = z := by
|
||
intros
|
||
revert ‹x = y›
|
||
intro ha
|
||
exact Eq.trans ha ‹y = z›
|