At:
sublist transitivity11111111112
1.
T: Type
2.
Discrete{T}
3.
eq: {T}
4.
eq TT
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.
L1: T List
9.
L2: T List
10.
L3: T List
11.
f: {T=}
12.
f TT
13.
x,y:T. f(x,y) x = y
14.
z: T
15.
z(f) L1
16.
u: T
17.
v: T List
18.
(z:T. z(f) v z(eq) L3) z(eq) v z(eq) L3