test(tests/lean/run/cc_ac3): add test that requires superpose

This commit is contained in:
Leonardo de Moura 2016-12-29 15:05:16 -08:00
parent 4f463d6b85
commit 312445fc57

View file

@ -0,0 +1,36 @@
open tactic
example (a b c d e : nat) (f : nat → nat → nat) : b + a = d → b + c = e → f (a + b + c) (a + b + c) = f (c + d) (a + e) :=
by cc
example (a b c d e : nat) (f : nat → nat → nat) : b + a = d + d → b + c = e + e → f (a + b + c) (a + b + c) = f (c + d + d) (e + a + e) :=
by cc
section
universe variable u
variables {α : Type u}
variable [comm_semiring α]
example (a b c d e : α) (f : ααα) : b + a = d + d → b + c = e + e → f (a + b + c) (a + b + c) = f (c + d + d) (e + a + e) :=
by cc
end
section
universe variable u
variables {α : Type u}
variable [comm_ring α]
example (a b c d e : α) (f : ααα) : b + a = d + d → b + c = e + e → f (a + b + c) (a + b + c) = f (c + d + d) (e + a + e) :=
by cc
end
section
universe variable u
variables {α : Type u}
variables op : ααα
variables [is_associative α op]
variables [is_commutative α op]
def ex (a b c d e : α) (f : ααα) : op b a = op d d → op b c = op e e → f (op a (op b c)) (op (op a b) c) = f (op (op c d) d) (op e (op a e)) :=
by cc
end