Sindbad~EG File Manager

Length of proof is 11.  Level of proof is 5.
 
---------------- PROOF ----------------
 
26 [] T(xa1,xa1,xb1).
52 [] Col(xa,xb,xa).
103 [] xa=xb|xp=xq| -Col(xp,xq,xa)| -Col(xp,xq,xb)| -Col(xp,xq,xr)|Col(xa,xb,xr).
132 [] -R(xa,xb,xc)|R(xc,xb,xa).
136 [] -R(xa,xb,xc)| -R(xa1,xb,xc)| -T(xa,xc,xa1)|xb=xc.
139 [] -R(xa,xb,xc)| -Col(xa,xb,xc)|xa=xb|xc=xb.
203 [] -perpAt(y,z,x,y1,z1)|y!=z.
204 [] -perpAt(y,z,x,y1,z1)|y1!=z1.
205 [] -perpAt(y,z,x,y1,z1)| -Col(y,z,u)| -Col(y1,z1,v)|R(u,x,v).
209 [] -perp(xp,xq,xp1,xq1)|perpAt(xp,xq,il(xp,xq,xp1,xq1),xp1,xq1).
212 [] perp(a,b,p,q).
213 [] Col(a,b,p).
214 [] Col(a,b,q).
216 [] il(a,b,p,q)=c.
217 [binary,212.1,209.1,demod,216] perpAt(a,b,c,p,q).
362 [binary,217.1,204.1] p!=q.
363 [binary,217.1,203.1] a!=b.
372 [hyper,205,217,214,52] R(q,c,p).
373 [hyper,205,217,213,52] R(p,c,p).
556 [ur,103,362,363,213,214,214] Col(p,q,q).
1608 [binary,372.1,132.1] R(p,c,q).
1617 [binary,373.1,139.1,unit_del,52,factor_simp] p=c.
1639 [para_from,1617.1.1,362.1.1] c!=q.
2227 [hyper,205,217,214,556] R(q,c,q).
3118 [ur,136,1608,26,1639] -R(q,c,q).
3119 [binary,3118.1,2227.1] $F.