(43steps total) PrintForm Definitions Lemmas mb list 1 Sections MarkB generic Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: cons sublist cons 1 1 2 1 2

1. T : Type
2. x1 : T
3. x2 : T
4. L1 : T List
5. L2 : T List
6. f : (||L1||+1)(||L2||+1)
7. increasing(f;||L1||+1)
8. j:(||L1||+1). [x1 / L1][j] = [x2 / L2][(f(j))]
9. [x1 / L1][0] = [x2 / L2][(f(0))]
10. f(0)  0
  increasing(j.f(j)-1;||L1||+1)


By: Unfold `increasing` 0 THEN Reduce 0
THEN
AllHyps (j.Unfold `increasing` j THEN InstHyp [i] j)


Generated subgoals:

None

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

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