Sindbad~EG File Manager

Length of proof is 19.  Level of proof is 10.
 
---------------- PROOF ----------------
 
1 [] E(x,y,y,x).
6 [] -E(x,y,x1,y1)| -E(y,z,y1,z1)| -E(x,v,x1,v1)| -E(y,v,y1,v1)| -T(x,y,z)| -T(x1,y1,z1)|x=y|E(z,v,z1,v1).
7 [] -T(x,y,x)|x=y.
14 [] -E(xa,xb,xc,xd)|E(xc,xd,xa,xb).
21 [] -E(xb,xc,xa,xa)|xb=xc.
22 [] -E(xa,xb,xc,xd)|E(xb,xa,xd,xc).
25 [] -T(xa,xb,xc)|T(xc,xb,xa).
26 [] T(xa1,xa1,xb1).
29 [] -T(xa,xb,xc)| -T(xa,xc,xd)|T(xb,xc,xd).
52 [] Col(xa,xb,xa).
58 [] -T(xa,xc,xb)| -E(xa,xc,xa,xc1)| -E(xb,xc,xb,xc1)|xc=xc1.
74 [] -T(xa,xb,xc)| -E(xa,xc,xa,xb)|xc=xb.
86 [] sameside(xa,xp,xb)| -Col(xa,xp,xb)|T(xa,xp,xb).
107 [] -M(xa,xm,xb)|M(xb,xm,xa).
109 [] M(xa,xm,xa)|xm!=xa.
143 [] -sameside(xa,xp,xb)|xb!=xp.
147 [] -M(xa,xm,xb)|T(xa,xm,xb).
148 [] -M(xa,xm,xb)|E(xm,xa,xm,xb).
157 [] M(p,a,r).
158 [] M(p,a,q).
159 [] r!=q.
160 [binary,157.1,148.1] E(a,p,a,r).
161 [binary,157.1,147.1] T(p,a,r).
164 [binary,158.1,147.1] T(p,a,q).
165 [binary,158.1,107.1] M(q,a,p).
204 [binary,159.1,7.2] -T(r,q,r).
310 [binary,161.1,25.1] T(r,a,p).
444 [binary,160.1,22.1] E(p,a,r,a).
452 [binary,160.1,14.1] E(a,r,a,p).
662 [binary,165.1,148.1] E(a,q,a,p).
763 [binary,204.1,147.2] -M(r,q,r).
1565 [binary,763.1,109.1] q!=r.
1661 [binary,1565.1,21.2] -E(q,r,x,x).
3146 [hyper,6,444,662,1,452,164,310,unit_del,1661] p=a.
3182 [binary,3146.1,143.2] -sameside(x,a,p).
3225 [ur,86,3182,52] T(p,a,p).
3606 [binary,3225.1,29.1,unit_del,26] T(a,p,x).
4463 [hyper,74,3606,662] q=p.
4469 [hyper,58,3606,160,160] p=r.
4683 [para_from,4463.1.1,1565.1.1] p!=r.
4684 [binary,4683.1,4469.1] $F.