At:
list all is member lemma112212
1.
T: Type
2.
eq: {T=}
3.
eq TT
4.
x,y:T. eq(x,y) x = y
5.
P: TProp
6.
L: T List
7.
z: T
8.
u: T
9.
v: T List
10.
xv.P(x) z(eq) v P(z)
11.
P(u)
12.
xv.P(x)
13.
z(eq) (u.v)
14.
eq(z,u)
z(eq) v
By:
Rewrite (HigherC is_member_unrollC) 13
THEN
FwdThru
Thm*P:. P P = false
[14]
Generated subgoal: