9 lines
276 B
Text
9 lines
276 B
Text
import algebra.ring
|
|
constants (A : Type.{1}) (A_cr : comm_ring A) (x y z w : A)
|
|
attribute A_cr [instance]
|
|
|
|
open tactic
|
|
open simplifier.unit simplifier.ac simplifier.distrib
|
|
|
|
example : (x + y) * (z + w) = x * z + x * w + y * z + y * w * 1 + 0 :=
|
|
by simp >> trace_state >> triv
|