IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
dst-edge T:(Id), to,from:(|T|(IdLnk List)), u:Edge(T).
bi-graph(T;to;from) destination(u) |T|
By:
Auto THEN All (Unfolds [`bi-graph-edge`;`bi-graph`;`rset`]) THEN MaAuto