IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
last l interval T:Type, l:T List, i:||l||, j:i. last(l_interval(l;j;i)) = l[(i-1)]
By:
Auto THEN Unfold `last` 0
THEN
RWO
Thm*l:T List, i:||l||, j:(i+1), x:(i-j). l_interval(l;j;i)[x] = l[(j+x)]
0
THEN
Inst Thm*l:T List, i:||l||, j:(i+1). ||l_interval(l;j;i)|| = i-j [T;l;i;j]
THEN
HypSubst' -1 0