IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
member filter T:Type, P:(T), L:T List, x:T. (x filter(P;L)) (xL) & P(x)
By:
RepeatFor 3 (Analyze 0) THEN ListInd -1 THEN Reduce 0
1. T : Type
2. P : T 3. T List
4. u : T 5. v : T List
6. x:T. (x filter(P;v)) (xv) & P(x)
x:T.
(x if P(u) [u / filter(P;v)] else filter(P;v) fi) (x [u / v]) & P(x)
13 steps
About:
IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html