8 lines
159 B
Text
8 lines
159 B
Text
import logic
|
|
|
|
theorem tst (A B : Type) (a : A) (b : B) : a == b → b == a :=
|
|
begin
|
|
generalizes (a, b, B),
|
|
intros (B', b, a, H),
|
|
apply (heq.symm H),
|
|
end
|