9 lines
206 B
Text
9 lines
206 B
Text
import standard
|
|
using tactic
|
|
|
|
theorem tst {A : Type} {f : A → A → A} {a b c : A} (H1 : a = b) (H2 : b = c) : f a b = f b c
|
|
:= by apply congr;
|
|
apply (subst H2);
|
|
apply refl;
|
|
assumption
|
|
|