test(tests/lean/run): add more tests

This commit is contained in:
Leonardo de Moura 2015-11-01 19:27:44 -08:00
parent d1fa547335
commit dc203b28db

View file

@ -0,0 +1,16 @@
import data.list
constants f : nat → nat → nat
constants a b : nat
axiom H2 : a = b
set_option pp.all true
#app_builder congr (eq.refl (f a)), H2
constants g : ∀ {A :Type}, A → A → A
variables A : Type
variables l₁ l₂ l₃: list A
variables H : l₂ = l₃
#app_builder congr (eq.refl (g l₁)), H
#app_builder congr_arg (g l₁), H