IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
ma-single-pre1 wf1 1. Id
2. T : Type
3. A : Type
4. x : Id
5. ATProp
6. s : State(x : A)
s(x) A
By:
Repeat
(Unfolds [`ma-state`;`fpf-cap`;`fpf-single`;`fpf-dom`;`fpf-ap`] -1
(THEN
(Reduce -1)
THEN
DoSubsume