At:
not disjoint is member lemma1112111
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 & disjoint(eq;v;M))
x:T. if eq(x,u) true else x(eq) v fi & x(eq) M
By:
RWH
(LemmaC
Thm* Dec(P) Dec(Q) ((P & Q) P Q))
-1
Generated subgoal: