At:
assert l ball
3
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.
i:
(||v||+1). P([u / v][i])
8.
i:
||v||
9.
P([u / v][(i+1)])
P(v[i])
By:
RWO
Thm*
a:T, as:T List, i:
. 0 < i 
i
||as|| 
[a / as][i] = as[(i-1)]
-1
THEN
NthHypSq -1
THEN
Analyze
Generated subgoals:
None
About: