At:
sublist iff assert sublist 2
1
2
1
1
1
1.
T: Type
2.
Discrete{T}
3.
eq: {T
}
4.
eq
T
T

5.
x:T. eq(x,x)
6.
x,y:T. eq(x,y) 
eq(y,x)
7.
x,y,z:T. eq(x,y) 
eq(y,z) 
eq(x,z)
8.
L: T List
9.
u: T
10.
v: T List
11.
M:T List. v(
eq)M 
(
eq)(v,M)
12.
M: T List
13.
u(
eq) M
14.
v(
eq)M
u(
eq) M

x
v.x(
eq) M
By:
RWH
(LemmaC
Thm*
p,q:
. (p
q) 
p & q)
0
THEN
Analyze 0
Generated subgoals:
About: