Sindbad~EG File Manager

Length of proof is 12.  Level of proof is 7.
 
---------------- PROOF ----------------
 
7 [] -T(x,y,x)|x=y.
13 [] E(xa,xb,xa,xb).
22 [] -E(xa,xb,xc,xd)|E(xb,xa,xd,xc).
24 [] T(xa,xb,xb).
27 [] -T(xa,xb,xc)| -T(xb,xa,xc)|xa=xb.
31 [] -T(xa,xb,xd)| -T(xb,xc,xd)|T(xa,xc,xd).
45 [] -T(xa,xb,xc)| -E3(xa,xb,xc,xa1,xb1,xc1)|T(xa1,xb1,xc1).
57 [] xa=xb| -Col(xa,xb,xc)| -E(xa,xc,xa,xc1)| -E(xb,xc,xb,xc1)|xc=xc1.
76 [] -E(xa1,xa2,xb1,xb2)| -E(xa1,xa3,xb1,xb3)| -E(xa2,xa3,xb2,xb3)|E3(xa1,xa2,xa3,xb1,xb2,xb3).
79 [] Col(xa,xb,xc)| -T(xb,xc,xa).
86 [] T(a,c,b).
87 [] E(a,c,a,c1).
88 [] E(b,c,b,c1).
89 [] c!=c1.
91 [binary,86.1,79.2] Col(b,a,c).
231 [binary,87.1,22.1] E(c,a,c1,a).
360 [binary,89.1,7.2] -T(c,c1,c).
404 [hyper,57,91,88,87,unit_del,89] b=a.
410 [para_from,404.1.1,86.1.3] T(a,c,a).
637 [binary,410.1,31.2,unit_del,24] T(x,c,a).
641 [binary,410.1,27.2,unit_del,24] c=a.
660 [para_from,641.1.1,360.1.3] -T(c,c1,a).
668 [para_from,641.1.2,404.1.2] b=c.
1645 [para_into,660.1.1,668.1.2] -T(b,c1,a).
4696 [ur,45,637,1645] -E3(x,c,a,b,c1,a).
5303 [hyper,76,88,13,231] E3(b,c,a,b,c1,a).
5304 [binary,5303.1,4696.1] $F.