Sindbad~EG File Manager

Length of proof is 20.  Level of proof is 9.
 
---------------- PROOF ----------------
 
1 [] E(x,y,y,x).
2 [] -E(x,y,z,v)| -E(x,y,z2,v2)|E(z,v,z2,v2).
13 [] E(xa,xb,xa,xb).
14 [] -E(xa,xb,xc,xd)|E(xc,xd,xa,xb).
15 [] -E(xa,xb,xc,xd)| -E(xc,xd,xe,xf)|E(xa,xb,xe,xf).
17 [] -E(xa,xb,xc,xd)|E(xa,xb,xd,xc).
18 [] E(xa,xa,xb,xb).
22 [] -E(xa,xb,xc,xd)|E(xb,xa,xd,xc).
24 [] T(xa,xb,xb).
25 [] -T(xa,xb,xc)|T(xc,xb,xa).
26 [] T(xa1,xa1,xb1).
27 [] -T(xa,xb,xc)| -T(xb,xa,xc)|xa=xb.
28 [] -T(xa,xb,xd)| -T(xb,xc,xd)|T(xa,xb,xc).
31 [] -T(xa,xb,xd)| -T(xb,xc,xd)|T(xa,xc,xd).
42 [] -T(xa,xb,xc)| -T(xa1,xb1,xc1)| -E(xa,xc,xa1,xc1)| -E(xb,xc,xb1,xc1)|E(xa,xb,xa1,xb1).
58 [] -T(xa,xc,xb)| -E(xa,xc,xa,xc1)| -E(xb,xc,xb,xc1)|xc=xc1.
62 [] -le(xa,xb,xc,xd)|T(xa,xb,ins(xc,xd,xa,xb)).
63 [] -le(xa,xb,xc,xd)|E(xa,ins(xc,xd,xa,xb),xc,xd).
97 [] -le(xa,xb,xc,xd)|T(xc,insert(xa,xb,xc,xd),xd).
98 [] -le(xa,xb,xc,xd)|E(xa,xb,xc,insert(xa,xb,xc,xd)).
100 [] le(a,b,c,d).
101 [] le(c,d,a,b).
102 [] -E(a,b,c,d).
105 [] ins(c,d,a,b)=p.
106 [] insert(c,d,a,b)=q.
112 [binary,100.1,63.1,demod,105] E(a,p,c,d).
113 [binary,100.1,62.1,demod,105] T(a,b,p).
117 [binary,101.1,98.1,demod,106] E(c,d,a,q).
118 [binary,101.1,97.1,demod,106] T(a,q,b).
132 [binary,102.1,22.2] -E(b,a,d,c).
236 [binary,113.1,25.1] T(p,b,a).
468 [binary,118.1,25.1] T(b,q,a).
912 [hyper,31,236,468] T(p,q,a).
917 [hyper,28,236,468] T(p,b,q).
1396 [hyper,2,112,1] E(c,d,p,a).
1870 [binary,117.1,22.1] E(d,c,q,a).
1874 [binary,117.1,17.1] E(c,d,q,a).
2971 [binary,1870.1,14.1] E(q,a,d,c).
3082 [hyper,42,26,912,1396,1874] E(c,c,p,q).
5100 [ur,15,2971,132] -E(b,a,q,a).
5591 [hyper,15,18,3082] E(x,x,p,q).
6749 [hyper,58,26,5591,5591] p=q.
6821 [para_from,6749.1.1,917.1.1] T(q,b,q).
6883 [binary,6821.1,27.2,unit_del,24] b=q.
6903 [para_from,6883.1.1,5100.1.1] -E(q,a,q,a).
6904 [binary,6903.1,13.1] $F.