Sindbad~EG File Manager

Length of proof is 10.  Level of proof is 4.
 
---------------- PROOF ----------------
 
25 [] -T(xa,xb,xc)|T(xc,xb,xa).
162 [] Col(xa,xb,xc)|perp(xa,xb,xc,foot(xa,xb,xc)).
237 [] -perpAt(y,z,x,y1,z1)|y!=z.
243 [] -perp(xp,xq,xp1,xq1)|perpAt(xp,xq,il(xp,xq,xp1,xq1),xp1,xq1).
245 [] xp=xq|Col(xp,xq,xa)|Col(xp,xq,xb)| -T(xa,xt,xb)| -Col(xp,xq,xt)|opposite(xa,xp,xq,xb).
246 [] -opposite(xa,xp,xq,xb)| -Col(xp,xq,xa).
247 [] -opposite(xa,xp,xq,xb)| -Col(xp,xq,xb).
248 [] -opposite(xa,xp,xq,xb)|T(xa,il(xa,xb,xp,xq),xb).
249 [] -opposite(xa,xp,xq,xb)|Col(xp,xq,il(xa,xb,xp,xq)).
263 [] opposite(a,p,q,b).
264 [] -opposite(b,p,q,a).
265 [binary,263.1,249.1] Col(p,q,il(a,b,p,q)).
266 [binary,263.1,248.1] T(a,il(a,b,p,q),b).
267 [binary,263.1,247.1] -Col(p,q,b).
268 [binary,263.1,246.1] -Col(p,q,a).
271 [hyper,246,263,162] perp(p,q,a,foot(p,q,a)).
273 [binary,264.1,245.6,unit_del,267,268] p=q| -T(b,x,a)| -Col(p,q,x).
522 [binary,266.1,25.1] T(b,il(a,b,p,q),a).
881 [binary,271.1,243.1] perpAt(p,q,il(p,q,a,foot(p,q,a)),a,foot(p,q,a)).
1155 [binary,273.3,265.1,unit_del,522] p=q.
1158 [binary,1155.1,237.2] -perpAt(p,q,x,y,z).
1159 [binary,1158.1,881.1] $F.