mb event system 1 Sections EventSystems Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
RankTheoremName
2Thm* ll:(T List) List, n:||concat(ll)||.
Thm* m:||ll||. 
Thm* ||concat(firstn(m;ll))||n
Thm* n-||concat(firstn(m;ll))||<||ll[m]||
Thm* & concat(ll)[n] = ll[m][(n-||concat(firstn(m;ll))||)]
[select_concat]
cites the following:
1Thm* as,bs:T List, i:||as||. (as @ bs)[i] = as[i][select_append_front]
0Thm* L:Top List. firstn(0;L) ~ nil[first0]
0Thm* x:Tl:T List, i:||l||. [x / l][(i+1)] ~ l[i][select_cons_tl_sq]
1Thm* as,bs:T List, i:{||as||..(||as||+||bs||)}. (as @ bs)[i] = bs[(i-||as||)][select_append_back]
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
mb event system 1 Sections EventSystems Doc