Sindbad~EG File Manager

Length of proof is 19.  Level of proof is 8.
 
---------------- PROOF ----------------
 
13 [] E(xa,xb,xa,xb).
18 [] E(xa,xa,xb,xb).
24 [] T(xa,xb,xb).
27 [] -T(xa,xb,xc)| -T(xb,xa,xc)|xa=xb.
37 [] T(xa,xb,ext(xa,xb,alpha,gamma)).
38 [] xb!=ext(xa,xb,alpha,gamma).
46 [] -Col(xa,xb,xc)|Col(xb,xc,xa).
47 [] -Col(xa,xb,xc)|Col(xc,xa,xb).
49 [] -Col(xa,xb,xc)|Col(xb,xa,xc).
52 [] Col(xa,xb,xa).
57 [] xa=xb| -Col(xa,xb,xc)| -E(xa,xc,xa,xc1)| -E(xb,xc,xb,xc1)|xc=xc1.
86 [] sameside(xa,xp,xb)| -Col(xa,xp,xb)|T(xa,xp,xb).
98 [] xp=xq|xp=xr| -T(xq,xp,xr)|xa!=xp|Col(xa,xp,xq).
100 [] xp=xq|xcs=xp| -Col(xp,xq,xcs)| -Col(xp,xq,xr)|Col(xp,xcs,xr).
135 [] -sameside(xa,xp,xb)|xb!=xp.
139 [] a!=b.
140 [] p!=q.
141 [] Col(p,q,a).
142 [] Col(p,q,b).
143 [] Col(p,q,r).
144 [] -Col(a,b,r).
153 [binary,139.1,98.1] a=x| -T(b,a,x)|y!=a|Col(y,a,b).
208 [ur,27,24,139] -T(b,a,b).
296 [ur,57,140,52,18,13] p=p.
368 [hyper,100,141,142,unit_del,140] a=p|Col(p,a,b).
397 [hyper,100,143,142,unit_del,140] r=p|Col(p,r,b).
398 [hyper,100,143,141,unit_del,140] r=p|Col(p,r,a).
418 [binary,144.1,46.2] -Col(r,a,b).
503 [binary,208.1,86.3,unit_del,52] sameside(b,a,b).
1351 [binary,153.2,37.1,unit_del,38] x!=a|Col(x,a,b).
1687 [binary,503.1,135.1] b!=a.
13922 [para_into,1351.1.2,368.1.1] x!=p|Col(x,a,b)|Col(p,a,b).
13942 [factor,13922.2.3,unit_del,296] Col(p,a,b).
14146 [binary,13942.1,49.1] Col(a,p,b).
14160 [para_into,13942.1.1,398.1.2,unit_del,418] Col(p,r,a).
14161 [para_into,13942.1.1,397.1.2,unit_del,418] Col(p,r,b).
14555 [binary,14160.1,47.1] Col(a,p,r).
14586 [binary,14161.1,49.1] Col(r,p,b).
15201 [hyper,100,14146,14555,unit_del,1687,144] a=p.
15367 [para_from,15201.1.1,418.1.2] -Col(r,p,b).
15368 [binary,15367.1,14586.1] $F.