(3steps total) PrintForm Definitions mb list 1 Sections MarkB generic Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: length zip
  T1,T2:Type, as:T1 List, bs:T2 List.
  ||as|| = ||bs||    ||zip(as;bs)|| = ||as||  
By: ((Analyze 0) THEN (Analyze 0) THEN (Analyze 0)) THEN ListInd -1 THEN Analyze 0
THEN
ListInd -1
THEN
RecUnfold `zip` 0
THEN
Reduce 0
THEN
Try (Complete Auto)

Generated subgoal:

1 1. T1 : Type
2. T2 : Type
3. T1 List
4. u : T1
5. v : T1 List
6. bs:T2 List. ||v|| = ||bs||    ||zip(v;bs)|| = ||v||  
7. T2 List
8. T2
9. v1 : T2 List
10. ||[u / v]|| = ||v1||    ||zip([u / v];v1)|| = ||[u / v]||  
  ||v||+1 = ||v1||+1  ||zip(v;v1)||+1 = ||v||+1
2 steps

About:
listintnatural_numberadduniverseequalimpliesall
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html

(3steps total) PrintForm Definitions mb list 1 Sections MarkB generic Doc