At:
not disjoint is member lemma1112111111
1.
T: Type
2.
eq: {T=}
3.
eq TT
4.
x,y:T. eq(x,y) x = y
5.
L: T List
6.
u: T
7.
v: T List
8.
M:T List. disjoint(eq;v;M) (x:T. x(eq) v & x(eq) M)
9.
M: T List
10.
u(eq) M
if eq(u,u) true else u(eq) v fi & u(eq) M
By:
IfThenElseCases 0
Generated subgoals: