At:
assert l ball
1
1
1.
T: Type
2.
L: T List
3.
u: T
4.
v: T List
5.
P:(T

). (
x
v.P(x)) 
(
i:
||v||. P(v[i]))
6.
P: T

7.
P(u)
8.
(
x
v.P(x))
9.
i:
(||v||+1)
10.
(
x
v.P(x)) 
(
i:
||v||. P(v[i]))
11.
i:
||v||. P(v[i])
12.
i = 0
P([u / v][i])
By:
RWO
Thm*
a:T, as:T List, i:
. 0 < i 
i
||as|| 
[a / as][i] = as[(i-1)]
0
THEN
EasyHyp
Generated subgoals:
None
About: