IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
finite-support-feasible1 1. D : Dsys
2. L : Id List
3. i:Id. (iL) ma-is-empty(M(i))
4. i:Id. Feasible(M(i))
5. (iL.(ltgma-outlinks(M(i);i).(destination(1of(ltg)) L)
5. (iL.(ltgma-outlinks(M(i);i). 5. interface-check(D;1of(ltg);1of(2of(ltg));2of(2of(ltg)))))
l:IdLnk, tg:Id. M(source(l)).dout(l,tg) r M(destination(l)).din(l,tg)
By:
Auto THEN Decide deq-member(IdDeq;source(l);L)
THEN
RWO Thm*eq:EqDecider(A), L:A List, x:A. deq-member(eq;x;L) (xL) -1