At:
list exists exists122111
1.
T: Type
2.
eq: {T=}
3.
P: TType
4.
L: T List
5.
u: T
6.
v: T List
7.
xv.P(x) (x:{x:T| x(eq) v }. P(x))
8.
xv.P(x) (x:{x:T| x(eq) v }. P(x))
9.
x: T
10.
if eq(x,u) true else x(eq) v fi
11.
P(x)
3. eq TT 4. x,y:T. eq(x,y) x = y 5. P: TType 6. L: T List 7. u: T 8. v: T List 9. xv.P(x) (x:{x:T| x(eq) v }. P(x)) 10. xv.P(x) (x:{x:T| x(eq) v }. P(x)) 11. x: T 12. if eq(x,u) true else x(eq) v fi 13. P(x) Dec(x = u)