IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
fpf-cap-single1 A:Type, eq:EqDecider(A), x:A, v,z:Top. x : v(x)?z ~ v
By:
UnivCD THEN Unfolds [`fpf-cap`;`fpf-single`] 0 THEN Unfold `fpf-dom` 0
THEN
Reduce 0
THEN
Subst' (eqof(eq)(x,x) = true) 0