Nuprl - Proof: fun exp compose 2 1 1 2

IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: fun exp compose 2 1 1 2

1. T : Type
2. n :

3. 0<n
4.

h,f:(T

T). f^n-1 o h = primrec(n-1;h;

i,g. f o g)
5. h : T

T
6. f : T

f o primrec(n-1;

x.x;

i,g. f o g) o h = f o primrec(n-1;h;

i,g. f o g)

By:	Fold `fun_exp` 0 THEN Subst (f o f^n-1 o h = f o f^n-1 o h) 0

Generated subgoals:

1 f o f^n-1 o h = f o f^n-1 o h
1 step

2 f o f^n-1 o h = f o primrec(n-1;h;i,g. f o g)
2 steps

About:

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

1	f o f^n-1 o h = f o f^n-1 o h	1 step
2	f o f^n-1 o h = f o primrec(n-1;h;i,g. f o g)	2 steps