All operations are defined on Type only anyway
simp
c a_1 ... a_n = c b_1 ... b_n
a_1 = b_1 /\ ... /\ a_n = b_n
simp!
induction
cases
rsimp