9935cbc3d7
We need this feature to be able to solve (input) goals containing metavariables using blast. See new test for example.
13 lines
235 B
Text
13 lines
235 B
Text
constant p : nat → nat → Prop
|
|
|
|
constant p_trans : ∀ a b c, p a b → p b c → p a c
|
|
|
|
definition lemma1 (a b c d : nat) : a = d → p b c → p a b → p a c :=
|
|
begin
|
|
intros,
|
|
apply p_trans,
|
|
blast,
|
|
blast
|
|
end
|
|
|
|
print lemma1
|