Sindbad~EG File Manager

Length of proof is 8.  Level of proof is 5.
 
---------------- PROOF ----------------
 
7 [] -T(x,y,x)|x=y.
107 [] -M(xa,xm,xb)|M(xb,xm,xa).
109 [] M(xa,xm,xa)|xm!=xa.
110 [] M(xp,xa,s(xa,xp)).
111 [] -M(xp,xa,xr)| -M(xp,xa,xq)|xr=xq.
116 [] s(xa,xp)!=xp|xp=xa.
200 [] -M(xa,xm,xb)|T(xa,xm,xb).
224 [] M(s(a,c),p,s(b,c)).
225 [] b!=c.
226 [] a=p.
229 [] c1=s(a,c).
232 [] s(b,c)=d.
234 [] s(a,c)=c1.
339 [binary,225.1,7.2] -T(b,c,b).
419 [para_from,226.1.2,224.1.2,demod,234,232] M(c1,a,d).
547 [para_from,229.1.2,110.1.3] M(c,a,c1).
1138 [binary,339.1,200.2] -M(b,c,b).
1819 [binary,547.1,107.1] M(c1,a,c).
3322 [binary,1138.1,109.1] c!=b.
3345 [binary,3322.1,116.2,demod,232] d!=c.
3511 [ur,111,419,3345] -M(c1,a,c).
3512 [binary,3511.1,1819.1] $F.