1. k : 
2. k1:. 
2. k1<k
2. 
2. (B:(k1Type), Q:(x:k1B(x)Prop).
2. ((x:k1. y:B(x). Q(x;y))  (f:(x:k1B(x)). x:k1. Q(x;f(x))))
3. B : kType
4. Q : x:kB(x)Prop
5. x:k. y:B(x). Q(x;y)
6. k = 0
7. g : x:(k-1)B(x)
8. x:(k-1). Q(x;g(x))
9. y : B(k-1)
10. Q(k-1;y)
  f:(x:kB(x)). f(k-1) = y & (x:(k-1). f(x) = g(x))

By:	Witness: x.if x=k-1 y else g(x) fi with type x:kB(x) THEN Reduce Concl

1	(x.if x=k-1 y else g(x) fi)  x:kB(x)	5 steps
2	11. (x.if x=k-1 y else g(x) fi)  x:kB(x)   if k-1=k-1 y else g(k-1) fi = y   & (x:(k-1). if x=k-1 y else g(x) fi = g(x))	1 step

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