@[r:real][s:real][t:real][n:nis(t,0)]
+v0
t1:=tr3is(real,ts(t,ts(r,ov(s,t,n))),ts(ts(r,ov(s,t,n)),t),ts(r,ts(ov(s,t,n),t)),ts(r,s),comts(t,ts(r,ov(s,t,n))),assts1(r,ov(s,t,n),t),ists2(ts(ov(s,t,n),t),s,r,satz204e(s,t,n))):is(ts(t,ts(r,ov(s,t,n))),ts(r,s))
-v0
lemma6:=satz204g(ts(r,s),t,ts(r,ov(s,t,n)),n,t1".v0"):is(ts(r,ov(s,t,n)),ov(ts(r,s),t,n))
+*v0
n@t2:=tris(real,ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(ts(t,ov(r,t,n)),ts(t,ov(s,t,n))),pl(r,s),disttp2(t,ov(r,t,n),ov(s,t,n)),ispl12(ts(t,ov(r,t,n)),r,ts(t,ov(s,t,n)),s,satz204c(r,t,n),satz204c(s,t,n))):is(ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(r,s))
-v0
n@lemma7:=satz204g(pl(r,s),t,pl(ov(r,t,n),ov(s,t,n)),n,t2".v0"):is(pl(ov(r,t,n),ov(s,t,n)),ov(pl(r,s),t,n))
r@[n:nis(r,0)]
lemma8:=satz204b(r,r,n,ov(r,r,n),1rl,satz204c(r,r,n),satz195(r)):is(ov(r,r,n),1rl)
lemma9:=ore2(is(r,0),is(ov(0,r,n),0),satz192c(r,ov(0,r,n),satz204c(0,r,n)),n):is(ov(0,r,n),0)
r@[i:is(r,m0(r))]
+*v0
i@[p:pos(m0(r))]
t3:=<isneg(r,m0(r),i,satz176f(r,p))>pnotn(m0(r),p):con
i@[n:neg(m0(r))]
t4:=<ispos(r,m0(r),i,satz176d(r,n))>nnotp(m0(r),n):con
-v0
i@lemma10:=satz176e(r,or3e1(is(m0(r),0),pos(m0(r)),neg(m0(r)),axrlo(m0(r)),[t:pos(m0(r))]t3".v0"(t),[t:neg(m0(r))]t4".v0"(t))):is(r,0)
r@lemma11:=satz167f(ts(r,r),0,th3"l.imp"(less(ts(r,r),0),neg(ts(r,r)),nnegsq(r),[t:less(ts(r,r),0)]satz169d(ts(r,r),t))):moreis(ts(r,r),0)
lemma12:=rapp(r,is(ts(r,r),ts(abs(r),abs(r))),[t:pos(r)]satz196a(r,r,t,t),[t:is(r,0)]tris2(real,ts(r,r),ts(abs(r),abs(r)),0,ts01(r,r,t),ts01(abs(r),abs(r),abs0(r,t))),[t:neg(r)]satz196b(r,r,t,t)):is(ts(r,r),ts(abs(r),abs(r)))
@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
+shift
t1:=satz190a(x,x,1rl,0,moreisi2(x,x,refis(real,x)),satz169a(1rl,natpos(1rl,natrl1))):more(pl(x,1rl),pl(x,0))
t2:=ismore2(pl(x,0),x,pl(x,1rl),pl02(x,0,refis(real,0)),t1):more(pl(x,1rl),x)
t3:=satz172d(pl(x,1rl),x,y,t2,satz168b(y,x,ly)):more(pl(x,1rl),y)
t4:=satz182d(pl(x,1rl),y,t3):pos(mn(pl(x,1rl),y))
t5:=intmn(pl(x,1rl),intpl(x,ix,1rl,intrl1),y,iy):intrl(mn(pl(x,1rl),y))
t6:=posintnatrl(mn(pl(x,1rl),y),t4,t5):natrl(mn(pl(x,1rl),y))
-shift
shiftl:=ntofrl(mn(pl(x,1rl),y),t6".shift"):nat
[n:1to(shiftl)]
+*shift
n@n1:=inn"n"(shiftl,n):nat
t7:=1top(shiftl,n):lessis"n"(n1,shiftl)
n2:=rlofnt(n1):real
t8:=natintrl(n2,natrli(n1)):intrl(n2)
-shift
n@shiftr:=mn(pl(n2".shift",y),1rl):real
intshiftr:=intmn(pl(n2".shift",y),intpl(n2".shift",t8".shift",y,iy),1rl,intrl1):intrl(shiftr)
[m:1to(shiftl)][i:is(shiftr(n),shiftr(m))]
+*shift
n@t8a:=tris(real,mn(pl(shiftr(n),1rl),y),mn(pl(n2,y),y),n2,ismn1(pl(mn(pl(n2,y),1rl),1rl),pl(n2,y),y,plmn(pl(n2,y),1rl)),mnpl(n2,y)):is(mn(pl(shiftr(n),1rl),y),n2)
i@t9a:=ismn1(pl(shiftr(n),1rl),pl(shiftr(m),1rl),y,ispl1(shiftr(n),shiftr(m),1rl,i)):is(mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y))
t10a:=tr3is(real,n2(n),mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y),n2(m),symis(real,mn(pl(shiftr(n),1rl),y),n2,t8a),t9a,t8a(m)):is(n2(n),n2(m))
t11a:=isntirl(n1(n),n1(m),t10a):is"n"(n1(n),n1(m))
-shift
i@iseshiftr:=isinne(shiftl,n,m,t11a".shift"):is"e"(1to(shiftl),n,m)
+*shift
n@[m:more(shiftr,x)]
t9:=satz188d(shiftr,x,1rl,m):more(pl(shiftr,1rl),pl(x,1rl))
t10:=ismore1(pl(shiftr,1rl),pl(n2,y),pl(x,1rl),plmn(pl(n2,y),1rl),t9):more(pl(n2,y),pl(x,1rl))
t11:=satz188d(pl(n2,y),pl(x,1rl),m0(y),t10):more(mn(pl(n2,y),y),mn(pl(x,1rl),y))
t12:=ismore1(mn(pl(n2,y),y),n2,mn(pl(x,1rl),y),mnpl(n2,y),t11):more(n2,mn(pl(x,1rl),y))
t13:=ismore12(n2,rlofnt(ntofrl(n2,natrli(n1))),mn(pl(x,1rl),y),rlofnt(ntofrl(mn(pl(x,1rl),y),t6)),isrlnt1(n2,natrli(n1)),isrlnt1(mn(pl(x,1rl),y),t6),t12):more(rlofnt(ntofrl(n2,natrli(n1))),rlofnt(shiftl))
t14:=lemmaiva5(ntofrl(n2,natrli(n1)),shiftl,t13):more"n"(ntofrl(n2,natrli(n1)),shiftl)
t15:=ismore1"n"(ntofrl(n2,natrli(n1)),n1,shiftl,isntrl2(n1),t14):more"n"(n1,shiftl)
n@t16:=th3"l.imp"(more(shiftr,x),more"n"(n1,shiftl),satz10d(n1,shiftl,t7),[t:more(shiftr,x)]t15(t)):not(more(shiftr,x))
-shift
n@shiftrls:=satz167e(shiftr,x,t16".shift"):lessis(shiftr,x)
+*shift
n@[m:more(y,shiftr)]
t17:=satz188d(y,shiftr,1rl,m):more(pl(y,1rl),pl(shiftr,1rl))
t18:=ismore12(pl(y,1rl),pl(1rl,y),pl(shiftr,1rl),pl(n2,y),compl(y,1rl),plmn(pl(n2,y),1rl),t17):more(pl(1rl,y),pl(n2,y))
t19:=satz188a(1rl,n2,y,t18):more(1rl,n2)
t20:=lemmaiva5(1,n1,t19):more"n"(1,n1)
n@t21:=th3"l.imp"(more(y,shiftr),more"n"(1,n1),satz10d(1,n1,satz24a(n1)),[t:more(y,shiftr)]t20(t)):not(more(y,shiftr))
-shift
n@lsshiftr:=satz167e(y,shiftr,t21".shift"):lessis(y,shiftr)
ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
+*shift
a@t22:=and3e1(intrl(u),lessis(y,u),lessis(u,x),a):intrl(u)
t23:=and3e2(intrl(u),lessis(y,u),lessis(u,x),a):lessis(y,u)
t24:=and3e3(intrl(u),lessis(y,u),lessis(u,x),a):lessis(u,x)
[l:less(u,x)]
t25:=satz188f(pl(u,1rl),pl(x,1rl),m0"r"(y),satz188f(u,x,1rl,l)):less(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
a@[i:is(u,x)]
t26:=ismn1(pl(u,1rl),pl(x,1rl),y,ispl1(u,x,1rl,i)):is(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
a@t27:=th9"l.or"(less(u,x),is(u,x),less(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),is(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),t24,[t:less(u,x)]t25(t),[t:is(u,x)]t26(t)):lessis(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
ul:=shiftl(u,t22,y,iy,t23):nat
t28:=islessis12(mn(pl(u,1rl),y),rlofnt(ul),mn(pl(x,1rl),y),rlofnt(shiftl),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isrlnt1(mn(pl(x,1rl),y),t6),t27):lessis(rlofnt(ul),rlofnt(shiftl))
t29:=th3"l.imp"(more"n"(ul,shiftl),more(rlofnt(ul),rlofnt(shiftl)),satz167d(rlofnt(ul),rlofnt(shiftl),t28),[t:more"n"(ul,shiftl)]lemmaiva6(ul,shiftl,t)):not(more"n"(ul,shiftl))
t30:=satz10e(ul,shiftl,t29):lessis"n"(ul,shiftl)
-shift
a@shiftl1:=outn(shiftl,ul".shift",t30".shift"):1to(shiftl)
+*shift
a@t31:=isinoutn(shiftl,ul,t30):is"n"(ul,n1(shiftl1))
t32:=tris(real,mn(pl(u,1rl),y),rlofnt(ul),n2(shiftl1),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isnterl(ul,n1(shiftl1),t31)):is(mn(pl(u,1rl),y),n2(shiftl1))
t33:=tris(real,mn(pl(mn(pl(u,1rl),y),y),1rl),mn(pl(u,1rl),1rl),u,ismn1(pl(mn(pl(u,1rl),y),y),pl(u,1rl),1rl,plmn(pl(u,1rl),y)),mnpl(u,1rl)):is(mn(pl(mn(pl(u,1rl),y),y),1rl),u)
-shift
a@shiftinv1:=tris1(real,u,shiftr(shiftl1),mn(pl(mn(pl(u,1rl),y),y),1rl),t33".shift",ismn1(pl(mn(pl(u,1rl),y),y),pl(n2".shift"(shiftl1),y),1rl,ispl1(mn(pl(u,1rl),y),n2".shift"(shiftl1),y,t32".shift"))):is(u,shiftr(shiftl1))
shiftinv2:=symis(real,u,shiftr(shiftl1),shiftinv1):is(shiftr(shiftl1),u)
ly@[alpha:'type']
seq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]alpha:'type'
[s:seq]
proofsirrelevant:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is(t,u)]is"e"(alpha,<tl><lt><it><t>s,<ul><lu><iu><u>s):'prop'
alpha@[f:seq]
shiftf:=[t:1to(shiftl)]<shiftrls(t)><lsshiftr(t)><intshiftr(t)><shiftr(t)>f:[t:1to(shiftl)]alpha
ly@[s:seq(real)]
inseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]and3(intrl(<w><v><u><t>s),lessis(y,<w><v><u><t>s),lessis(<w><v><u><t>s,x)):'prop'
injseq:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is"r"(<tl><lt><it><t>s,<ul><lu><iu><u>s)]is"r"(t,u):'prop'
[u:real][v:real][a:and3(intrl(v),lessis(y,v),lessis(v,x))]
+*shift
a@prop1:=is(u,<t24(v,a)><t23(v,a)><t22(v,a)><v>s):'prop'
-shift
v@improp:=and(and3(intrl(v),lessis(y,v),lessis(v,x)),[t:and3(intrl(v),lessis(y,v),lessis(v,x))]prop1".shift"(t)):'prop'
u@imseq:=some([t:real]improp(u,t)):'prop'
s@surjseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]imseq(t):'prop'
perm:=and(injseq,surjseq):'prop'
[ins:inseq(s)]
+*shift
ins@[n:1to(shiftl)]
ns:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>s:real
t34:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ins:and3(intrl(ns),lessis(y,ns),lessis(ns,x))
-shift
ins@shiftseq:=[t:1to(shiftl)]shiftl1(ns".shift"(t),t34".shift"(t)):[t:1to(shiftl)]1to(shiftl)
[js:injseq(s)]
+*shift
js@[n:1to(shiftl)][m:1to(shiftl)][i:is"e"(1to(shiftl),<n>shiftseq,<m>shiftseq)]
t35:=isoutne(shiftl,ul(ns(n),t34(n)),t30(ns(n),t34(n)),ul(ns(m),t34(m)),t30(ns(m),t34(m)),i):is"n"(ul(ns(n),t34(n)),ul(ns(m),t34(m)))
t36:=isrlint(mn(pl(ns(n),1rl),y),t6(ns(n),t22(ns(n),t34(n)),y,iy,t23(ns(n),t34(n))),mn(pl(ns(m),1rl),y),t6(ns(m),t22(ns(m),t34(m)),y,iy,t23(ns(m),t34(m))),t35):is(mn(pl(ns(n),1rl),y),mn(pl(ns(m),1rl),y))
t37:=satz188b(ns(n),ns(m),1rl,satz188b(pl(ns(n),1rl),pl(ns(m),1rl),m0"r"(y),t36)):is(ns(n),ns(m))
t38:=<t37><shiftrls(m)><lsshiftr(m)><intshiftr(m)><shiftr(m)><shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>js:is(shiftr(n),shiftr(m))
t39:=satz188b(n2(n),n2(m),y,satz188b(pl(n2(n),y),pl(n2(m),y),m0(1rl),t38)):is(n2(n),n2(m))
t40:=isntirl(n1(n),n1(m),t39):is"n"(n1(n),n1(m))
t41:=isinne(shiftl,n,m,t40):is"e"(1to(shiftl),n,m)
-shift
js@injshiftseq:=[t:1to(shiftl)][u:1to(shiftl)][v:is"e"(1to(shiftl),<t>shiftseq,<u>shiftseq)]t41".shift"(t,u,v):injective(1to(shiftl),1to(shiftl),shiftseq)
ins@[pri:proofsirrelevant(real,s)][ss:surjseq(s)]
+*shift
ss@[n:1to(shiftl)]
t42:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ss:imseq(shiftr(n))
[u:real][p:improp(shiftr(n),u)]
t43:=ande1(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):and3(intrl(u),lessis(y,u),lessis(u,x))
t44:=ande2"l.r"(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):is(shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s)
ul1:=shiftl1(u,t43):1to(shiftl)
t45:=<shiftinv1(u,t43)><shiftrls(ul1)><lsshiftr(ul1)><intshiftr(ul1)><shiftr(ul1)><t24(u,t43)><t23(u,t43)><t22(u,t43)><u>pri:is(<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1))
t46:=shiftinv1(ns(ul1),t34(ul1)):is(ns(ul1),shiftr(<ul1>shiftseq))
t47:=tr3is(real,shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1),shiftr(<ul1>shiftseq),t44,t45,t46):is(shiftr(n),shiftr(<ul1>shiftseq))
t48:=iseshiftr(n,<ul1>shiftseq,t47):is"e"(1to(shiftl),n,<ul1>shiftseq)
t49:=somei(1to(shiftl),[t:1to(shiftl)]is"e"(1to(shiftl),n,<t>shiftseq),ul1,t48):image(1to(shiftl),1to(shiftl),shiftseq,n)
n@t50:=someapp(real,[t:real]improp(shiftr(n),t),t42,image(1to(shiftl),1to(shiftl),shiftseq,n),[t:real][u:improp(shiftr(n),t)]t49(t,u)):image(1to(shiftl),1to(shiftl),shiftseq,n)
-shift
ss@surjshiftseq:=[t:1to(shiftl)]t50".shift"(t):surjective(1to(shiftl),1to(shiftl),shiftseq)
pri@[ps:perm(s)]
bijshiftseq:=andi(injective(1to(shiftl),1to(shiftl),shiftseq),surjective(1to(shiftl),1to(shiftl),shiftseq),injshiftseq(ande1(injseq(s),surjseq(s),ps)),surjshiftseq(ande2(injseq(s),surjseq(s),ps))):bijective(1to(shiftl),1to(shiftl),shiftseq)
+c
@complex:=pair1type(real):'type'
cx:=complex:'type'
[x:complex][y:complex]
is:=is"e"(cx,x,y):'prop'
nis:=not(is(x,y)):'prop'
@[p:[t:complex]'prop']
some:=some"l"(cx,p):'prop'
all:=all"l"(cx,p):'prop'
one:=one"e"(cx,p):'prop'
@[a:real][b:real]
pli:=pair1(real,a,b):complex
x@re:=first1(real,x):real
im:=second1(real,x):real
b@reis:=first1is1(real,a,b):is"r"(re(pli(a,b)),a)
isre:=first1is2(real,a,b):is"r"(a,re(pli(a,b)))
imis:=second1is1(real,a,b):is"r"(im(pli(a,b)),b)
isim:=second1is2(real,a,b):is"r"(b,im(pli(a,b)))
x@pliis:=pair1is1(real,x):is(pli(re(x),im(x)),x)
ispli:=pair1is2(real,x):is(x,pli(re(x),im(x)))
y@[i:is(x,y)]
iscere:=isf(cx,real,[t:cx]re(t),x,y,i):is"r"(re(x),re(y))
isceim:=isf(cx,real,[t:cx]im(t),x,y,i):is"r"(im(x),im(y))
b@[c:real][i:is"r"(a,b)]
isrecx1:=isf(real,cx,[t:real]pli(t,c),a,b,i):is(pli(a,c),pli(b,c))
isrecx2:=isf(real,cx,[t:real]pli(c,t),a,b,i):is(pli(c,a),pli(c,b))
c@[d:real][i:is"r"(a,b)][j:is"r"(c,d)]
isrecx12:=tris(cx,pli(a,c),pli(b,c),pli(b,d),isrecx1(a,b,c,i),isrecx2(c,d,b,j)):is(pli(a,c),pli(b,d))
x@satz206:=refis(cx,x):is(x,x)
y@[i:is(x,y)]
satz207:=symis(cx,x,y,i):is(y,x)
y@[z:complex][i:is(x,y)][j:is(y,z)]
satz208:=tris(cx,x,y,z,i,j):is(x,z)
@0c:=pli(0,0):complex
1c:=pli(1rl,0):complex
y@pl:=pli(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))):complex
d@plis12a:=isrecx12(pl"r"(re(pli(a,b)),re(pli(c,d))),pl"r"(a,c),pl"r"(im(pli(a,b)),im(pli(c,d))),pl"r"(b,d),ispl12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ispl12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)))
plis12b:=symis(cx,pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)),plis12a):is(pli(pl"r"(a,c),pl"r"(b,d)),pl(pli(a,b),pli(c,d)))
x@[r:real][s:real]
plis1a:=isrecx12(pl"r"(re(pli(r,s)),re(x)),pl"r"(r,re(x)),pl"r"(im(pli(r,s)),im(x)),pl"r"(s,im(x)),ispl1(re(pli(r,s)),r,re(x),reis(r,s)),ispl1(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))))
plis1b:=symis(cx,pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))),plis1a):is(pli(pl"r"(r,re(x)),pl"r"(s,im(x))),pl(pli(r,s),x))
plis2a:=isrecx12(pl"r"(re(x),re(pli(r,s))),pl"r"(re(x),r),pl"r"(im(x),im(pli(r,s))),pl"r"(im(x),s),ispl2(re(pli(r,s)),r,re(x),reis(r,s)),ispl2(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)))
plis2b:=symis(cx,pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)),plis2a):is(pli(pl"r"(re(x),r),pl"r"(im(x),s)),pl(x,pli(r,s)))
z@[i:is(x,y)]
ispl1:=isf(cx,cx,[t:cx]pl(t,z),x,y,i):is(pl(x,z),pl(y,z))
ispl2:=isf(cx,cx,[t:cx]pl(z,t),x,y,i):is(pl(z,x),pl(z,y))
z@[u:complex][i:is(x,y)][j:is(z,u)]
ispl12:=tris(cx,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
y@satz209:=isrecx12(pl"r"(re(x),re(y)),pl"r"(re(y),re(x)),pl"r"(im(x),im(y)),pl"r"(im(y),im(x)),compl(re(x),re(y)),compl(im(x),im(y))):is(pl(x,y),pl(y,x))
compl:=satz209:is(pl(x,y),pl(y,x))
x@satz210:=tr3is(cx,pl(x,0c),pli(pl"r"(re(x),0),pl"r"(im(x),0)),pli(re(x),im(x)),x,plis2a(x,0,0),isrecx12(pl"r"(re(x),0),re(x),pl"r"(im(x),0),im(x),pl02(re(x),0,refis(real,0)),pl02(im(x),0,refis(real,0))),pliis(x)):is(pl(x,0c),x)
satz210a:=symis(cx,pl(x,0c),x,satz210):is(x,pl(x,0c))
satz210b:=tris(cx,pl(0c,x),pl(x,0c),x,compl(0c,x),satz210):is(pl(0c,x),x)
satz210c:=symis(cx,pl(0c,x),x,satz210b):is(x,pl(0c,x))
z@satz211:=tr3is(cx,pl(pl(x,y),z),pli(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(pl"r"(im(x),im(y)),im(z))),pli(pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(im(x),pl"r"(im(y),im(z)))),pl(x,pl(y,z)),plis1a(z,pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(pl"r"(im(x),im(y)),im(z)),pl"r"(im(x),pl"r"(im(y),im(z))),asspl1(re(x),re(y),re(z)),asspl1(im(x),im(y),im(z))),plis2b(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z)))):is(pl(pl(x,y),z),pl(x,pl(y,z)))
asspl1:=satz211:is(pl(pl(x,y),z),pl(x,pl(y,z)))
asspl2:=symis(cx,pl(pl(x,y),z),pl(x,pl(y,z)),asspl1):is(pl(x,pl(y,z)),pl(pl(x,y),z))
y@[u:complex][i:is(pl(y,u),x)]
+2212
t1:=tris(real,pl"r"(re(y),re(u)),re(pl(y,u)),re(x),isre(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),iscere(pl(y,u),x,i)):is"r"(pl"r"(re(y),re(u)),re(x))
t2:=tris(real,pl"r"(im(y),im(u)),im(pl(y,u)),im(x),isim(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),isceim(pl(y,u),x,i)):is"r"(pl"r"(im(y),im(u)),im(x))
t3:=satz187d(re(x),re(y),re(u),t1):is"r"(re(u),mn(re(x),re(y)))
t4:=satz187d(im(x),im(y),im(u),t2):is"r"(im(u),mn(im(x),im(y)))
-2212
satz212a:=tris(cx,u,pli(re(u),im(u)),pli(mn(re(x),re(y)),mn(im(x),im(y))),ispli(u),isrecx12(re(u),mn(re(x),re(y)),im(u),mn(im(x),im(y)),t3".2212",t4".2212")):is(u,pli(mn(re(x),re(y)),mn(im(x),im(y))))
y@satz212b:=tr3is(cx,pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),pli(pl"r"(re(y),mn(re(x),re(y))),pl"r"(im(y),mn(im(x),im(y)))),pli(re(x),im(x)),x,plis2a(y,mn(re(x),re(y)),mn(im(x),im(y))),isrecx12(pl"r"(re(y),mn(re(x),re(y))),re(x),pl"r"(im(y),mn(im(x),im(y))),im(x),satz187a(re(x),re(y)),satz187a(im(x),im(y))),pliis(x)):is(pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),x)
satz212c:=somei(cx,[t:cx]is(pl(y,t),x),pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212b):some([t:complex]is(pl(y,t),x))
satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212a(t,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
%satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
mn:=pli(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))):complex
d@mnis12a:=isrecx12(mn"r"(re(pli(a,b)),re(pli(c,d))),mn"r"(a,c),mn"r"(im(pli(a,b)),im(pli(c,d))),mn"r"(b,d),ismn12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ismn12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)))
mnis12b:=symis(cx,mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)),mnis12a):is(pli(mn"r"(a,c),mn"r"(b,d)),mn(pli(a,b),pli(c,d)))
x@[r:real][s:real]
mnis1a:=isrecx12(mn"r"(re(pli(r,s)),re(x)),mn"r"(r,re(x)),mn"r"(im(pli(r,s)),im(x)),mn"r"(s,im(x)),ismn1(re(pli(r,s)),r,re(x),reis(r,s)),ismn1(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))))
mnis1b:=symis(cx,mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mnis1a):is(pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mn(pli(r,s),x))
mnis2a:=isrecx12(mn"r"(re(x),re(pli(r,s))),mn"r"(re(x),r),mn"r"(im(x),im(pli(r,s))),mn"r"(im(x),s),ismn2(re(pli(r,s)),r,re(x),reis(r,s)),ismn2(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)))
mnis2b:=symis(cx,mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)),mnis2a):is(pli(mn"r"(re(x),r),mn"r"(im(x),s)),mn(x,pli(r,s)))
z@[i:is(x,y)]
ismn1:=isf(cx,cx,[t:cx]mn(t,z),x,y,i):is(mn(x,z),mn(y,z))
ismn2:=isf(cx,cx,[t:cx]mn(z,t),x,y,i):is(mn(z,x),mn(z,y))
z@[u:complex][i:is(x,y)][j:is(z,u)]
ismn12:=tris(cx,mn(x,z),mn(y,z),mn(y,u),ismn1(x,y,z,i),ismn2(z,u,y,j)):is(mn(x,z),mn(y,u))
y@[u:complex][i:is(pl(y,u),x)]
satz212d:=satz212a(u,i):is(u,mn(x,y))
satz212e:=symis(cx,u,mn(x,y),satz212d):is(mn(x,y),u)
u@[i:is(pl(u,y),x)]
satz212f:=satz212d(tris(cx,pl(y,u),pl(u,y),x,compl(y,u),i)):is(u,mn(x,y))
satz212g:=symis(cx,u,mn(x,y),satz212f):is(mn(x,y),u)
y@satz212h:=satz212b:is(pl(y,mn(x,y)),x)
[i:is(mn(x,y),0c)]
+2213
t1:=tr3is(real,mn"r"(re(x),re(y)),re(mn(x,y)),re(0c),0,isre(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),iscere(mn(x,y),0c,i),reis(0,0)):is"r"(mn"r"(re(x),re(y)),0)
t2:=tr3is(real,mn"r"(im(x),im(y)),im(mn(x,y)),im(0c),0,isim(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),isceim(mn(x,y),0c,i),imis(0,0)):is"r"(mn"r"(im(x),im(y)),0)
t3:=satz182b(re(x),re(y),t1):is"r"(re(x),re(y))
t4:=satz182b(im(x),im(y),t2):is"r"(im(x),im(y))
-2213
satz213a:=tr3is(cx,x,pli(re(x),im(x)),pli(re(y),im(y)),y,ispli(x),isrecx12(re(x),re(y),im(x),im(y),t3".2213",t4".2213"),pliis(y)):is(x,y)
y@[i:is(x,y)]
+*2213
i@t5:=satz182e(re(x),re(y),iscere(x,y,i)):is"r"(mn"r"(re(x),re(y)),0)
t6:=satz182e(im(x),im(y),isceim(x,y,i)):is"r"(mn"r"(im(x),im(y)),0)
-2213
i@satz213b:=isrecx12(mn"r"(re(x),re(y)),0,mn"r"(im(x),im(y)),0,t5".2213",t6".2213"):is(mn(x,y),0c)
x@m0:=mn(0c,x):complex
satz214:=isrecx12(mn"r"(re(0c),re(x)),m0"r"(re(x)),mn"r"(im(0c),im(x)),m0"r"(im(x)),pl01(re(0c),m0"r"(re(x)),reis(0,0)),pl01(im(0c),m0"r"(im(x)),imis(0,0))):is(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))))
satz214a:=symis(cx,m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214):is(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x))
b@m0isa:=tris(cx,m0(pli(a,b)),pli(m0"r"(re(pli(a,b))),m0"r"(im(pli(a,b)))),pli(m0"r"(a),m0"r"(b)),satz214(pli(a,b)),isrecx12(m0"r"(re(pli(a,b))),m0"r"(a),m0"r"(im(pli(a,b))),m0"r"(b),ism0(re(pli(a,b)),a,reis(a,b)),ism0(im(pli(a,b)),b,imis(a,b)))):is(m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)))
m0isb:=symis(cx,m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)),m0isa):is(pli(m0"r"(a),m0"r"(b)),m0(pli(a,b)))
y@[i:is(x,y)]
ism0:=isf(cx,cx,[t:cx]m0(t),x,y,i):is(m0(x),m0(y))
x@satz215:=tr4is(cx,m0(m0(x)),m0(pli(m0"r"(re(x)),m0"r"(im(x)))),pli(m0"r"(m0"r"(re(x))),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,ism0(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214),m0isa(m0"r"(re(x)),m0"r"(im(x))),isrecx12(m0"r"(m0"r"(re(x))),re(x),m0"r"(m0"r"(im(x))),im(x),satz177(re(x)),satz177(im(x))),pliis(x)):is(m0(m0(x)),x)
satz215a:=symis(cx,m0(m0(x)),x,satz215):is(x,m0(m0(x)))
y@[i:is(x,m0(y))]
satz215b:=tris(cx,m0(x),m0(m0(y)),y,ism0(x,m0(y),i),satz215(y)):is(m0(x),y)
satz215c:=symis(cx,m0(x),y,satz215b):is(y,m0(x))
y@[i:is(m0(x),y)]
satz215d:=satz215c(y,x,symis(cx,m0(x),y,i)):is(x,m0(y))
satz215e:=symis(cx,x,m0(y),satz215d):is(m0(y),x)
x@satz216:=tr3is(cx,pl(x,m0(x)),pl(x,pli(m0"r"(re(x)),m0"r"(im(x)))),pli(pl"r"(re(x),m0"r"(re(x))),pl"r"(im(x),m0"r"(im(x)))),0c,ispl2(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),x,satz214(x)),plis2a(x,m0"r"(re(x)),m0"r"(im(x))),isrecx12(pl"r"(re(x),m0"r"(re(x))),0,pl"r"(im(x),m0"r"(im(x))),0,satz179(re(x)),satz179(im(x)))):is(pl(x,m0(x)),0c)
+2216
anders:=satz212h(0c,x):is(pl(x,m0(x)),0c)
-2216
satz216a:=tris(cx,pl(m0(x),x),pl(x,m0(x)),0c,compl(m0(x),x),satz216):is(pl(m0(x),x),0c)
y@satz217:=tr4is(cx,m0(pl(x,y)),pli(m0"r"(pl"r"(re(x),re(y))),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(m0"r"(re(x)),m0"r"(re(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(pli(m0"r"(re(x)),m0"r"(im(x))),pli(m0"r"(re(y)),m0"r"(im(y)))),pl(m0(x),m0(y)),m0isa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(m0"r"(pl"r"(re(x),re(y))),pl"r"(m0"r"(re(x)),m0"r"(re(y))),m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),satz180(re(x),re(y)),satz180(im(x),im(y))),plis12b(m0"r"(re(x)),m0"r"(im(x)),m0"r"(re(y)),m0"r"(im(y))),ispl12(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),satz214a(x),satz214a(y))):is(m0(pl(x,y)),pl(m0(x),m0(y)))
satz217a:=symis(cx,m0(pl(x,y)),pl(m0(x),m0(y)),satz217):is(pl(m0(x),m0(y)),m0(pl(x,y)))
satz218:=tris(cx,mn(x,y),pl(x,pli(m0"r"(re(y)),m0"r"(im(y)))),pl(x,m0(y)),plis2b(x,m0"r"(re(y)),m0"r"(im(y))),ispl2(pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),x,satz214a(y))):is(mn(x,y),pl(x,m0(y)))
satz218a:=symis(cx,mn(x,y),pl(x,m0(y)),satz218):is(pl(x,m0(y)),mn(x,y))
+2219
t1:=tr3is(cx,m0(mn(x,y)),m0(pl(x,m0(y))),pl(m0(x),m0(m0(y))),pl(m0(x),y),ism0(mn(x,y),pl(x,m0(y)),satz218),satz217(x,m0(y)),ispl2(m0(m0(y)),y,m0(x),satz215(y))):is(m0(mn(x,y)),pl(m0(x),y))
-2219
satz219:=tr3is(cx,m0(mn(x,y)),pl(m0(x),y),pl(y,m0(x)),mn(y,x),t1".2219",compl(m0(x),y),satz218a(y,x)):is(m0(mn(x,y)),mn(y,x))
satz219a:=symis(cx,m0(mn(y,x)),mn(x,y),satz219(y,x)):is(mn(x,y),m0(mn(y,x)))
ts:=pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))):complex
rets:=mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))):real
imts:=pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))):real
+v3
d@t1:=ismn12"r"(ts"r"(re(pli(a,b)),re(pli(c,d))),ts"r"(a,c),ts"r"(im(pli(a,b)),im(pli(c,d))),ts"r"(b,d),ists12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ists12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is"r"(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)))
t2:=ispl12"r"(ts"r"(re(pli(a,b)),im(pli(c,d))),ts"r"(a,d),ts"r"(im(pli(a,b)),re(pli(c,d))),ts"r"(b,c),ists12(re(pli(a,b)),a,im(pli(c,d)),d,reis(a,b),imis(c,d)),ists12(im(pli(a,b)),b,re(pli(c,d)),c,imis(a,b),reis(c,d))):is"r"(imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)))
-v3
d@tsis12a:=isrecx12(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)),imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)),t1".v3",t2".v3"):is(ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))))
tsis12b:=symis(cx,ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),tsis12a):is(pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),ts(pli(a,b),pli(c,d)))
x@[r:real][s:real]
+*v3
s@t3:=ismn12"r"(ts"r"(re(pli(r,s)),re(x)),ts"r"(r,re(x)),ts"r"(im(pli(r,s)),im(x)),ts"r"(s,im(x)),ists1(re(pli(r,s)),r,re(x),reis(r,s)),ists1(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))))
t4:=ispl12"r"(ts"r"(re(pli(r,s)),im(x)),ts"r"(r,im(x)),ts"r"(im(pli(r,s)),re(x)),ts"r"(s,re(x)),ists1(re(pli(r,s)),r,im(x),reis(r,s)),ists1(im(pli(r,s)),s,re(x),imis(r,s))):is"r"(imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))))
-v3
s@tsis1a:=isrecx12(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))),t3".v3",t4".v3"):is(ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))))
tsis1b:=symis(cx,ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),tsis1a):is(pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),ts(pli(r,s),x))
+*v3
s@t5:=ismn12"r"(ts"r"(re(x),re(pli(r,s))),ts"r"(re(x),r),ts"r"(im(x),im(pli(r,s))),ts"r"(im(x),s),ists2(re(pli(r,s)),r,re(x),reis(r,s)),ists2(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)))
t6:=ispl12"r"(ts"r"(re(x),im(pli(r,s))),ts"r"(re(x),s),ts"r"(im(x),re(pli(r,s))),ts"r"(im(x),r),ists2(im(pli(r,s)),s,re(x),imis(r,s)),ists2(re(pli(r,s)),r,im(x),reis(r,s))):is"r"(imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)))
-v3
s@tsis2a:=isrecx12(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)),t5".v3",t6".v3"):is(ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))))
tsis2b:=symis(cx,ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),tsis2a):is(pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),ts(x,pli(r,s)))
z@[i:is(x,y)]
ists1:=isf(cx,cx,[t:cx]ts(t,z),x,y,i):is(ts(x,z),ts(y,z))
ists2:=isf(cx,cx,[t:cx]ts(z,t),x,y,i):is(ts(z,x),ts(z,y))
z@[u:complex][i:is(x,y)][j:is(z,u)]
ists12:=tris(cx,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
+3220
y@t1:=ismn12"r"(ts"r"(re(x),re(y)),ts"r"(re(y),re(x)),ts"r"(im(x),im(y)),ts"r"(im(y),im(x)),comts(re(x),re(y)),comts(im(x),im(y))):is"r"(rets(x,y),rets(y,x))
t2:=tris(real,imts(x,y),pl"r"(ts"r"(im(x),re(y)),ts"r"(re(x),im(y))),imts(y,x),compl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(ts"r"(im(x),re(y)),ts"r"(re(y),im(x)),ts"r"(re(x),im(y)),ts"r"(im(y),re(x)),comts(im(x),re(y)),comts(re(x),im(y)))):is"r"(imts(x,y),imts(y,x))
-3220
y@satz220:=isrecx12(rets(x,y),rets(y,x),imts(x,y),imts(y,x),t1".3220",t2".3220"):is(ts(x,y),ts(y,x))
comts:=satz220:is(ts(x,y),ts(y,x))
x@[i:is(x,0c)]
lemma1:=tris(real,re(x),re(0c),0,iscere(x,0c,i),reis(0,0)):is"r"(re(x),0)
lemma2:=tris(real,im(x),im(0c),0,isceim(x,0c,i),imis(0,0)):is"r"(im(x),0)
x@mod2:=pl"r"(ts"r"(re(x),re(x)),ts"r"(im(x),im(x))):real
i@lemma3:=tris(real,mod2,pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),0,ts01(re(x),re(x),lemma1),ts01(im(x),im(x),lemma2)),pl01(0,0,refis(real,0))):is"r"(mod2(x),0)
x@[n:nis(x,0c)]
+*v3
x@re2:=ts"r"(re(x),re(x)):real
im2:=ts"r"(im(x),im(x)):real
n@[i:is"r"(re(x),0)]
t7:=th3"l.imp"(is"r"(im(x),0),is(x,0c),n,[t:is"r"(im(x),0)]tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,i,t))):nis"r"(im(x),0)
t8:=ispos(im2,mod2,symis(real,mod2,im2,pl01(re2,im2,ts01(re(x),re(x),i))),possq(im(x),t7)):pos(mod2)
n@[o:nis"r"(re(x),0)][i:is"r"(im(x),0)]
t9:=ispos(re2,mod2,symis(real,mod2,re2,pl02(re2,im2,ts01(im(x),im(x),i))),possq(re(x),o)):pos(mod2)
o@[p:nis"r"(im(x),0)]
t10:=pospl(re2,im2,possq(re(x),o),possq(im(x),p)):pos(mod2)
o@t11:=th1"l.imp"(is"r"(im(x),0),pos(mod2),[t:is"r"(im(x),0)]t9(t),[t:nis"r"(im(x),0)]t10(t)):pos(mod2)
-v3
n@lemma4:=th1"l.imp"(is"r"(re(x),0),pos(mod2),[t:is"r"(re(x),0)]t8".v3"(t),[t:nis"r"(re(x),0)]t11".v3"(t)):pos(mod2(x))
x@lemma5:=th1"l.imp"(is(x,0c),not(neg(mod2)),[t:is(x,0c)]0notn(mod2,lemma3(t)),[t:nis(x,0c)]pnotn(mod2,lemma4(t))):not(neg(mod2(x)))
y@[i:is(x,0c)]
+3221
t1:=lemma1(x,i):is"r"(re(x),0)
t2:=lemma2(x,i):is"r"(im(x),0)
t3:=tris(real,rets(x,y),mn"r"(0,0),0,ismn12"r"(ts"r"(re(x),re(y)),0,ts"r"(im(x),im(y)),0,ts01(re(x),re(y),t1),ts01(im(x),im(y),t2)),satz187c(0,0,0,pl02(0,0,refis(real,0)))):is"r"(rets(x,y),0)
t4:=tris(real,imts(x,y),pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),im(y)),0,ts"r"(im(x),re(y)),0,ts01(re(x),im(y),t1),ts01(im(x),re(y),t2)),pl02(0,0,refis(real,0))):is"r"(imts(x,y),0)
-3221
satz221a:=isrecx12(rets(x,y),0,imts(x,y),0,t3".3221",t4".3221"):is(ts(x,y),0c)
y@[i:is(y,0c)]
satz221b:=tris(cx,ts(x,y),ts(y,x),0c,comts(x,y),satz221a(y,x,i)):is(ts(x,y),0c)
y@[i:is(ts(x,y),0c)]
+*3221
i@[n:nis(y,0c)]
t5:=lemma4(y,n):pos(mod2(y))
t6:=tris1(real,rets(x,y),0,re(ts(x,y)),reis(rets(x,y),imts(x,y)),lemma1(ts(x,y),i)):is"r"(rets(x,y),0)
t7:=tris1(real,imts(x,y),0,im(ts(x,y)),imis(rets(x,y),imts(x,y)),lemma2(ts(x,y),i)):is"r"(imts(x,y),0)
t8:=tris(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(0,0),0,ispl12"r"(ts"r"(rets(x,y),re(y)),0,ts"r"(imts(x,y),im(y)),0,ts01(rets(x,y),re(y),t6),ts01(imts(x,y),im(y),t7)),pl02(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),0)
y@ii1r:=ts"r"(ts"r"(im(x),im(y)),re(y)):real
i1ir:=ts"r"(im(x),ts"r"(im(y),re(y))):real
ir1i:=ts"r"(ts"r"(im(x),re(y)),im(y)):real
i1ri:=ts"r"(im(x),ts"r"(re(y),im(y))):real
rr1r:=ts"r"(ts"r"(re(x),re(y)),re(y)):real
r1rr:=ts"r"(re(x),ts"r"(re(y),re(y))):real
ri1r:=ts"r"(ts"r"(re(x),im(y)),re(y)):real
r1ir:=ts"r"(re(x),ts"r"(im(y),re(y))):real
ri1i:=ts"r"(ts"r"(re(x),im(y)),im(y)):real
r1ii:=ts"r"(re(x),ts"r"(im(y),im(y))):real
n@t9:=tris(real,ii1r,i1ir,i1ri,assts1(im(x),im(y),re(y)),ists2"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),im(x),comts"r"(im(y),re(y)))):is"r"(ii1r,i1ri)
t10:=tris(real,ts"r"(rets(x,y),re(y)),mn"r"(rr1r,ii1r),mn"r"(r1rr,i1ri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(y)),ismn12"r"(rr1r,r1rr,ii1r,i1ri,assts1(re(x),re(y),re(y)),t9)):is"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri))
t11:=tr3is(real,ts"r"(imts(x,y),im(y)),pl"r"(ri1i,ir1i),pl"r"(r1ii,i1ri),pl"r"(i1ri,r1ii),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(y)),ispl12"r"(ri1i,r1ii,ir1i,i1ri,assts1(re(x),im(y),im(y)),assts1(im(x),re(y),im(y))),compl"r"(r1ii,i1ri)):is"r"(ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii))
t12:=tr4is(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(mn"r"(r1rr,i1ri),pl"r"(i1ri,r1ii)),pl"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1ii),pl"r"(r1rr,r1ii),ts"r"(re(x),mod2(y)),ispl12"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri),ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii),t10,t11),asspl2"r"(mn"r"(r1rr,i1ri),i1ri,r1ii),ispl1"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1rr,r1ii,plmn(r1rr,i1ri)),distpt2(re(x),ts"r"(re(y),re(y)),ts"r"(im(y),im(y)))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),ts"r"(re(x),mod2(y)))
t13:=tris1(real,ts"r"(re(x),mod2(y)),0,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),t12,t8):is"r"(ts"r"(re(x),mod2(y)),0)
t14:=ore1(is"r"(re(x),0),is"r"(mod2(y),0),satz192c(re(x),mod2(y),t13),pnot0(mod2(y),t5)):is"r"(re(x),0)
t15:=tris1(real,ts"r"(im(x),im(y)),0,ts"r"(re(x),re(y)),satz182b(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),t6),ts01(re(x),re(y),t14)):is"r"(ts"r"(im(x),im(y)),0)
t16:=tris1(real,ts"r"(im(x),re(y)),0,imts(x,y),pl01(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),ts01(re(x),im(y),t14)),t7):is"r"(ts"r"(im(x),re(y)),0)
[j:is"r"(re(y),0)]
t17:=t7"c.v3"(y,n,j):nis"r"(im(y),0)
t18:=ore1(is"r"(im(x),0),is"r"(im(y),0),satz192c(im(x),im(y),t15),t17):is"r"(im(x),0)
n@[o:nis"r"(re(y),0)]
t19:=ore1(is"r"(im(x),0),is"r"(re(y),0),satz192c(im(x),re(y),t16),o):is"r"(im(x),0)
n@t20:=th1"l.imp"(is"r"(re(y),0),is"r"(im(x),0),[t:is"r"(re(y),0)]t18(t),[t:nis"r"(re(y),0)]t19(t)):is"r"(im(x),0)
t21:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t14,t20)):is(x,0c)
-3221
i@satz221c:=th2"l.or"(is(x,0c),is(y,0c),[t:nis(y,0c)]t21".3221"(t)):or(is(x,0c),is(y,0c))
y@[n:nis(x,0c)][o:nis(y,0c)]
satz221d:=th3"l.imp"(is(ts(x,y),0c),or(is(x,0c),is(y,0c)),th3"l.or"(is(x,0c),is(y,0c),n,o),[t:is(ts(x,y),0c)]satz221c(t)):nis(ts(x,y),0c)
+3222
x@t1:=tris(real,mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),mn"r"(re(x),0),re(x),ismn12"r"(ts"r"(re(x),1rl),re(x),ts"r"(im(x),0),0,satz195(re(x)),ts02(im(x),0,refis(real,0))),pl02(re(x),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x))
t2:=tris(real,pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),pl"r"(0,im(x)),im(x),ispl12"r"(ts"r"(re(x),0),0,ts"r"(im(x),1rl),im(x),ts02(re(x),0,refis(real,0)),satz195(im(x))),pl01(0,im(x),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x))
-3222
x@satz222:=tr3is(cx,ts(x,1c),pli(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl))),pli(re(x),im(x)),x,tsis2a(x,1rl,0),isrecx12(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x),t1".3222",t2".3222"),pliis(x)):is(ts(x,1c),x)
satz222a:=symis(cx,ts(x,1c),x,satz222):is(x,ts(x,1c))
satz222b:=tris(cx,ts(1c,x),ts(x,1c),x,comts(1c,x),satz222):is(ts(1c,x),x)
satz222c:=symis(cx,ts(1c,x),x,satz222b):is(x,ts(1c,x))
+3223
t1:=tris(real,mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),mn"r"(m0"r"(re(x)),0),m0"r"(re(x)),ismn12"r"(ts"r"(re(x),m0"r"(1rl)),m0"r"(re(x)),ts"r"(im(x),m0"r"(0)),0,tris(real,ts"r"(re(x),m0"r"(1rl)),m0"r"(ts"r"(re(x),1rl)),m0"r"(re(x)),satz197b(re(x),1rl),ism0"r"(ts"r"(re(x),1rl),re(x),satz195(re(x)))),ts02(im(x),m0"r"(0),satz176b(0,refis(real,0)))),pl02(m0"r"(re(x)),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)))
t2:=tris(real,pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),pl"r"(0,m0"r"(im(x))),m0"r"(im(x)),ispl12"r"(ts"r"(re(x),m0"r"(0)),0,ts"r"(im(x),m0"r"(1rl)),m0"r"(im(x)),ts02(re(x),m0"r"(0),satz176b(0,refis(real,0))),tris(real,ts"r"(im(x),m0"r"(1rl)),m0"r"(ts"r"(im(x),1rl)),m0"r"(im(x)),satz197b(im(x),1rl),ism0"r"(ts"r"(im(x),1rl),im(x),satz195(im(x))))),pl01(0,m0"r"(im(x)),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)))
-3223
satz223:=tr4is(cx,ts(x,m0(1c)),ts(x,pli(m0"r"(1rl),m0"r"(0))),pli(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl)))),pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),ists2(m0(1c),pli(m0"r"(1rl),m0"r"(0)),x,m0isa(1rl,0)),tsis2a(x,m0"r"(1rl),m0"r"(0)),isrecx12(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)),t1".3223",t2".3223"),satz214a(x)):is(ts(x,m0(1c)),m0(x))
satz223a:=symis(cx,ts(x,m0(1c)),m0(x),satz223):is(m0(x),ts(x,m0(1c)))
satz223b:=tris(cx,ts(m0(1c),x),ts(x,m0(1c)),m0(x),comts(m0(1c),x),satz223):is(ts(m0(1c),x),m0(x))
satz223c:=symis(cx,ts(m0(1c),x),m0(x),satz223b):is(m0(x),ts(m0(1c),x))
+3224
y@rxry:=ts"r"(re(x),re(y)):real
ixiy:=ts"r"(im(x),im(y)):real
rxiy:=ts"r"(re(x),im(y)):real
ixry:=ts"r"(im(x),re(y)):real
t1:=tr4is(real,mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),mn"r"(m0"r"(rxry),m0"r"(ixiy)),pl"r"(m0"r"(rxry),ixiy),mn"r"(ixiy,rxry),m0"r"(mn"r"(rxry,ixiy)),ismn12"r"(ts"r"(m0"r"(re(x)),re(y)),m0"r"(rxry),ts"r"(m0"r"(im(x)),im(y)),m0"r"(ixiy),satz197a(re(x),re(y)),satz197a(im(x),im(y))),ispl2"r"(m0"r"(m0"r"(ixiy)),ixiy,m0"r"(rxry),satz177(ixiy)),compl"r"(m0"r"(rxry),ixiy),satz181a(ixiy,rxry)):is"r"(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(rxry,ixiy)))
t2:=tris(real,pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),mn"r"(m0"r"(rxiy),ixry),m0"r"(pl"r"(rxiy,ixry)),ispl12"r"(ts"r"(m0"r"(re(x)),im(y)),m0"r"(rxiy),ts"r"(m0"r"(im(x)),re(y)),m0"r"(ixry),satz197a(re(x),im(y)),satz197a(im(x),re(y))),satz180a(rxiy,ixry)):is"r"(pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(rxiy,ixry)))
-3224
y@satz224a:=tr4is(cx,ts(m0(x),y),ts(pli(m0"r"(re(x)),m0"r"(im(x))),y),pli(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y)))),pli(m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))),m0(ts(x,y)),ists1(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),y,satz214(x)),tsis1a(y,m0"r"(re(x)),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))),t1".3224",t2".3224"),m0isb(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))):is(ts(m0(x),y),m0(ts(x,y)))
satz224b:=tr3is(cx,ts(x,m0(y)),ts(m0(y),x),m0(ts(y,x)),m0(ts(x,y)),comts(x,m0(y)),satz224a(y,x),ism0(ts(y,x),ts(x,y),comts(y,x))):is(ts(x,m0(y)),m0(ts(x,y)))
satz224c:=tris2(cx,ts(m0(x),y),ts(x,m0(y)),m0(ts(x,y)),satz224a,satz224b):is(ts(m0(x),y),ts(x,m0(y)))
satz224d:=symis(cx,ts(m0(x),y),ts(x,m0(y)),satz224c):is(ts(x,m0(y)),ts(m0(x),y))
satz224e:=symis(cx,ts(m0(x),y),m0(ts(x,y)),satz224a):is(m0(ts(x,y)),ts(m0(x),y))
satz224f:=symis(cx,ts(x,m0(y)),m0(ts(x,y)),satz224b):is(m0(ts(x,y)),ts(x,m0(y)))
satz225:=tris(cx,ts(m0(x),m0(y)),ts(x,m0(m0(y))),ts(x,y),satz224c(x,m0(y)),ists2(m0(m0(y)),y,x,satz215(y))):is(ts(m0(x),m0(y)),ts(x,y))
satz225a:=symis(cx,ts(m0(x),m0(y)),ts(x,y),satz225):is(ts(x,y),ts(m0(x),m0(y)))
+3226
z@rrr:=ts"r"(ts"r"(re(x),re(y)),re(z)):real
iir:=ts"r"(ts"r"(im(x),im(y)),re(z)):real
rii:=ts"r"(ts"r"(re(x),im(y)),im(z)):real
iri:=ts"r"(ts"r"(im(x),re(y)),im(z)):real
rri:=ts"r"(ts"r"(re(x),re(y)),im(z)):real
iii:=ts"r"(ts"r"(im(x),im(y)),im(z)):real
rir:=ts"r"(ts"r"(re(x),im(y)),re(z)):real
irr:=ts"r"(ts"r"(im(x),re(y)),re(z)):real
t1:=tr3is(real,mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(mn"r"(rrr,iir),pl"r"(rii,iri)),pl"r"(rrr,pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri)))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),ismn12"r"(ts"r"(rets(x,y),re(z)),mn"r"(rrr,iir),ts"r"(imts(x,y),im(z)),pl"r"(rii,iri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(z))),asspl1"r"(rrr,m0"r"(iir),m0"r"(pl"r"(rii,iri))),ispl2"r"(pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri))),m0"r"(pl"r"(iir,pl"r"(rii,iri))),rrr,satz180a(iir,pl"r"(rii,iri)))):is"r"(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))))
t2:=tr3is(real,pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),pl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),pl"r"(pl"r"(rir,irr),mn"r"(rri,iii)),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),ispl12"r"(ts"r"(rets(x,y),im(z)),mn"r"(rri,iii),ts"r"(imts(x,y),re(z)),pl"r"(rir,irr),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),im(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),re(z))),compl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),asspl2"r"(pl"r"(rir,irr),rri,m0"r"(iii))):is"r"(pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii))
t3:=tris(cx,ts(ts(x,y),z),pli(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z)))),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),tsis1a(z,rets(x,y),imts(x,y)),isrecx12(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),t1,t2)):is(ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)))
c@t4:=tris(real,ts"r"(ts"r"(a,b),c),ts"r"(a,ts"r"(b,c)),ts"r"(ts"r"(b,c),a),assts1(a,b,c),comts"r"(a,ts"r"(b,c))):is"r"(ts"r"(ts"r"(a,b),c),ts"r"(ts"r"(b,c),a))
t5:=tris(real,pl"r"(pl"r"(a,b),c),pl"r"(c,pl"r"(a,b)),pl"r"(pl"r"(c,a),b),compl"r"(pl"r"(a,b),c),asspl2"r"(c,a,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(c,a),b))
t6:=tris(real,pl"r"(a,pl"r"(b,c)),pl"r"(pl"r"(b,c),a),pl"r"(b,pl"r"(c,a)),compl"r"(a,pl"r"(b,c)),asspl1"r"(b,c,a)):is"r"(pl"r"(a,pl"r"(b,c)),pl"r"(b,pl"r"(c,a)))
z@rrr1:=rrr(y,z,x):real
iir1:=iir(y,z,x):real
rii1:=rii(y,z,x):real
iri1:=iri(y,z,x):real
rri1:=rri(y,z,x):real
iii1:=iii(y,z,x):real
rir1:=rir(y,z,x):real
irr1:=irr(y,z,x):real
t7:=tris(real,pl"r"(iir,pl"r"(rii,iri)),pl"r"(rii,pl"r"(iri,iir)),pl"r"(iir1,pl"r"(rii1,iri1)),t6(iir,rii,iri),ispl12"r"(rii,iir1,pl"r"(iri,iir),pl"r"(rii1,iri1),t4(re(x),im(y),im(z)),ispl12"r"(iri,rii1,iir,iri1,t4(im(x),re(y),im(z)),t4(im(x),im(y),re(z))))):is"r"(pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)))
t8:=tris(real,pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rri,rir),irr),pl"r"(pl"r"(rir1,irr1),rri1),t5(rir,irr,rri),ispl12"r"(pl"r"(rri,rir),pl"r"(rir1,irr1),irr,rri1,ispl12"r"(rri,rir1,rir,irr1,t4(re(x),re(y),im(z)),t4(re(x),im(y),re(z))),t4(im(x),re(y),re(z)))):is"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1))
t9:=ismn12"r"(rrr,rrr1,pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)),t4(re(x),re(y),re(z)),t7):is"r"(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))))
t10:=ismn12"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1),iii,iii1,t8,t4(im(x),im(y),im(z))):is"r"(mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1))
t11:=tris(cx,ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t3,isrecx12(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1),t9,t10)):is(ts(ts(x,y),z),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
t12:=tris(cx,ts(x,ts(y,z)),ts(ts(y,z),x),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),comts(x,ts(y,z)),t3(y,z,x)):is(ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
t13:=tris2(cx,ts(ts(x,y),z),ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t11,t12):is(ts(ts(x,y),z),ts(x,ts(y,z)))
-3226
z@satz226:=t13".3226":is(ts(ts(x,y),z),ts(x,ts(y,z)))
assts1:=satz226:is(ts(ts(x,y),z),ts(x,ts(y,z)))
assts2:=symis(cx,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
+3227
c@t1:=tr3is(real,pl"r"(pl"r"(a,b),c),pl"r"(a,pl"r"(b,c)),pl"r"(a,pl"r"(c,b)),pl"r"(pl"r"(a,c),b),asspl1"r"(a,b,c),ispl2"r"(pl"r"(b,c),pl"r"(c,b),a,compl"r"(b,c)),asspl2"r"(a,c,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b))
d@t2:=tr3is(real,pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(pl"r"(a,b),c),d),pl"r"(pl"r"(pl"r"(a,c),b),d),pl"r"(pl"r"(a,c),pl"r"(b,d)),asspl2"r"(pl"r"(a,b),c,d),ispl1"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b),d,t1),asspl1"r"(pl"r"(a,c),b,d)):is"r"(pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,c),pl"r"(b,d)))
t3:=tris(real,mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,b),pl"r"(m0"r"(c),m0"r"(d))),pl"r"(mn"r"(a,c),mn"r"(b,d)),ispl2"r"(m0"r"(pl"r"(c,d)),pl"r"(m0"r"(c),m0"r"(d)),pl"r"(a,b),satz180(c,d)),t2(a,b,m0"r"(c),m0"r"(d))):is"r"(mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(mn"r"(a,c),mn"r"(b,d)))
z@t4:=tris(real,mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),mn"r"(pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))),pl"r"(rets(x,y),rets(x,z)),ismn12"r"(ts"r"(re(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),ts"r"(im(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z))),disttp2(re(x),re(y),re(z)),disttp2(im(x),im(y),im(z))),t3(ts"r"(re(x),re(y)),ts"r"(re(x),re(z)),ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))):is"r"(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)))
t5:=tris(real,pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))),pl"r"(imts(x,y),imts(x,z)),ispl12"r"(ts"r"(re(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z))),disttp2(re(x),im(y),im(z)),disttp2(im(x),re(y),re(z))),t2(ts"r"(re(x),im(y)),ts"r"(re(x),im(z)),ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))):is"r"(pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)))
t6:=tr3is(cx,ts(x,pl(y,z)),pli(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))))),pli(pl"r"(rets(x,y),rets(x,z)),pl"r"(imts(x,y),imts(x,z))),pl(ts(x,y),ts(x,z)),tsis2a(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z))),isrecx12(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)),t4,t5),plis12b(rets(x,y),imts(x,y),rets(x,z),imts(x,z))):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-3227
satz227:=t6".3227":is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
disttp1:=tr3is(cx,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz227(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
disttp2:=satz227:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
distpt1:=symis(cx,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
distpt2:=symis(cx,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
satz228:=tr4is(cx,ts(x,mn(y,z)),ts(x,pl(y,m0(z))),pl(ts(x,y),ts(x,m0(z))),pl(ts(x,y),m0(ts(x,z))),mn(ts(x,y),ts(x,z)),ists2(mn(y,z),pl(y,m0(z)),x,satz218(y,z)),disttp2(x,y,m0(z)),ispl2(ts(x,m0(z)),m0(ts(x,z)),ts(x,y),satz224b(x,z)),satz218a(ts(x,y),ts(x,z))):is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
disttm1:=tr3is(cx,ts(mn(x,y),z),ts(z,mn(x,y)),mn(ts(z,x),ts(z,y)),mn(ts(x,z),ts(y,z)),comts(mn(x,y),z),satz228(z,x,y),ismn12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(mn(x,y),z),mn(ts(x,z),ts(y,z)))
disttm2:=satz228:is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
distmt1:=symis(cx,ts(mn(x,y),z),mn(ts(x,z),ts(y,z)),disttm1):is(mn(ts(x,z),ts(y,z)),ts(mn(x,y),z))
distmt2:=symis(cx,ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)),disttm2):is(mn(ts(x,y),ts(x,z)),ts(x,mn(y,z)))
y@[n:nis(y,0c)][u1:complex][u2:complex][i:is(ts(y,u1),x)][j:is(ts(y,u2),x)]
+3229
t1:=tris2(cx,ts(y,u1),ts(y,u2),x,i,j):is(ts(y,u1),ts(y,u2))
t2:=tris(cx,ts(y,mn(u1,u2)),mn(ts(y,u1),ts(y,u2)),0c,disttm2(y,u1,u2),satz213b(ts(y,u1),ts(y,u2),t1)):is(ts(y,mn(u1,u2)),0c)
t3:=ore2(is(y,0c),is(mn(u1,u2),0c),satz221c(y,mn(u1,u2),t2),n):is(mn(u1,u2),0c)
-3229
satz229b:=satz213a(u1,u2,t3".3229"):is(u1,u2)
+*3229
n@t4:=pnot0(mod2(y),lemma4(y,n)):nis"r"(mod2(y),0)
u:=ts(pli(ov(re(y),mod2(y),t4),m0"r"(ov(im(y),mod2(y),t4))),x):complex
[v:real]
dd:=ov(v,mod2(y),t4):real
n@t5:=tr3is(real,m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),m0"r"(m0"r"(ts"r"(im(y),dd(im(y))))),ts"r"(im(y),dd(im(y))),dd(ts"r"(im(y),im(y))),ism0"r"(ts"r"(im(y),m0"r"(dd(im(y)))),m0"r"(ts"r"(im(y),dd(im(y)))),satz197b(im(y),dd(im(y)))),satz177(ts"r"(im(y),dd(im(y)))),lemma6(im(y),im(y),mod2(y),t4)):is"r"(m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))))
t6:=tr3is(real,mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(dd(ts"r"(re(y),re(y))),dd(ts"r"(im(y),im(y)))),dd(mod2(y)),1rl,ispl12"r"(ts"r"(re(y),dd(re(y))),dd(ts"r"(re(y),re(y))),m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))),lemma6(re(y),re(y),mod2(y),t4),t5),lemma7(ts"r"(re(y),re(y)),ts"r"(im(y),im(y)),mod2(y),t4),lemma8(mod2(y),t4)):is"r"(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl)
t7:=tris(real,ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(m0"r"(re(y)),dd(im(y))),dd(ts"r"(m0"r"(re(y)),im(y))),satz197d(re(y),dd(im(y))),lemma6(m0"r"(re(y)),im(y),mod2(y),t4)):is"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))))
t8:=tris(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),pl"r"(dd(ts"r"(m0"r"(re(y)),im(y))),dd(ts"r"(im(y),re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),ispl12"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))),ts"r"(im(y),dd(re(y))),dd(ts"r"(im(y),re(y))),t7,lemma6(im(y),re(y),mod2(y),t4)),lemma7(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)),mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))))
t9:=tr3is(real,pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),pl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),mn"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y))),0,ispl1"r"(ts"r"(m0"r"(re(y)),im(y)),m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y)),satz197a(re(y),im(y))),compl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),satz182e(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),comts"r"(im(y),re(y)))):is"r"(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0)
t10:=tr3is(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),dd(0),0,t8,isf(real,real,[t:real]dd(t),pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0,t9),lemma9(mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0)
t11:=tris(cx,ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),pli(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y))))),1c,tsis2a(y,dd(re(y)),m0"r"(dd(im(y)))),isrecx12(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0,t6,t10)):is(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c)
t12:=tr3is(cx,ts(y,u),ts(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),x),ts(1c,x),x,assts2(y,pli(dd(re(y)),m0"r"(dd(im(y)))),x),ists1(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c,x,t11),satz222b(x)):is(ts(y,u),x)
-3229
n@satz229a:=somei(cx,[t:cx]is(ts(y,t),x),u".3229",t12".3229"):some([t:cx]is(ts(y,t),x))
satz229:=onei(cx,[t:cx]is(ts(y,t),x),[t:cx][u:cx][v:is(ts(y,t),x)][w:is(ts(y,u),x)]satz229b(t,u,v,w),satz229a):one([t:cx]is(ts(y,t),x))
ov:=ind(cx,[t:cx]is(ts(y,t),x),satz229):complex
satz229c:=oneax(cx,[t:cx]is(ts(y,t),x),satz229):is(ts(y,ov(x,y,n)),x)
satz229d:=symis(cx,ts(y,ov(x,y,n)),x,satz229c):is(x,ts(y,ov(x,y,n)))
satz229e:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c):is(ts(ov(x,y,n),y),x)
satz229f:=symis(cx,ts(ov(x,y,n),y),x,satz229e):is(x,ts(ov(x,y,n),y))
y@[u:complex][n:nis(y,0c)][i:is(ts(y,u),x)]
satz229g:=satz229b(n,u,ov(x,y,n),i,satz229c(n)):is(u,ov(x,y,n))
satz229h:=symis(cx,u,ov(x,y,n),satz229g):is(ov(x,y,n),u)
n@[i:is(ts(u,y),x)]
satz229j:=satz229g(tris(cx,ts(y,u),ts(u,y),x,comts(y,u),i)):is(u,ov(x,y,n))
satz229k:=symis(cx,u,ov(x,y,n),satz229j):is(ov(x,y,n),u)
z@[i:is(x,y)][n:nis(z,0c)]
isov1:=isf(cx,cx,[t:cx]ov(t,z,n),x,y,i):is(ov(x,z,n),ov(y,z,n))
i@[n:nis(x,0c)][o:nis(y,0c)]
isov2:=satz229h(z,x,ov(z,y,o),n,tris(cx,ts(x,ov(z,y,o)),ts(y,ov(z,y,o)),z,ists1(x,y,ov(z,y,o),i),satz229c(z,y,o))):is(ov(z,x,n),ov(z,y,o))
z@[u:complex][i:is(x,y)][j:is(z,u)][n:nis(z,0c)][o:nis(u,0c)]
isov12:=tris(cx,ov(x,z,n),ov(y,z,n),ov(y,u,o),isov1(x,y,z,i,n),isov2(z,u,y,j,n,o)):is(ov(x,z,n),ov(y,u,o))
y@satz230:=tris(cx,pl(mn(x,y),y),pl(y,mn(x,y)),x,compl(mn(x,y),y),satz212h(x,y)):is(pl(mn(x,y),y),x)
satz231:=satz212e(pl(x,y),y,x,compl(y,x)):is(mn(pl(x,y),y),x)
satz232:=satz212e(x,mn(x,y),y,satz230):is(mn(x,mn(x,y)),y)
+4233
z@t1:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(mn(mn(x,y),z),pl(y,z)),pl(mn(mn(x,y),z),pl(z,y)),pl(pl(mn(mn(x,y),z),z),y),compl(pl(y,z),mn(mn(x,y),z)),ispl2(pl(y,z),pl(z,y),mn(mn(x,y),z),compl(y,z)),asspl2(mn(mn(x,y),z),z,y)):is(pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y))
t2:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y),pl(mn(x,y),y),x,t1,ispl1(pl(mn(mn(x,y),z),z),mn(x,y),y,satz230(mn(x,y),z)),satz230(x,y)):is(pl(pl(y,z),mn(mn(x,y),z)),x)
-4233
z@satz233:=satz212d(x,pl(y,z),mn(mn(x,y),z),t2".4233"):is(mn(mn(x,y),z),mn(x,pl(y,z)))
satz234:=satz212g(pl(x,y),z,pl(x,mn(y,z)),tris(cx,pl(pl(x,mn(y,z)),z),pl(x,pl(mn(y,z),z)),pl(x,y),asspl1(x,mn(y,z),z),ispl2(pl(mn(y,z),z),y,x,satz230(y,z)))):is(mn(pl(x,y),z),pl(x,mn(y,z)))
satz234a:=symis(cx,mn(pl(x,y),z),pl(x,mn(y,z)),satz234):is(pl(x,mn(y,z)),mn(pl(x,y),z))
satz234b:=tr3is(cx,mn(pl(x,y),z),mn(pl(y,x),z),pl(y,mn(x,z)),pl(mn(x,z),y),ismn1(pl(x,y),pl(y,x),z,compl(x,y)),satz234(y,x,z),compl(y,mn(x,z))):is(mn(pl(x,y),z),pl(mn(x,z),y))
satz234c:=symis(cx,mn(pl(x,y),z),pl(mn(x,z),y),satz234b):is(pl(mn(x,z),y),mn(pl(x,y),z))
satz235:=satz212f(x,mn(y,z),pl(mn(x,y),z),tr3is(cx,pl(pl(mn(x,y),z),mn(y,z)),pl(mn(x,y),pl(z,mn(y,z))),pl(mn(x,y),y),x,asspl1(mn(x,y),z,mn(y,z)),ispl2(pl(z,mn(y,z)),y,mn(x,y),satz212h(y,z)),satz230(x,y))):is(pl(mn(x,y),z),mn(x,mn(y,z)))
satz235a:=symis(cx,pl(mn(x,y),z),mn(x,mn(y,z)),satz235):is(mn(x,mn(y,z)),pl(mn(x,y),z))
satz235b:=tris(cx,mn(x,mn(y,z)),pl(mn(x,y),z),mn(pl(x,z),y),satz235a,satz234c(x,z,y)):is(mn(x,mn(y,z)),mn(pl(x,z),y))
satz235c:=tris(cx,mn(x,mn(y,z)),mn(pl(x,z),y),mn(pl(z,x),y),satz235b,ismn1(pl(x,z),pl(z,x),y,compl(x,z))):is(mn(x,mn(y,z)),mn(pl(z,x),y))
satz236:=satz212g(pl(x,z),pl(y,z),mn(x,y),tris(cx,pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y)))):is(mn(pl(x,z),pl(y,z)),mn(x,y))
satz236a:=tris(cx,mn(pl(z,x),pl(z,y)),mn(pl(x,z),pl(y,z)),mn(x,y),ismn12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y)),satz236):is(mn(pl(z,x),pl(z,y)),mn(x,y))
[u:complex]
+4237
t1:=tr3is(cx,pl(mn(z,u),pl(u,y)),pl(pl(mn(z,u),u),y),pl(z,y),pl(y,z),asspl2(mn(z,u),u,y),ispl1(pl(mn(z,u),u),z,y,satz230(z,u)),compl(z,y)):is(pl(mn(z,u),pl(u,y)),pl(y,z))
t2:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(pl(mn(x,y),mn(z,u)),pl(u,y)),pl(mn(x,y),pl(mn(z,u),pl(u,y))),pl(mn(x,y),pl(y,z)),ispl2(pl(y,u),pl(u,y),pl(mn(x,y),mn(z,u)),compl(y,u)),asspl1(mn(x,y),mn(z,u),pl(u,y)),ispl2(pl(mn(z,u),pl(u,y)),pl(y,z),mn(x,y),t1)):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)))
t3:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),t2,asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y))):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(x,z))
-4237
satz237:=satz212f(pl(x,z),pl(y,u),pl(mn(x,y),mn(z,u)),t3".4237"):is(pl(mn(x,y),mn(z,u)),mn(pl(x,z),pl(y,u)))
+4238
t1:=tris(cx,pl(pl(x,u),z),pl(x,pl(u,z)),pl(x,pl(z,u)),asspl1(x,u,z),ispl2(pl(u,z),pl(z,u),x,compl(u,z))):is(pl(pl(x,u),z),pl(x,pl(z,u)))
t2:=tr3is(cx,pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(pl(pl(x,u),z),pl(pl(y,z),u)),mn(pl(x,pl(z,u)),pl(y,pl(z,u))),mn(x,y),satz237(pl(x,u),pl(y,z),z,u),ismn12(pl(pl(x,u),z),pl(x,pl(z,u)),pl(pl(y,z),u),pl(y,pl(z,u)),t1,asspl1(y,z,u)),satz236(x,y,pl(z,u))):is(pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(x,y))
-4238
satz238:=satz212g(mn(x,y),mn(z,u),mn(pl(x,u),pl(y,z)),t2".4238"):is(mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)))
[i:is(mn(x,y),mn(z,u))]
+4239
t1:=tris1(cx,mn(pl(x,u),pl(y,z)),0c,mn(mn(x,y),mn(z,u)),satz238,satz213b(mn(x,y),mn(z,u),i)):is(mn(pl(x,u),pl(y,z)),0c)
-4239
satz239a:=satz213a(pl(x,u),pl(y,z),t1".4239"):is(pl(x,u),pl(y,z))
u@[i:is(pl(x,u),pl(y,z))]
+*4239
i@t2:=tris(cx,mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)),0c,satz238,satz213b(pl(x,u),pl(y,z),i)):is(mn(mn(x,y),mn(z,u)),0c)
-4239
i@satz239b:=satz213a(mn(x,y),mn(z,u),t2".4239"):is(mn(x,y),mn(z,u))
y@[n:nis(y,0c)]
satz240:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c(x,y,n)):is(ts(ov(x,y,n),y),x)
satz241:=satz229h(ts(x,y),y,x,n,comts(y,x)):is(ov(ts(x,y),y,n),x)
y@[n:nis(x,0c)][o:nis(y,0c)]
lemma6:=th3"l.imp"(is(ov(x,y,o),0c),is(x,0c),n,[t:is(ov(x,y,o),0c)]tris1(cx,x,0c,ts(y,ov(x,y,o)),satz229c(x,y,o),satz221b(y,ov(x,y,o),t))):nis(ov(x,y,o),0c)
satz242:=satz229h(x,ov(x,y,o),y,lemma6,satz240(o)):is(ov(x,ov(x,y,o),lemma6),y)
z@[n:nis(y,0c)][o:nis(z,0c)]
+5243
t1:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ov(ov(x,y,n),z,o),ts(y,z)),ts(ov(ov(x,y,n),z,o),ts(z,y)),ts(ts(ov(ov(x,y,n),z,o),z),y),comts(ts(y,z),ov(ov(x,y,n),z,o)),ists2(ts(y,z),ts(z,y),ov(ov(x,y,n),z,o),comts(y,z)),assts2(ov(ov(x,y,n),z,o),z,y)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y))
t2:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y),ts(ov(x,y,n),y),x,t1,ists1(ts(ov(ov(x,y,n),z,o),z),ov(x,y,n),y,satz240(ov(x,y,n),z,o)),satz240(x,y,n)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),x)
-5243
satz243:=satz229g(x,ts(y,z),ov(ov(x,y,n),z,o),satz221d(y,z,n,o),t2".5243"):is(ov(ov(x,y,n),z,o),ov(x,ts(y,z),satz221d(y,z,n,o)))
z@[n:nis(z,0c)]
satz244:=satz229k(ts(x,y),z,ts(x,ov(y,z,n)),n,tris(cx,ts(ts(x,ov(y,z,n)),z),ts(x,ts(ov(y,z,n),z)),ts(x,y),assts1(x,ov(y,z,n),z),ists2(ts(ov(y,z,n),z),y,x,satz240(y,z,n)))):is(ov(ts(x,y),z,n),ts(x,ov(y,z,n)))
satz244a:=symis(cx,ov(ts(x,y),z,n),ts(x,ov(y,z,n)),satz244):is(ts(x,ov(y,z,n)),ov(ts(x,y),z,n))
satz244b:=tr3is(cx,ov(ts(x,y),z,n),ov(ts(y,x),z,n),ts(y,ov(x,z,n)),ts(ov(x,z,n),y),isov1(ts(x,y),ts(y,x),z,comts(x,y),n),satz244(y,x,z,n),comts(y,ov(x,z,n))):is(ov(ts(x,y),z,n),ts(ov(x,z,n),y))
satz244c:=symis(cx,ov(ts(x,y),z,n),ts(ov(x,z,n),y),satz244b):is(ts(ov(x,z,n),y),ov(ts(x,y),z,n))
z@[n:nis(y,0c)][o:nis(z,0c)]
satz245:=satz229j(x,ov(y,z,o),ts(ov(x,y,n),z),lemma6(y,z,n,o),tr3is(cx,ts(ts(ov(x,y,n),z),ov(y,z,o)),ts(ov(x,y,n),ts(z,ov(y,z,o))),ts(ov(x,y,n),y),x,assts1(ov(x,y,n),z,ov(y,z,o)),ists2(ts(z,ov(y,z,o)),y,ov(x,y,n),satz229c(y,z,o)),satz240(x,y,n))):is(ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)))
satz245a:=symis(cx,ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)),satz245):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z))
satz245b:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z),ov(ts(x,z),y,n),satz245a,satz244c(x,z,y,n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n))
satz245c:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n),ov(ts(z,x),y,n),satz245b,isov1(ts(x,z),ts(z,x),y,comts(x,z),n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(z,x),y,n))
satz246:=satz229k(ts(x,z),ts(y,z),ov(x,y,n),satz221d(y,z,n,o),tris(cx,ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n)))):is(ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n))
satz246a:=tris(cx,ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n),isov12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y),satz221d(z,y,o,n),satz221d(y,z,n,o)),satz246):is(ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(x,y,n))
z@[u:complex][n:nis(y,0c)][o:nis(u,0c)]
+5247
t1:=tr3is(cx,ts(ov(z,u,o),ts(u,y)),ts(ts(ov(z,u,o),u),y),ts(z,y),ts(y,z),assts2(ov(z,u,o),u,y),ists1(ts(ov(z,u,o),u),z,y,satz240(z,u,o)),comts(z,y)):is(ts(ov(z,u,o),ts(u,y)),ts(y,z))
t2:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ts(ov(x,y,n),ov(z,u,o)),ts(u,y)),ts(ov(x,y,n),ts(ov(z,u,o),ts(u,y))),ts(ov(x,y,n),ts(y,z)),ists2(ts(y,u),ts(u,y),ts(ov(x,y,n),ov(z,u,o)),comts(y,u)),assts1(ov(x,y,n),ov(z,u,o),ts(u,y)),ists2(ts(ov(z,u,o),ts(u,y)),ts(y,z),ov(x,y,n),t1)):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)))
t3:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),t2,assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n))):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(x,z))
-5247
satz247:=satz229j(ts(x,z),ts(y,u),ts(ov(x,y,n),ov(z,u,o)),satz221d(y,u,n,o),t3".5247"):is(ts(ov(x,y,n),ov(z,u,o)),ov(ts(x,z),ts(y,u),satz221d(y,u,n,o)))
u@[n:nis(y,0c)][o:nis(z,0c)][p:nis(u,0c)]
+5248
t1:=tris(cx,ts(ts(x,u),z),ts(x,ts(u,z)),ts(x,ts(z,u)),assts1(x,u,z),ists2(ts(u,z),ts(z,u),x,comts(u,z))):is(ts(ts(x,u),z),ts(x,ts(z,u)))
t2:=tr3is(cx,ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(ts(ts(x,u),z),ts(ts(y,z),u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p)),ov(ts(x,ts(z,u)),ts(y,ts(z,u)),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),ov(x,y,n),satz247(ts(x,u),ts(y,z),z,u,satz221d(y,z,n,o),p),isov12(ts(ts(x,u),z),ts(x,ts(z,u)),ts(ts(y,z),u),ts(y,ts(z,u)),t1,assts1(y,z,u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),satz246(x,y,ts(z,u),n,satz221d(z,u,o,p))):is(ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(x,y,n))
-5248
satz248:=satz229k(ov(x,y,n),ov(z,u,p),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),lemma6(z,u,o,p),t2".5248"):is(ov(ov(x,y,n),ov(z,u,p),lemma6(z,u,o,p)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)))
x@[n:nis(x,0c)]
satz249:=satz229h(0c,x,0c,n,satz221b(x,0c,refis(cx,0c))):is(ov(0c,x,n),0c)
satz250:=satz229h(x,x,1c,n,satz222(x)):is(ov(x,x,n),1c)
y@[n:nis(y,0c)][i:is(x,y)]
satz251a:=tris(cx,ov(x,y,n),ov(x,x,th2"e.notis"(cx,y,0c,x,n,i)),1c,isov2(y,x,x,symis(cx,x,y,i),n,th2"e.notis"(cx,y,0c,x,n,i)),satz250(x,th2"e.notis"(cx,y,0c,x,n,i))):is(ov(x,y,n),1c)
n@[i:is(ov(x,y,n),1c)]
satz251b:=tr3is(cx,x,ts(y,ov(x,y,n)),ts(y,1c),y,satz229d(x,y,n),ists2(ov(x,y,n),1c,y,i),satz222(y)):is(x,y)
u@[n:nis(y,0c)][o:nis(u,0c)][i:is(ov(x,y,n),ov(z,u,o))]
+5252
[j:is(z,0c)]
t1:=tr3is(cx,ov(x,y,n),ov(z,u,o),ov(0c,u,o),0c,i,isov1(z,0c,u,j,o),satz249(u,o)):is(ov(x,y,n),0c)
t2:=tris(cx,x,ts(y,ov(x,y,n)),0c,satz229d(x,y,n),satz221b(y,ov(x,y,n),t1)):is(x,0c)
t3:=tris2(cx,ts(x,u),ts(y,z),0c,satz221a(x,u,t2),satz221b(y,z,j)):is(ts(x,u),ts(y,z))
i@[p:nis(z,0c)]
t4:=tris1(cx,ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),satz248(x,y,z,u,n,p,o),satz251a(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),i)):is(ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c)
t5:=satz251b(ts(x,u),ts(y,z),satz221d(y,z,n,p),t4):is(ts(x,u),ts(y,z))
-5252
satz252a:=th1"l.imp"(is(z,0c),is(ts(x,u),ts(y,z)),[t:is(z,0c)]t3".5252"(t),[t:nis(z,0c)]t5".5252"(t)):is(ts(x,u),ts(y,z))
o@[i:is(ts(x,u),ts(y,z))]
+*5252
i@[j:is(z,0c)]
t6:=tris(cx,ts(x,u),ts(y,z),0c,i,satz221b(y,z,j)):is(ts(x,u),0c)
t7:=ore1(is(x,0c),is(u,0c),satz221c(x,u,t6),o):is(x,0c)
t8:=tris2(cx,ov(x,y,n),ov(z,u,o),0c,tris(cx,ov(x,y,n),ov(0c,y,n),0c,isov1(x,0c,y,t7,n),satz249(y,n)),tris(cx,ov(z,u,o),ov(0c,u,o),0c,isov1(z,0c,u,j,o),satz249(u,o))):is(ov(x,y,n),ov(z,u,o))
i@[p:nis(z,0c)]
t9:=tris(cx,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,satz248(x,y,z,u,n,p,o),satz251a(ts(x,u),ts(y,z),satz221d(y,z,n,p),i)):is(ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),1c)
t10:=satz251b(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),t9):is(ov(x,y,n),ov(z,u,o))
-5252
i@satz252b:=th1"l.imp"(is(z,0c),is(ov(x,y,n),ov(z,u,o)),[t:is(z,0c)]t8".5252"(t),[t:nis(z,0c)]t10".5252"(t)):is(ov(x,y,n),ov(z,u,o))
z@[n:nis(y,0c)]
satz253:=satz229g(pl(x,z),y,pl(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,pl(ov(x,y,n),ov(z,y,n))),pl(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),pl(x,z),disttp2(y,ov(x,y,n),ov(z,y,n)),ispl12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(pl(ov(x,y,n),ov(z,y,n)),ov(pl(x,z),y,n))
z@[n:nis(z,0c)]
distop:=symis(cx,pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n),satz253(x,z,y,n)):is(ov(pl(x,y),z,n),pl(ov(x,z,n),ov(y,z,n)))
distpo:=satz253(x,z,y,n):is(pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n))
u@[n:nis(y,0c)][o:nis(u,0c)]
satz254:=tris1(cx,pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),pl(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ispl12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz253(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
z@[n:nis(y,0c)]
satz255:=satz229g(mn(x,z),y,mn(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,mn(ov(x,y,n),ov(z,y,n))),mn(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),mn(x,z),disttm2(y,ov(x,y,n),ov(z,y,n)),ismn12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(mn(ov(x,y,n),ov(z,y,n)),ov(mn(x,z),y,n))
z@[n:nis(z,0c)]
distom:=symis(cx,mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n),satz255(x,z,y,n)):is(ov(mn(x,y),z,n),mn(ov(x,z,n),ov(y,z,n)))
distmo:=satz255(x,z,y,n):is(mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n))
u@[n:nis(y,0c)][o:nis(u,0c)]
satz256:=tris1(cx,mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),mn(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ismn12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz255(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
x@conj:=pli(re(x),m0"r"(im(x))):complex
b@conjisa:=isrecx12(re(pli(a,b)),a,m0"r"(im(pli(a,b))),m0"r"(b),reis(a,b),ism0"r"(im(pli(a,b)),b,imis(a,b))):is(conj(pli(a,b)),pli(a,m0"r"(b)))
conjisb:=symis(cx,conj(pli(a,b)),pli(a,m0"r"(b)),conjisa):is(pli(a,m0"r"(b)),conj(pli(a,b)))
y@[i:is(x,y)]
isconj:=isf(cx,cx,[t:cx]conj(t),x,y,i):is(conj(x),conj(y))
x@satz257:=tr3is(cx,conj(conj(x)),pli(re(x),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,conjisa(re(x),m0"r"(im(x))),isrecx2(m0"r"(m0"r"(im(x))),im(x),re(x),satz177(im(x))),pliis(x)):is(conj(conj(x)),x)
[i:is(x,0c)]
satz258a:=tr3is(cx,conj(x),conj(0c),pli(0,m0"r"(0)),0c,isconj(x,0c,i),conjisa(0,0),isrecx2(m0"r"(0),0,0,satz176b(0,refis(real,0)))):is(conj(x),0c)
x@[i:is(conj(x),0c)]
+6258
t1:=tris(real,re(x),re(conj(x)),0,isre(re(x),m0"r"(im(x))),lemma1(conj(x),i)):is"r"(re(x),0)
t2:=satz176e(im(x),tris(real,m0"r"(im(x)),im(conj(x)),0,isim(re(x),m0"r"(im(x))),lemma2(conj(x),i))):is"r"(im(x),0)
-6258
satz258b:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t1".6258",t2".6258")):is(x,0c)
+*6258
i@anders:=tris1(cx,x,0c,conj(conj(x)),satz257,satz258a(conj(x),i)):is(x,0c)
-6258
x@[n:nis(x,0c)]
satz258c:=th3"l.imp"(is(conj(x),0c),is(x,0c),n,[t:is(conj(x),0c)]satz258b(t)):nis(conj(x),0c)
x@[i:is(conj(x),x)]
+6259
t1:=tris(real,m0"r"(im(x)),im(conj(x)),im(x),isim(re(x),m0"r"(im(x))),isceim(conj(x),x,i)):is"r"(m0"r"(im(x)),im(x))
-6259
satz259a:=lemma10(im(x),symis(real,m0"r"(im(x)),im(x),t1".6259")):is"r"(im(x),0)
x@[i:is"r"(im(x),0)]
satz259b:=tris(cx,conj(x),pli(re(x),im(x)),x,isrecx2(m0"r"(im(x)),im(x),re(x),tris2(real,m0"r"(im(x)),im(x),0,satz176b(im(x),i),i)),pliis(x)):is(conj(x),x)
x@[i:is(x,conj(x))]
satz269c:=satz259a(x,symis(cx,x,conj(x),i)):is"r"(im(x),0)
x@[i:is"r"(im(x),0)]
satz269d:=symis(cx,conj(x),x,satz259b(i)):is(x,conj(x))
y@satz260:=tr3is(cx,conj(pl(x,y)),pli(pl"r"(re(x),re(y)),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(re(x),re(y)),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(conj(x),conj(y)),conjisa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx2(m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),pl"r"(re(x),re(y)),satz180(im(x),im(y))),plis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(pl(x,y)),pl(conj(x),conj(y)))
satz260a:=symis(cx,conj(pl(x,y)),pl(conj(x),conj(y)),satz260):is(pl(conj(x),conj(y)),conj(pl(x,y)))
+6261
t1:=tris(real,m0"r"(imts(x,y)),pl"r"(m0"r"(ts"r"(re(x),im(y))),m0"r"(ts"r"(im(x),re(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),satz180(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(m0"r"(ts"r"(re(x),im(y))),ts"r"(re(x),m0"r"(im(y))),m0"r"(ts"r"(im(x),re(y))),ts"r"(m0"r"(im(x)),re(y)),satz197f(re(x),im(y)),satz197e(im(x),re(y)))):is"r"(m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))))
-6261
satz261:=tr3is(cx,conj(ts(x,y)),pli(rets(x,y),m0"r"(imts(x,y))),pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y)))),ts(conj(x),conj(y)),conjisa(rets(x,y),imts(x,y)),isrecx12(rets(x,y),mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),ismn2"r"(ts"r"(im(x),im(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y))),ts"r"(re(x),re(y)),satz198a(im(x),im(y))),t1".6261"),tsis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(ts(x,y)),ts(conj(x),conj(y)))
satz261a:=symis(cx,conj(ts(x,y)),ts(conj(x),conj(y)),satz261):is(ts(conj(x),conj(y)),conj(ts(x,y)))
+6262
t1:=symis(cx,pl(mn(x,y),y),x,satz230(x,y)):is(x,pl(mn(x,y),y))
t2:=tris(cx,conj(x),conj(pl(mn(x,y),y)),pl(conj(mn(x,y)),conj(y)),isconj(x,pl(mn(x,y),y),t1),satz260(mn(x,y),y)):is(conj(x),pl(conj(mn(x,y)),conj(y)))
-6262
satz262:=satz212f(conj(x),conj(y),conj(mn(x,y)),symis(cx,conj(x),pl(conj(mn(x,y)),conj(y)),t2".6262")):is(conj(mn(x,y)),mn(conj(x),conj(y)))
satz262a:=symis(cx,conj(mn(x,y)),mn(conj(x),conj(y)),satz262):is(mn(conj(x),conj(y)),conj(mn(x,y)))
[n:nis(y,0c)]
+6263
t1:=satz229f(x,y,n):is(x,ts(ov(x,y,n),y))
t2:=isconj(x,ts(ov(x,y,n),y),t1):is(conj(x),conj(ts(ov(x,y,n),y)))
t3:=satz261(ov(x,y,n),y):is(conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)))
t4:=tris(cx,conj(x),conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)),t2,t3):is(conj(x),ts(conj(ov(x,y,n)),conj(y)))
t5:=satz258c(y,n):nis(conj(y),0c)
-6263
satz263:=satz229j(conj(x),conj(y),conj(ov(x,y,n)),t5".6263",symis(cx,conj(x),ts(conj(ov(x,y,n)),conj(y)),t4".6263")):is(conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)))
satz263a:=symis(cx,conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)),satz263):is(ov(conj(x),conj(y),satz258c(y,n)),conj(ov(x,y,n)))
x@mod:=sqrt(mod2(x),lemma5(x)):real
y@[i:is(x,y)]
ismod:=isf(cx,real,[t:cx]mod(t),x,y,i):is"r"(mod(x),mod(y))
x@[n:nis(x,0c)]
satz264a:=sqrtnot0(mod2(x),lemma5(x),pnot0(mod2(x),lemma4(x,n))):pos(mod(x))
x@[i:is(x,0c)]
satz264b:=sqrt0(mod2(x),lemma5(x),lemma3(x,i)):is"r"(mod(x),0)
x@satz264c:=thsqrt1a(mod2(x),lemma5(x)):not(neg(mod(x)))
satz264d:=satz167f(mod(x),0,th3"l.imp"(less(mod(x),0),neg(mod(x)),satz264c,[t:less(mod(x),0)]satz169d(mod(x),t))):moreis(mod(x),0)
+7265
t1:=symis(real,ts"r"(mod(x),mod(x)),mod2(x),thsqrt1b(mod2(x),lemma5(x))):is"r"(mod2(x),ts"r"(mod(x),mod(x)))
t2:=tris(real,pl"r"(ts"r"(re(x),re(x)),0),ts"r"(re(x),re(x)),ts"r"(abs(re(x)),abs(re(x))),pl02(ts"r"(re(x),re(x)),0,refis(real,0)),lemma12"r"(re(x))):is"r"(pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))))
t3:=satz191(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),ts"r"(im(x),im(x)),0,moreisi2(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),refis(real,ts"r"(re(x),re(x)))),lemma11"r"(im(x))):moreis(mod2(x),pl"r"(ts"r"(re(x),re(x)),0))
t4:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))),t1,t2,t3):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(re(x)),abs(re(x))))
t5:=tris(real,pl"r"(0,ts"r"(im(x),im(x))),ts"r"(im(x),im(x)),ts"r"(abs(im(x)),abs(im(x))),pl01(0,ts"r"(im(x),im(x)),refis(real,0)),lemma12"r"(im(x))):is"r"(pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))))
t6:=satz191(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),lemma11"r"(re(x)),moreisi2(ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),refis(real,ts"r"(im(x),im(x))))):moreis(mod2(x),pl"r"(0,ts"r"(im(x),im(x))))
t7:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))),t1,t5,t6):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(im(x)),abs(im(x))))
@[r:real][s:real][m:moreis(ts"r"(r,r),ts"r"(s,s))][n:moreis(r,0)][l:less(r,s)]
t8:=lemma2"r"(r,s,l):more(s,r)
t9:=satz169b(s,satz172d(s,r,0,t8,n)):pos(s)
[o:more(r,0)]
t10:=trmore(ts"r"(s,s),ts"r"(r,s),ts"r"(r,r),satz203a(s,r,s,t8,t9),satz203d(s,r,r,t8,satz169b(r,o))):more(ts"r"(s,s),ts"r"(r,r))
l@[i:is"r"(r,0)]
t11:=ismore2(0,ts"r"(r,r),ts"r"(s,s),symis(real,ts"r"(r,r),0,ts01(r,r,i)),satz169a(ts"r"(s,s),possq(s,pnot0(s,t9)))):more(ts"r"(s,s),ts"r"(r,r))
l@t12:=lemma1"r"(ts"r"(s,s),ts"r"(r,r),orapp(more(r,0),is"r"(r,0),more(ts"r"(s,s),ts"r"(r,r)),n,[t:more(r,0)]t10(t),[t:is"r"(r,0)]t11(t))):less(ts"r"(r,r),ts"r"(s,s))
n@t13:=satz167f(r,s,[t:less(r,s)]<t12(t)>satz167c(ts"r"(r,r),ts"r"(s,s),m)):moreis(r,s)
-7265
satz265a:=t13".7265"(mod(x),abs(re(x)),t4".7265",satz264d(x)):moreis(mod(x),abs(re(x)))
satz265b:=t13".7265"(mod(x),abs(im(x)),t7".7265",satz264d(x)):moreis(mod(x),abs(im(x)))
@[r:real][s:real][i:is(ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)))][n:not(neg(r))][o:not(neg(s))]
+7266
@[t:real]
t1:=pl02(ts"r"(t,t),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t))
t2:=tris(real,pl"r"(ts"r"(t,0),ts"r"(0,t)),ts"r"(t,0),0,pl02(ts"r"(t,0),ts"r"(0,t),ts01(0,t,refis(real,0))),ts02(t,0,refis(real,0))):is"r"(pl"r"(ts"r"(t,0),ts"r"(0,t)),0)
t3:=tris(cx,ts(pli(t,0),pli(t,0)),pli(mn"r"(ts"r"(t,t),ts"r"(0,0)),pl"r"(ts"r"(t,0),ts"r"(0,t))),pli(ts"r"(t,t),0),tsis12a(t,0,t,0),isrecx12(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t),pl"r"(ts"r"(t,0),ts"r"(0,t)),0,t1,t2)):is(ts(pli(t,0),pli(t,0)),pli(ts"r"(t,t),0))
o@t4:=tr3is(cx,pli(ts"r"(r,r),0),ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)),pli(ts"r"(s,s),0),symis(cx,ts(pli(r,0),pli(r,0)),pli(ts"r"(r,r),0),t3(r)),i,t3(s)):is(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0))
t5:=tr3is(real,ts"r"(r,r),re(pli(ts"r"(r,r),0)),re(pli(ts"r"(s,s),0)),ts"r"(s,s),isre(ts"r"(r,r),0),iscere(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0),t4),reis(ts"r"(s,s),0)):is"r"(ts"r"(r,r),ts"r"(s,s))
t6:=andi(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)),n,t5):and(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)))
t7:=andi(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)),o,refis(real,ts"r"(s,s))):and(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)))
-7266
satz266:=satzr161b(ts"r"(s,s),r,s,t6".7266",t7".7266"):is"r"(r,s)
+7267
x@t1:=tris(cx,ts(pli(mod(x),0),pli(mod(x),0)),pli(ts"r"(mod(x),mod(x)),0),pli(mod2(x),0),t3"c.7266"(mod(x)),isrecx1(ts"r"(mod(x),mod(x)),mod2(x),0,thsqrt1b(mod2(x),lemma5(x)))):is(ts(pli(mod(x),0),pli(mod(x),0)),pli(mod2(x),0))
t2:=ispl2"r"(m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(im(x),im(x)),ts"r"(re(x),re(x)),tris(real,m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),satz197e(im(x),m0"r"(im(x))),satz198(im(x),im(x)))):is"r"(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x))
t3:=tris(real,pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),pl"r"(m0"r"(ts"r"(re(x),im(x))),ts"r"(re(x),im(x))),0,ispl12"r"(ts"r"(re(x),m0"r"(im(x))),m0"r"(ts"r"(re(x),im(x))),ts"r"(im(x),re(x)),ts"r"(re(x),im(x)),satz197b(re(x),im(x)),comts"r"(im(x),re(x))),satz179a(ts"r"(re(x),im(x)))):is"r"(pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0)
t4:=tris(cx,ts(x,conj(x)),pli(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x)))),pli(mod2(x),0),tsis2a(x,re(x),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0,t2,t3)):is(ts(x,conj(x)),pli(mod2(x),0))
-7267
x@satz267:=tris2(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),pli(mod2(x),0),t1".7267",t4".7267"):is(ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)))
satz267a:=symis(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),satz267):is(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)))
+7268
z@t1:=tr3is(cx,ts(x,ts(y,z)),ts(ts(x,y),z),ts(ts(y,x),z),ts(y,ts(x,z)),assts2(x,y,z),ists1(ts(x,y),ts(y,x),z,comts(x,y)),assts1(y,x,z)):is(ts(x,ts(y,z)),ts(y,ts(x,z)))
[u:complex]
t2:=tr3is(cx,ts(ts(x,y),ts(z,u)),ts(x,ts(y,ts(z,u))),ts(x,ts(z,ts(y,u))),ts(ts(x,z),ts(y,u)),assts1(x,y,ts(z,u)),ists2(ts(y,ts(z,u)),ts(z,ts(y,u)),x,t1(y,z,u)),assts2(x,z,ts(y,u))):is(ts(ts(x,y),ts(z,u)),ts(ts(x,z),ts(y,u)))
y@t3:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,y),conj(ts(x,y))),ts(ts(x,y),ts(conj(x),conj(y))),ts(ts(x,conj(x)),ts(y,conj(y))),satz267(ts(x,y)),ists2(conj(ts(x,y)),ts(conj(x),conj(y)),ts(x,y),satz261(x,y)),t2(x,y,conj(x),conj(y))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))))
t4:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))),ts(ts(pli(mod(x),0),pli(mod(x),0)),ts(pli(mod(y),0),pli(mod(y),0))),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),t3,ists12(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)),ts(y,conj(y)),ts(pli(mod(y),0),pli(mod(y),0)),satz267a(x),satz267a(y)),t2(pli(mod(x),0),pli(mod(x),0),pli(mod(y),0),pli(mod(y),0))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))))
@[r:real][s:real]
t5:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
t6:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
t7:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t5,t6)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
y@t8:=tris(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)),t4,ists12(ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),t7(mod(x),mod(y)),t7(mod(x),mod(y)))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)))
[n:neg(ts"r"(mod(x),mod(y)))]
t9:=orapp(and(pos(mod(x)),neg(mod(y))),and(neg(mod(x)),pos(mod(y))),con,satz196h(mod(x),mod(y),n),[t:and(pos(mod(x)),neg(mod(y)))]<ande2(pos(mod(x)),neg(mod(y)),t)>satz264c(y),[t:and(neg(mod(x)),pos(mod(y)))]<ande1(neg(mod(x)),pos(mod(y)),t)>satz264c(x)):con
-7268
y@satz268:=satz266(mod(ts(x,y)),ts"r"(mod(x),mod(y)),t8".7268",satz264c(ts(x,y)),[t:neg(ts"r"(mod(x),mod(y)))]t9".7268"(t)):is"r"(mod(ts(x,y)),ts"r"(mod(x),mod(y)))
satz268a:=symis(real,mod(ts(x,y)),ts"r"(mod(x),mod(y)),satz268):is"r"(ts"r"(mod(x),mod(y)),mod(ts(x,y)))
[n:nis(y,0c)]
+7269
t1:=pnot0(mod(y),satz264a(y,n)):nis"r"(mod(y),0)
t2:=tris1(real,ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),mod(ts(ov(x,y,n),y)),satz268(ov(x,y,n),y),ismod(ts(ov(x,y,n),y),x,satz240(x,y,n))):is"r"(ts"r"(mod(ov(x,y,n)),mod(y)),mod(x))
t3:=satz204g(mod(x),mod(y),mod(ov(x,y,n)),t1,tris(real,ts"r"(mod(y),mod(ov(x,y,n))),ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),comts"r"(mod(y),mod(ov(x,y,n))),t2)):is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),t1))
-7269
satz269:=t3".7269":is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),pnot0(mod(y),satz264a(y,n))))
y@[i:is(pl(x,y),1c)]
+7270
@[r:real]
t1:=th1"l.imp"(neg(r),moreis(abs(r),r),[t:neg(r)]moreisi1(abs(r),r,trmore(abs(r),0,r,satz169a(abs(r),satz166b(r,t)),lemma2"r"(r,0,satz169c(r,t)))),[t:not(neg(r))]moreisi2(abs(r),r,absnn(r,t))):moreis(abs(r),r)
x@t2:=trmoreis(mod(x),abs(re(x)),re(x),satz265a(x),t1(re(x))):moreis(mod(x),re(x))
i@t3:=tr3is(real,pl"r"(re(x),re(y)),re(pl(x,y)),re(1c),1rl,isre(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),iscere(pl(x,y),1c,i),reis(1rl,0)):is"r"(pl"r"(re(x),re(y)),1rl)
-7270
satz270:=ismoreis2(pl"r"(re(x),re(y)),1rl,pl"r"(mod(x),mod(y)),t3".7270",satz191(mod(x),re(x),mod(y),re(y),t2".7270",t2".7270"(y))):moreis(pl"r"(mod(x),mod(y)),1rl)
+7271
y@[i:is(pl(x,y),0c)]
t1:=satz264b(pl(x,y),i):is"r"(mod(pl(x,y)),0)
t2:=ismoreis2(pl"r"(0,0),mod(pl(x,y)),pl"r"(mod(x),mod(y)),tris2(real,pl"r"(0,0),mod(pl(x,y)),0,pl01(0,0,refis(real,0)),t1),satz191(mod(x),0,mod(y),0,satz264d(x),satz264d(y))):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
y@[n:nis(pl(x,y),0c)]
t3:=pnot0(mod(pl(x,y)),satz264a(pl(x,y),n)):nis"r"(mod(pl(x,y)),0)
t4:=tris(cx,pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),ov(pl(x,y),pl(x,y),n),1c,satz253(x,pl(x,y),y,n),satz250(pl(x,y),n)):is(pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),1c)
t5:=satz270(ov(x,pl(x,y),n),ov(y,pl(x,y),n),t4):moreis(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),1rl)
fx:=ov"r"(mod(x),mod(pl(x,y)),t3):real
fy:=ov"r"(mod(y),mod(pl(x,y)),t3):real
t6:=ismoreis1(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),pl"r"(fx,fy),1rl,ispl12"r"(mod(ov(x,pl(x,y),n)),fx,mod(ov(y,pl(x,y),n)),fy,satz269(x,pl(x,y),n),satz269(y,pl(x,y),n)),t5):moreis(pl"r"(fx,fy),1rl)
prl:=ts"r"(pl"r"(fx,fy),mod(pl(x,y))):real
prr:=ts"r"(1rl,mod(pl(x,y))):real
t7:=orapp(more(pl"r"(fx,fy),1rl),is"r"(pl"r"(fx,fy),1rl),moreis(prl,prr),t6,[t:more(pl"r"(fx,fy),1rl)]moreisi1(prl,prr,satz203a(pl"r"(fx,fy),1rl,mod(pl(x,y)),t,satz264a(pl(x,y),n))),[t:is"r"(pl"r"(fx,fy),1rl)]moreisi2(prl,prr,ists1"r"(pl"r"(fx,fy),1rl,mod(pl(x,y)),t))):moreis(prl,prr)
t8:=tris(real,prl,pl"r"(ts"r"(fx,mod(pl(x,y))),ts"r"(fy,mod(pl(x,y)))),pl"r"(mod(x),mod(y)),disttp1"r"(fx,fy,mod(pl(x,y))),ispl12"r"(ts"r"(fx,mod(pl(x,y))),mod(x),ts"r"(fy,mod(pl(x,y))),mod(y),satz204e(mod(x),mod(pl(x,y)),t3),satz204e(mod(y),mod(pl(x,y)),t3))):is"r"(prl,pl"r"(mod(x),mod(y)))
t9:=satz195b(mod(pl(x,y))):is"r"(prr,mod(pl(x,y)))
t10:=ismoreis12(prl,pl"r"(mod(x),mod(y)),prr,mod(pl(x,y)),t8,t9,t7):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
y@t11:=th1"l.imp"(is(pl(x,y),0c),moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y))),[t:is(pl(x,y),0c)]t2(t),[t:nis(pl(x,y),0c)]t10(t)):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-7271
y@satz271:=satz168a(pl"r"(mod(x),mod(y)),mod(pl(x,y)),t11".7271"):lessis(mod(pl(x,y)),pl"r"(mod(x),mod(y)))
satz271a:=t11".7271":moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
+7272
x@t1:=tris(real,re(m0(x)),re(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(re(x)),iscere(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),reis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(re(m0(x)),m0"r"(re(x)))
t2:=tris(real,ts"r"(re(m0(x)),re(m0(x))),ts"r"(m0"r"(re(x)),m0"r"(re(x))),ts"r"(re(x),re(x)),ists12"r"(re(m0(x)),m0"r"(re(x)),re(m0(x)),m0"r"(re(x)),t1,t1),satz198(re(x),re(x))):is"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)))
t3:=tris(real,im(m0(x)),im(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(im(x)),isceim(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),imis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(im(m0(x)),m0"r"(im(x)))
t4:=tris(real,ts"r"(im(m0(x)),im(m0(x))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),ists12"r"(im(m0(x)),m0"r"(im(x)),im(m0(x)),m0"r"(im(x)),t3,t3),satz198(im(x),im(x))):is"r"(ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)))
t5:=ispl12"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)),ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)),t2,t4):is"r"(mod2(m0(x)),mod2(x))
-7272
x@satz272:=issqrt(mod2(m0(x)),mod2(x),lemma5(m0(x)),lemma5(x),t5".7272"):is"r"(mod(m0(x)),mod(x))
satz272a:=symis(real,mod(m0(x)),mod(x),satz272):is"r"(mod(x),mod(m0(x)))
+7273
y@sum:=pl"r"(mod(y),mod(mn(x,y))):real
t1:=islessis1(mod(pl(y,mn(x,y))),mod(x),sum,ismod(pl(y,mn(x,y)),x,satz212h(x,y)),satz271(y,mn(x,y))):lessis(mod(x),sum)
t2:=th9"l.or"(less(mod(x),sum),is"r"(mod(x),sum),less(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),is"r"(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),t1,[t:less(mod(x),sum)]satz188f(mod(x),sum,m0"r"(mod(y)),t),[t:is"r"(mod(x),sum)]ismn1"r"(mod(x),sum,mod(y),t)):lessis(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y)))
t3:=tris(real,mn"r"(sum,mod(y)),mn"r"(pl"r"(mod(mn(x,y)),mod(y)),mod(y)),mod(mn(x,y)),ismn1"r"(sum,pl"r"(mod(mn(x,y)),mod(y)),mod(y),compl"r"(mod(y),mod(mn(x,y)))),mnpl(mod(mn(x,y)),mod(y))):is"r"(mn"r"(sum,mod(y)),mod(mn(x,y)))
t4:=satz168b(mn"r"(mod(x),mod(y)),mod(mn(x,y)),islessis2(mn"r"(sum,mod(y)),mod(mn(x,y)),mn"r"(mod(x),mod(y)),t3,t2)):moreis(mod(mn(x,y)),mn"r"(mod(x),mod(y)))
t5:=ismoreis12(mod(mn(y,x)),mod(mn(x,y)),mn"r"(mod(y),mod(x)),m0"r"(mn"r"(mod(x),mod(y))),tris1(real,mod(mn(y,x)),mod(mn(x,y)),mod(m0(mn(x,y))),ismod(m0(mn(x,y)),mn(y,x),satz219(x,y)),satz272(mn(x,y))),satz181a(mod(y),mod(x)),t4(y,x)):moreis(mod(mn(x,y)),m0"r"(mn"r"(mod(x),mod(y))))
@[r:real][s:real][m:moreis(r,s)][n:moreis(r,m0"r"(s))]
r@t6:=th9"l.or"(neg(r),not(neg(r)),is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r),th6"l.or"(neg(r)),[t:neg(r)]absn(r,t),[t:not(neg(r))]absnn(r,t)):or(is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r))
n@t7:=orapp(is"r"(abs(s),m0"r"(s)),is"r"(abs(s),s),moreis(r,abs(s)),t6(s),[t:is"r"(abs(s),m0"r"(s))]ismoreis2(m0"r"(s),abs(s),r,symis(real,abs(s),m0"r"(s),t),n),[t:is"r"(abs(s),s)]ismoreis2(s,abs(s),r,symis(real,abs(s),s,t),m)):moreis(r,abs(s))
-7273
y@satz273:=t7".7273"(mod(mn(x,y)),mn"r"(mod(x),mod(y)),t4".7273",t5".7273"):moreis(mod(mn(x,y)),abs(mn"r"(mod(x),mod(y))))
-c
-r
-rp
-rt
@[x:nat][y:nat]
+8274
prop1:=some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)):'prop'
x@prop2:=all([y:nat]imp(less(x,y),not(prop1(y)))):'prop'
@[y:nat][l:less(1,y)][f:[t:1to(1)]1to(y)]
1y:=1out(y):1to(y)
yy:=xout(y):1to(y)
[i:is"e"(1to(y),1y,yy)]
t1:=isoutne(y,1,satz24a(y),y,lessisi3(y),i):is(1,y)
f@t2:=ec3e31(is(1,y),more(1,y),less(1,y),satz10b(1,y),l):nis(1,y)
t3:=th3"l.imp"(is"e"(1to(y),1y,yy),is(1,y),t2,[t:is"e"(1to(y),1y,yy)]t1(t)):not(is"e"(1to(y),1y,yy))
[u:1to(1)]
t4:=isf(1to(1),1to(y),f,u,1o,th1"n.singlet"(u)):is"e"(1to(y),<u>f,<1o>f)
f@[i:is"e"(1to(y),<1o>f,1y)][u:1to(1)]
t5:=th2"e.notis"(1to(y),1y,yy,<u>f,t3,tris(1to(y),<u>f,<1o>f,1y,t4(u),i)):not(is"e"(1to(y),<u>f,yy))
i@t6:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),yy,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,yy,t5(u))):not(image(1to(1),1to(y),f,yy))
t7:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),yy,t6):not(surjective(1to(1),1to(y),f))
f@[n:not(is"e"(1to(y),<1o>f,1y))][u:1to(1)]
t8:=th2"e.notis"(1to(y),<1o>f,1y,<u>f,n,t4(u)):not(is"e"(1to(y),<u>f,1y))
n@t9:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),1y,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,1y,t8(u))):not(image(1to(1),1to(y),f,1y))
t10:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),1y,t9):not(surjective(1to(1),1to(y),f))
f@t11:=th1"l.imp"(is"e"(1to(y),<1o>f,1y),not(surjective(1to(1),1to(y),f)),[t:is"e"(1to(y),<1o>f,1y)]t7(t),[t:not(is"e"(1to(y),<1o>f,1y))]t10(t)):not(surjective(1to(1),1to(y),f))
t12:=th2"l.and"(injective(1to(1),1to(y),f),surjective(1to(1),1to(y),f),t11):not(bijective(1to(1),1to(y),f))
l@t13:=th5"l.some"([t:1to(1)]1to(y),[f:[t:1to(1)]1to(y)]bijective(1to(1),1to(y),f),[f:[t:1to(1)]1to(y)]t12(f)):not(prop1(1,y))
@t14:=[y:nat][t:less(1,y)]t13(y,t):prop2(1)
x@[p:prop2(x)][y:nat][l:less(<x>suc,y)]
x@xs:=<x>suc:nat
l@xxs:=xout(xs):1to(<x>suc)
yy1:=xout(y):1to(y)
t15:=trless(1,<x>suc,y,satz24c(x),l):less(1,y)
ym1:=mn(y,1,t15):nat
t16:=isless12(<x>suc,pl(x,1),y,pl(ym1,1),satz4e(x),th1c"n.mn"(y,1,t15),l):less(pl(x,1),pl(ym1,1))
t17:=satz20c(x,ym1,1,t16):less(x,ym1)
t18:=isless2(pl(ym1,1),y,ym1,th1d"n.mn"(y,1,t15),satz18a(ym1,1)):less(ym1,y)
[f:[t:1to(xs)]1to(y)][b:bijective(1to(xs),1to(y),f)]
t19:=ande1(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):injective(1to(xs),1to(y),f)
t20:=ande2(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):surjective(1to(xs),1to(y),f)
[i:is"e"(1to(y),<xxs>f,yy1)][u:1to(x)]
u1:=inn(x,u):nat
t21:=satz16a(u1,x,xs,1top(x,u),satz18c(x)):less(u1,xs)
t22:=ec3e31(is(u1,xs),more(u1,xs),less(u1,xs),satz10b(u1,xs),t21):nis(u1,xs)
t23:=lessisi1(u1,xs,t21):lessis(u1,xs)
u2:=outn(xs,u1,t23):1to(xs)
t24:=th3"l.imp"(is"e"(1to(xs),u2,xxs),is(u1,xs),t22,[t:is"e"(1to(xs),u2,xxs)]isoutne(xs,u1,t23,xs,lessisi3(xs),t)):not(is"e"(1to(xs),u2,xxs))
[j:is"e"(1to(y),<u2>f,yy1)]
t25:=tris2(1to(y),<u2>f,<xxs>f,yy1,j,i):is"e"(1to(y),<u2>f,<xxs>f)
t26:=isfe(1to(xs),1to(y),f,t19,u2,xxs,t25):is"e"(1to(xs),u2,xxs)
u@t27:=th3"l.imp"(is"e"(1to(y),<u2>f,yy1),is"e"(1to(xs),u2,xxs),t24,[t:is"e"(1to(y),<u2>f,yy1)]t26(t)):not(is"e"(1to(y),<u2>f,yy1))
w1:=inn(y,<u2>f):nat
[j:is(w1,y)]
t28:=tris(1to(y),<u2>f,outn(y,w1,1top(y,<u2>f)),yy1,isoutinn(y,<u2>f),isoutni(y,w1,1top(y,<u2>f),y,lessisi3(y),j)):is"e"(1to(y),<u2>f,yy1)
u@t29:=th3"l.imp"(is(w1,y),is"e"(1to(y),<u2>f,yy1),t27,[t:is(w1,y)]t28(t)):nis(w1,y)
t30:=ore1(less(w1,y),is(w1,y),1top(y,<u2>f),t29):less(w1,y)
t31:=islessis2(y,pl(ym1,1),pl(w1,1),th1c"n.mn"(y,1,t15),satz25b(y,w1,t30)):lessis(pl(w1,1),pl(ym1,1))
t32:=th9"l.or"(less(pl(w1,1),pl(ym1,1)),is(pl(w1,1),pl(ym1,1)),less(w1,ym1),is(w1,ym1),t31,[t:less(pl(w1,1),pl(ym1,1))]satz20c(w1,ym1,1,t),[t:is(pl(w1,1),pl(ym1,1))]satz20b(w1,ym1,1,t)):lessis(w1,ym1)
w2:=outn(ym1,w1,t32):1to(ym1)
i@f1:=[t:1to(x)]w2(t):[t:1to(x)]1to(ym1)
u@[v:1to(x)][j:is"e"(1to(ym1),<u>f1,<v>f1)]
t33:=isoutne(ym1,w1(u),t32(u),w1(v),t32(v),j):is(w1(u),w1(v))
t34:=isinne(y,<u2(u)>f,<u2(v)>f,t33):is"e"(1to(y),<u2(u)>f,<u2(v)>f)
t35:=<t34><u2(v)><u2(u)>t19:is"e"(1to(xs),u2(u),u2(v))
t36:=isoutne(xs,u1(u),t23(u),u1(v),t23(v),t35):is(u1(u),u1(v))
t37:=isinne(x,u,v,t36):is"e"(1to(x),u,v)
i@[v:1to(ym1)]
v1:=inn(ym1,v):nat
t38:=satz16a(v1,ym1,y,1top(ym1,v),t18):less(v1,y)
t39:=ec3e31(is(v1,y),more(v1,y),less(v1,y),satz10b(v1,y),t38):nis(v1,y)
t40:=lessisi1(v1,y,t38):lessis(v1,y)
v2:=outn(y,v1,t40):1to(y)
w3:=<v2>invf(1to(xs),1to(y),f,b):1to(xs)
t41:=thinvf2(1to(xs),1to(y),f,b,v2):is"e"(1to(y),v2,<w3>f)
[j:is"e"(1to(xs),w3,xxs)]
t42:=isf(1to(xs),1to(y),f,w3,xxs,j):is"e"(1to(y),<w3>f,<xxs>f)
t43:=tr3is(1to(y),v2,<w3>f,<xxs>f,yy1,t41,t42,i):is"e"(1to(y),v2,yy1)
t44:=isoutne(y,v1,t40,y,lessisi3(y),t43):is(v1,y)
v@t45:=th3"l.imp"(is"e"(1to(xs),w3,xxs),is(v1,y),t39,[t:is"e"(1to(xs),w3,xxs)]t44(t)):not(is"e"(1to(xs),w3,xxs))
w4:=inn(xs,w3):nat
[j:is(w4,xs)]
t46:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),xxs,isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),xs,lessisi3(xs),j)):is"e"(1to(xs),w3,xxs)
v@t47:=th3"l.imp"(is(w4,xs),is"e"(1to(xs),w3,xxs),t45,[t:is(w4,xs)]t46(t)):nis(w4,xs)
t48:=ore1(less(w4,xs),is(w4,xs),1top(xs,w3),t47):less(w4,xs)
t49:=satz26a(x,w4,t48):lessis(w4,x)
w5:=outn(x,w4,t49):1to(x)
t50:=isinoutn(x,w4,t49):is(w4,u1(w5))
t51:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),u2(w5),isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),u1(w5),t23(w5),t50)):is"e"(1to(xs),w3,u2(w5))
t52:=isf(1to(xs),1to(y),f,w3,u2(w5),t51):is"e"(1to(y),<w3>f,<u2(w5)>f)
t53:=tris(1to(y),v2,<w3>f,<u2(w5)>f,t41,t52):is"e"(1to(y),v2,<u2(w5)>f)
t54:=tris(nat,v1,inn(y,v2),w1(w5),isinoutn(y,v1,t40),isinni(y,v2,<u2(w5)>f,t53)):is(v1,w1(w5))
t55:=tris(1to(ym1),v,outn(ym1,v1,1top(ym1,v)),w2(w5),isoutinn(ym1,v),isoutni(ym1,v1,1top(ym1,v),w1(w5),t32(w5),t54)):is"e"(1to(ym1),v,<w5>f1)
t56:=somei(1to(x),[t:1to(x)]is"e"(1to(ym1),v,<t>f1),w5,t55):image(1to(x),1to(ym1),f1,v)
i@t57:=andi(injective(1to(x),1to(ym1),f1),surjective(1to(x),1to(ym1),f1),[u:1to(x)][v:1to(x)][t:is"e"(1to(ym1),<u>f1,<v>f1)]t37(u,v,t),[u:1to(ym1)]t56(u)):bijective(1to(x),1to(ym1),f1)
t58:=somei([t:1to(x)]1to(ym1),[g:[t:1to(x)]1to(ym1)]bijective(1to(x),1to(ym1),g),f1,t57):prop1(ym1)
t59:=<t58><t17><ym1>p:con
b@[n:not(is"e"(1to(y),<xxs>f,yy1))]
m0:=<yy1>invf(1to(xs),1to(y),f,b):1to(xs)
t60:=thinvf2(1to(xs),1to(y),f,b,yy1):is"e"(1to(y),yy1,<m0>f)
f2:=changef(1to(xs),1to(y),f,m0,xxs):[t:1to(xs)]1to(y)
t61:=changef2(1to(xs),1to(y),f,m0,xxs,xxs,refis(1to(xs),xxs)):is"e"(1to(y),<xxs>f2,<m0>f)
t62:=tris2(1to(y),<xxs>f2,yy1,<m0>f,t61,t60):is"e"(1to(y),<xxs>f2,yy1)
t63:=th6"e.wissel"(1to(xs),1to(y),f,m0,xxs,b):bijective(1to(xs),1to(y),f2)
t64:=t59(f2,t63,t62):con
b@t65:=th1"l.imp"(is"e"(1to(y),<xxs>f,yy1),con,[t:is"e"(1to(y),<xxs>f,yy1)]t59(t),[t:not(is"e"(1to(y),<xxs>f,yy1))]t64(t)):con
l@t65a:=th5"l.some"([t:1to(xs)]1to(y),[f:[t:1to(xs)]1to(y)]bijective(1to(xs),1to(y),f),[f:[t:1to(xs)]1to(y)][t:bijective(1to(xs),1to(y),f)]t65(f,t)):not(prop1(xs,y))
p@t66:=[y:nat][t:less(xs,y)]t65a(y,t):prop2(xs)
x@t67:=induction([t:nat]prop2(t),t14,[t:nat][u:prop2(t)]t66(t,u),x):prop2(x)
-8274
[l:less(x,y)]
satz274:=<l><y>t67".8274":not(some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)))
[f:[t:1to(x)]1to(y)]
satz274a:=th4"l.some"([t:1to(x)]1to(y),[g:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),g),satz274,f):not(bijective(1to(x),1to(y),f))
+*rt
+*rp
+*r
+*c
@[x:nat][u:1to(x)]
inn:=inn"n"(x,u):nat
@[q:[t:cx][u:cx]cx][x:nat][f:[t:1to(x)]cx]
x@[n:1to(x)][o:not(is"e"(1to(x),n,xout(x)))]
+8275
t1:=th3"l.imp"(is"n"(inn(x,n),x),is"e"(1to(x),n,xout(x)),o,[t:is"n"(inn(x,n),x)]tris(1to(x),n,outn(x,inn(x,n),1top(x,n)),xout(x),isoutinn(x,n),isoutni(x,inn(x,n),1top(x,n),x,lessisi3(x),t))):not(is"n"(inn(x,n),x))
t2:=ore1(less"n"(inn(x,n),x),is"n"(inn(x,n),x),1top(x,n),t1):less"n"(inn(x,n),x)
-8275
lemma275:=satz25c(x,inn(x,n),t2".8275"):lessis"n"(<inn(x,n)>suc,x)
f@[g:[t:1to(x)]cx]
recprop:=and(is(<1out(x)>g,<1out(x)>f),[t:1to(x)][u:not(is"e"(1to(x),t,xout(x)))]is(<outn(x,<inn(x,t)>suc,lemma275(t,u))>g,<<outn(x,<inn(x,t)>suc,lemma275(t,u))>f><<t>g>q)):'prop'
+*8275
x@1o:=1out(x):1to(x)
xo:=xout(x):1to(x)
[u:nat][l:lessis"n"(<u>suc,x)]
t11:=satz16b(u,<u>suc,x,satz18c(u),l):less"n"(u,x)
t12:=lessisi1"n"(u,x,t11):lessis"n"(u,x)
ux:=outn(x,u,t12):1to(x)
t13:=ec3e31(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11):nis"n"(u,x)
t14:=th3"l.imp"(is"e"(1to(x),ux,xo),is"n"(u,x),t13,[t:is"e"(1to(x),ux,xo)]isoutne(x,u,t12,x,lessisi3(x),t)):not(is"e"(1to(x),ux,xo))
t15:=isf(nat,nat,suc,u,inn(x,ux),isinoutn(x,u,t12)):is"n"(<u>suc,<inn(x,ux)>suc)
t16:=isoutni(x,<u>suc,l,<inn(x,ux)>suc,lemma275(ux,t14),t15):is"e"(1to(x),outn(x,<u>suc,l),outn(x,<inn(x,ux)>suc,lemma275(ux,t14)))
x@[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
ns:=outn(x,<inn(x,n)>suc,lemma275(n,o)):1to(x)
f@[g:[t:1to(x)]cx]
prop1:=is(<1o>g,<1o>f):'prop'
prop2:=[t:1to(x)][u:not(is"e"(1to(x),t,xo))]is(<ns(t,u)>g,<<ns(t,u)>f><<t>g>q):'prop'
[pg:recprop(g)]
t3:=ande1(prop1,prop2,pg):prop1
[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
t4:=<o><n>ande2(prop1,prop2,pg):is(<ns(n,o)>g,<<ns(n,o)>f><<n>g>q)
pg@[u:nat][l:lessis"n"(<u>suc,x)]
t17:=isf(1to(x),cx,g,outn(x,<u>suc,l),ns(ux(u,l),t14(u,l)),t16(u,l)):is(<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g)
t18:=tris(cx,<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,t17,t4(pg,ux(u,l),t14(u,l))):is(<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q)
g@[h:[t:1to(x)]cx][u:nat][l:lessis"n"(u,x)]
prop3:=is(<outn(x,u,l)>g,<outn(x,u,l)>h):'prop'
u@prop4:=and(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(t)):'prop'
prop5:=or(prop4,more"n"(u,x)):'prop'
h@[pg:recprop(g)][ph:recprop(h)][l:lessis"n"(1,x)]
t5:=isoutni(x,1,l,1,satz24a(x),refis(nat,1)):is"e"(1to(x),outn(x,1,l),1o)
t6:=isf(1to(x),cx,g,outn(x,1,l),1o,t5):is(<outn(x,1,l)>g,<1o>g)
t7:=tris(cx,<outn(x,1,l)>g,<1o>g,<1o>f,t6,t3(pg)):is(<outn(x,1,l)>g,<1o>f)
t8:=tris2(cx,<outn(x,1,l)>g,<outn(x,1,l)>h,<1o>f,t7,t7(h,g,ph,pg,l)):prop3(1,l)
ph@t9:=andi(lessis"n"(1,x),[t:lessis"n"(1,x)]prop3(1,t),satz24a(x),[t:lessis"n"(1,x)]t8(t)):prop4(1)
t10:=ori1(prop4(1),more"n"(1,x),t9):prop5(1)
[u:nat][p:prop5(u)][l:lessis"n"(<u>suc,x)]
t19:=ec3e32(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11(u,l)):not(more"n"(u,x))
t20:=ore1(prop4(u),more"n"(u,x),p,t19):prop4(u)
t21:=<t12(u,l)>ande2(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(u,t),t20):prop3(u,t12(u,l))
t22:=isf(cx,cx,[t:cx]<<ns(ux(u,l),t14(u,l))>f><t>q,<ux(u,l)>g,<ux(u,l)>h,t21):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q)
t23:=symis(cx,<outn(x,<u>suc,l)>h,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,t18(h,ph,u,l)):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h)
t24:=tr3is(cx,<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h,t18(g,pg,u,l),t22,t23):prop3(<u>suc,l)
t25:=andi(lessis"n"(<u>suc,x),[t:lessis"n"(<u>suc,x)]prop3(<u>suc,t),l,[t:lessis"n"(<u>suc,x)]t24(t)):prop4(<u>suc)
t26:=ori1(prop4(<u>suc),more"n"(<u>suc,x),t25):prop5(<u>suc)
p@[n:not(lessis"n"(<u>suc,x))]
t27:=satz10k(<u>suc,x,n):more"n"(<u>suc,x)
t28:=ori2(prop4(<u>suc),more"n"(<u>suc,x),t27):prop5(<u>suc)
p@t29:=th1"l.imp"(lessis"n"(<u>suc,x),prop5(<u>suc),[t:lessis"n"(<u>suc,x)]t26(t),[t:not(lessis"n"(<u>suc,x))]t28(t)):prop5(<u>suc)
u@t30:=induction([v:nat]prop5(v),t10,[v:nat][t:prop5(v)]t29(v,t),u):prop5(u)
ph@[n:1to(x)]
t31:=isf(1to(x),cx,g,n,outn(x,inn(x,n),1top(x,n)),isoutinn(x,n)):is(<n>g,<outn(x,inn(x,n),1top(x,n))>g)
t32:=satz10d(inn(x,n),x,1top(x,n)):not(more"n"(inn(x,n),x))
t33:=ore1(prop4(inn(x,n)),more"n"(inn(x,n),x),t30(inn(x,n)),t32):prop4(inn(x,n))
t34:=<1top(x,n)>ande2(lessis"n"(inn(x,n),x),[t:lessis"n"(inn(x,n),x)]prop3(inn(x,n),t),t33):prop3(inn(x,n),1top(x,n))
t35:=symis(cx,<n>h,<outn(x,inn(x,n),1top(x,n))>h,t31(h,g,ph,pg,n)):is(<outn(x,inn(x,n),1top(x,n))>h,<n>h)
t36:=tr3is(cx,<n>g,<outn(x,inn(x,n),1top(x,n))>g,<outn(x,inn(x,n),1top(x,n))>h,<n>h,t31,t34,t35):is(<n>g,<n>h)
ph@t37:=fisi(1to(x),cx,g,h,[t:1to(x)]t36(t)):is"e"([t:1to(x)]cx,g,h)
f@prop6:=some"l"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(g)):'prop'
x@prop7:=all"l"([t:1to(x)]cx,[f:[t:1to(x)]cx]prop6(f)):'prop'
q@[f:[t:1to(1)]cx]
t38:=refis(cx,<1o(1)>f):prop1(1,f,f)
[n:1to(1)][o:not(is"e"(1to(1),n,xo(1)))]
t39:=<th1"n.singlet"(n)>o:con
t40:=cone(is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q),t39):is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q)
f@t41:=andi(prop1(1,f,f),prop2(1,f,f),t38,[t:1to(1)][u:not(is"e"(1to(1),t,xo(1)))]t40(t,u)):recprop(1,f,f)
t42:=somei([t:1to(1)]cx,[g:[t:1to(1)]cx]recprop(1,f,g),f,t41):prop6(1,f)
q@t43:=[f:[t:1to(1)]cx]t42(f):prop7(1)
x@[p:prop7(x)]
xs:=<x>suc:nat
[f:[t:1to(xs)]cx]
f1:=left(cx,xs,x,lessisi1"n"(x,xs,satz18c(x)),f):[t:1to(x)]cx
t44:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f1,g)][v:recprop(x,f1,h)]t37(f1,g,h,u,v),<f1>p):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g))
g1:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):[t:1to(x)]cx
t45:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):recprop(x,f1,g1)
[n:1to(xs)]
nxs:=is"e"(1to(xs),n,xo(xs)):'prop'
[o:not(nxs)]
t46:=satz26a(x,inn(xs,n),t2(xs,n,o)):lessis"n"(inn(xs,n),x)
n1:=outn(x,inn(xs,n),t46):1to(x)
b:=<n1>g1:cx
[o1:not(nxs)]
t47:=isoutni(x,inn(xs,n),t46(o),inn(xs,n),t46(o1),refis(nat,inn(xs,n))):is"e"(1to(x),n1(o),n1(o1))
t48:=isf(1to(x),cx,g1,n1(o),n1(o1),t47):is(b(o),b(o1))
f@a:=<<xo(xs)>f><<xo(x)>g1>q:cx
n@c:=ite"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u)):cx
[i:nxs]
t49:=itet"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),i):is(c,a)
o@t50:=itef"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),o):is(c,b)
f@g2:=[t:1to(xs)]c(t):[t:1to(xs)]cx
t51:=th3"l.imp"(is"e"(1to(xs),1o(xs),xo(xs)),is"n"(1,xs),symnotis(nat,xs,1,<x>ax3),[t:is"e"(1to(xs),1o(xs),xo(xs))]isoutne(xs,1,satz24a(xs),xs,lessisi3(xs),t)):not(is"e"(1to(xs),1o(xs),xo(xs)))
t52:=t50(1o(xs),t51):is(c(1o(xs)),b(1o(xs),t51))
t53:=isinoutn(xs,1,satz24a(xs)):is"n"(1,inn(xs,1o(xs)))
t54:=isoutni(x,1,satz24a(x),inn(xs,1o(xs)),t46(1o(xs),t51),t53):is"e"(1to(x),1o(x),n1(1o(xs),t51))
t55:=isf(1to(x),cx,g1,1o(x),n1(1o(xs),t51),t54):is(<1o(x)>g1,b(1o(xs),t51))
t56:=tris2(cx,c(1o(xs)),<1o(x)>g1,b(1o(xs),t51),t52,t55):is(c(1o(xs)),<1o(x)>g1)
t57:=tris(cx,c(1o(xs)),<1o(x)>g1,<1o(x)>f1,t56,t3(x,f1,g1,t45)):is(c(1o(xs)),<1o(x)>f1)
t58:=isinoutn(x,1,satz24a(x)):is"n"(1,inn(x,1o(x)))
t59:=isoutni(xs,1,satz24a(xs),inn(x,1o(x)),trlessis"n"(inn(x,1o(x)),x,xs,1top(x,1o(x)),lessisi1"n"(x,xs,satz18c(x))),t58):is"e"(1to(xs),1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)))
t60:=isf(1to(xs),cx,f,1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)),t59):is(<1o(xs)>f,<1o(x)>f1)
t61:=tris2(cx,c(1o(xs)),<1o(xs)>f,<1o(x)>f1,t57,t60):prop1(xs,f,g2)
o@[i:is"e"(1to(xs),ns(xs,n,o),xo(xs))]
t62:=isoutne(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),i):is"n"(<inn(xs,n)>suc,xs)
t63:=<t62><x><inn(xs,n)>ax4:is"n"(inn(xs,n),x)
t64:=isoutni(x,inn(xs,n),t46,x,lessisi3(x),t63):is"e"(1to(x),n1,xo(x))
t65:=isf(1to(x),cx,g1,xo(x),n1,symis(1to(x),n1,xo(x),t64)):is(<xo(x)>g1,b)
t66:=tris2(cx,<xo(x)>g1,c,b,t65,t50):is(<xo(x)>g1,c)
t67:=isf(cx,cx,[t:cx]<<xo(xs)>f><t>q,<xo(x)>g1,c,t66):is(a,<<xo(xs)>f><c>q)
t68:=isf(1to(xs),cx,f,xo(xs),ns(xs,n,o),symis(1to(xs),ns(xs,n,o),xo(xs),i)):is(<xo(xs)>f,<ns(xs,n,o)>f)
t69:=isf(cx,cx,<c>q,<xo(xs)>f,<ns(xs,n,o)>f,t68):is(<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q)
t70:=tr3is(cx,c(ns(xs,n,o)),a,<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q,t49(ns(xs,n,o),i),t67,t69):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
o@[o1:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))][i:is"e"(1to(x),n1,xo(x))]
t71:=isoutne(x,inn(xs,n),t46,x,lessisi3(x),i):is"n"(inn(xs,n),x)
t72:=ax2(inn(xs,n),x,t71):is"n"(<inn(xs,n)>suc,xs)
t73:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),t72):is"e"(1to(xs),ns(xs,n,o),xo(xs))
o1@t74:=th3"l.imp"(is"e"(1to(x),n1,xo(x)),is"e"(1to(xs),ns(xs,n,o),xo(xs)),o1,[t:is"e"(1to(x),n1,xo(x))]t73(t)):not(is"e"(1to(x),n1,xo(x)))
t75:=isinoutn(x,inn(xs,n),t46):is"n"(inn(xs,n),inn(x,n1))
t76:=ax2(inn(xs,n),inn(x,n1),t75):is"n"(<inn(xs,n)>suc,<inn(x,n1)>suc)
t77:=isinoutn(xs,<inn(xs,n)>suc,lemma275(xs,n,o)):is"n"(<inn(xs,n)>suc,inn(xs,ns(xs,n,o)))
t78:=tris1(nat,inn(xs,ns(xs,n,o)),<inn(x,n1)>suc,<inn(xs,n)>suc,t77,t76):is"n"(inn(xs,ns(xs,n,o)),<inn(x,n1)>suc)
t79:=isoutni(x,inn(xs,ns(xs,n,o)),t46(ns(xs,n,o),o1),<inn(x,n1)>suc,lemma275(x,n1,t74),t78):is"e"(1to(x),n1(ns(xs,n,o),o1),ns(n1,t74))
t80:=isf(1to(x),cx,g1,n1(ns(xs,n,o),o1),ns(n1,t74),t79):is(b(ns(xs,n,o),o1),<ns(n1,t74)>g1)
t81:=isinoutn(x,<inn(x,n1)>suc,lemma275(x,n1,t74)):is"n"(<inn(x,n1)>suc,inn(x,ns(n1,t74)))
t82:=tris(nat,<inn(xs,n)>suc,<inn(x,n1)>suc,inn(x,ns(n1,t74)),t76,t81):is"n"(<inn(xs,n)>suc,inn(x,ns(n1,t74)))
t83:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),inn(x,ns(n1,t74)),trlessis"n"(inn(x,ns(n1,t74)),x,xs,1top(x,ns(n1,t74)),lessisi1"n"(x,xs,satz18c(x))),t82):is"e"(1to(xs),ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)))
t84:=isf(1to(xs),cx,f,ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)),t83):is(<ns(xs,n,o)>f,<ns(n1,t74)>f1)
t85:=isf(cx,cx,<b>q,<ns(xs,n,o)>f,<ns(n1,t74)>f1,t84):is(<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q)
t86:=isf(cx,cx,[t:cx]<<ns(xs,n,o)>f><t>q,c,b,t50):is(<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q)
t87:=tr3is(cx,c(ns(xs,n,o)),b(ns(xs,n,o),o1),<ns(n1,t74)>g1,<<ns(n1,t74)>f1><b>q,t50(ns(xs,n,o),o1),t80,t4(f1,g1,t45,n1,t74)):is(c(ns(xs,n,o)),<<ns(n1,t74)>f1><b>q)
t88:=tris(cx,<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q,t86,t85):is(<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q)
t89:=tris2(cx,c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q,t87,t88):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
o@t90:=th1"l.imp"(is"e"(1to(xs),ns(xs,n,o),xo(xs)),is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q),[t:is"e"(1to(xs),ns(xs,n,o),xo(xs))]t70(t),[t:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))]t89(t)):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
f@t91:=[t:1to(xs)][u:not(nxs(t))]t90(t,u):prop2(xs,f,g2)
t92:=andi(prop1(xs,f,g2),prop2(xs,f,g2),t61,t91):recprop(xs,f,g2)
t93:=somei([t:1to(xs)]cx,[g:[t:1to(xs)]cx]recprop(xs,f,g),g2,t92):prop6(xs,f)
p@t94:=[f:[t:1to(xs)]cx]t93(f):prop7(xs)
x@t95:=induction([y:nat]prop7(y),t43,[y:nat][t:prop7(y)]t94(y,t),x):prop7(x)
[f:[t:1to(x)]cx]
t96:=<f>t95:prop6(x,f)
t97:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f,g)][v:recprop(x,f,h)]t37(f,g,h,u,v),t96):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
-8275
f@satz275:=t97".8275"(f):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
recf:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):[t:1to(x)]cx
satz275a:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):recprop(x,f,recf)
[n:1to(x)]
rec:=<n>recf:cx
f@satz275b:=t3".8275"(x,f,recf,satz275a):is(rec(1out(x)),<1out(x)>f)
n@[o:not(is"e"(1to(x),n,xout(x)))]
sucx:=ns".8275"(n,o):1to(x)
satz275c:=t4".8275"(x,f,recf,satz275a,n,o):is(rec(sucx(n,o)),<<sucx(n,o)>f><rec(n)>q)
f@[g:[t:1to(x)]cx][r:recprop(x,f,g)]
satz275d:=t37".8275"(x,f,g,recf,r,satz275a):is"e"([t:1to(x)]cx,g,recf)
[n:1to(x)]
satz275e:=fise(1to(x),cx,g,recf,satz275d,n):is(<n>g,rec(n))
x@[y:nat]
+*8275
y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
fl:=left(cx,x,y,l,f):[t:1to(y)]cx
rf:=recf(x,f):[t:1to(x)]cx
rfl:=left(cx,x,y,l,rf):[t:1to(y)]cx
t98:=isinoutn(y,1,satz24a(y)):is"n"(1,inn(y,1out(y)))
t99:=isoutni(x,1,satz24a(x),inn(y,1out(y)),trlessis"n"(inn(y,1out(y)),y,x,1top(y,1out(y)),l),t98):is"e"(1to(x),1out(x),left1to(x,y,l,1out(y)))
t100:=isp(1to(x),[t:1to(x)]is(<t>rf,<t>f),1out(x),left1to(x,y,l,1out(y)),t3(x,f,rf,satz275a(x,f)),t99):prop1(y,fl,rfl)
[n:1to(y)][o:not(is"e"(1to(y),n,xout(y)))]
t100a:=th3"l.imp"(is"n"(inn(y,n),y),is"e"(1to(y),n,xout(y)),o,[t:is"n"(inn(y,n),y)]tris(1to(y),n,outn(y,inn(y,n),1top(y,n)),xout(y),isoutinn(y,n),isoutni(y,inn(y,n),1top(y,n),y,lessisi3(y),t))):not(is"n"(inn(y,n),y))
t100b:=ore1(less"n"(inn(y,n),y),is"n"(inn(y,n),y),1top(y,n),t100a):less"n"(inn(y,n),y)
t101:=satz16b(inn(y,n),y,x,t100b,l):less"n"(inn(y,n),x)
t102:=ec3e31(is"n"(inn(y,n),x),more"n"(inn(y,n),x),less"n"(inn(y,n),x),satz10b(inn(y,n),x),t101):nis"n"(inn(y,n),x)
t103:=th3"l.imp"(is"e"(1to(x),left1to(x,y,l,n),xout(x)),is"n"(inn(y,n),x),t102,[t:is"e"(1to(x),left1to(x,y,l,n),xout(x))]isoutne(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l),x,lessisi3(x),t)):not(is"e"(1to(x),left1to(x,y,l,n),xout(x)))
t104:=t4(x,f,rf,satz275a(x,f),left1to(x,y,l,n),t103):is(<ns(x,left1to(x,y,l,n),t103)>rf,<<ns(x,left1to(x,y,l,n),t103)>f><<n>rfl>q)
t105:=isinoutn(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l)):is"n"(inn(y,n),inn(x,left1to(x,y,l,n)))
t106:=ax2(inn(y,n),inn(x,left1to(x,y,l,n)),t105):is"n"(<inn(y,n)>suc,<inn(x,left1to(x,y,l,n))>suc)
t107:=isinoutn(y,<inn(y,n)>suc,lemma275(y,n,o)):is"n"(<inn(y,n)>suc,inn(y,ns(y,n,o)))
t108:=tris1(nat,<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)),<inn(y,n)>suc,t106,t107):is"n"(<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)))
t109:=isoutni(x,<inn(x,left1to(x,y,l,n))>suc,lemma275(x,left1to(x,y,l,n),t103),inn(y,ns(y,n,o)),trlessis"n"(inn(y,ns(y,n,o)),y,x,1top(y,ns(y,n,o)),l),t108):is"e"(1to(x),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)))
t110:=isp(1to(x),[t:1to(x)]is(<t>rf,<<t>f><<n>rfl>q),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)),t104,t109):is(<ns(y,n,o)>rfl,<<ns(y,n,o)>fl><<n>rfl>q)
f@t111:=[t:1to(y)][u:not(is"e"(1to(y),t,xout(y)))]t110(t,u):prop2(y,fl,rfl)
t112:=andi(prop1(y,fl,rfl),prop2(y,fl,rfl),t100,t111):recprop(y,fl,rfl)
-8275
y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
satz275f:=satz275d(y,fl".8275"(l,f),rfl".8275"(l,f),t112".8275"(l,f)):is"e"([t:1to(y)]cx,left(cx,x,y,l,recf(x,f)),recf(y,left(cx,x,y,l,f)))
x@[f:[t:1to(pl"n"(x,1))]cx]
+8276
xs:=<x>suc:nat
x1:=pl"n"(x,1):nat
t1:=lessisi1"n"(x,x1,satz18a(x,1)):lessis"n"(x,x1)
t2:=lessisi1"n"(x,xs,satz18c(x)):lessis"n"(x,xs)
t3:=lessisi2"n"(xs,x1,satz4e(x)):lessis"n"(xs,x1)
fx:=left(cx,x1,x,t1,f):[t:1to(x)]cx
f1:=left(cx,x1,xs,t3,f):[t:1to(xs)]cx
f1x:=f1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
g1:=g2"c.8275"(x,t95"c.8275"(x),f1):[t:1to(xs)]cx
g1x:=g1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
g:=left(cx,x1,xs,t3,recf(x1,f)):[t:1to(xs)]cx
t4:=t49"c.8275"(x,t95"c.8275"(x),f1,xout(xs),refis(1to(xs),xout(xs))):is(<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q)
t5:=satz275d(xs,f1,g1,t92"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(xs)]cx,g1,recf(xs,f1))
t6:=satz275f(x1,xs,t3,f):is"e"([t:1to(xs)]cx,g,recf(xs,f1))
t7:=tris2([t:1to(xs)]cx,g,g1,recf(xs,f1),t6,t5):is"e"([t:1to(xs)]cx,g,g1)
t8:=fise(1to(xs),cx,g,g1,t7,xout(xs)):is(<xout(xs)>g,<xout(xs)>g1)
t9:=tris(cx,<xout(xs)>g,<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q,t8,t4):is(<xout(xs)>g,<<xout(xs)>f1><<xout(x)>g1x>q)
[n:1to(x)]
t10:=isinoutn(xs,inn(x,n),trlessis"n"(inn(x,n),x,xs,1top(x,n),t2)):is"n"(inn(x,n),inn(xs,left1to(xs,x,t2,n)))
t11:=isoutni(x1,inn(x,n),trlessis"n"(inn(x,n),x,x1,1top(x,n),t1),inn(xs,left1to(xs,x,t2,n)),trlessis"n"(inn(xs,left1to(xs,x,t2,n)),xs,x1,1top(xs,left1to(xs,x,t2,n)),t3),t10):is"e"(1to(x1),left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)))
t12:=isf(1to(x1),cx,f,left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)),t11):is(<n>fx,<n>f1x)
f@t13:=fisi(1to(x),cx,fx,f1x,[t:1to(x)]t12(t)):is"e"([t:1to(x)]cx,fx,f1x)
t14:=isf([t:1to(x)]cx,[t:1to(x)]cx,[u:[t:1to(x)]cx]recf(x,u),fx,f1x,t13):is"e"([t:1to(x)]cx,recf(x,fx),recf(x,f1x))
t15:=satz275d(x,f1x,g1x,t45"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(x)]cx,g1x,recf(x,f1x))
t16:=tris2([t:1to(x)]cx,g1x,recf(x,fx),recf(x,f1x),t15,t14):is"e"([t:1to(x)]cx,g1x,recf(x,fx))
t17:=fise(1to(x),cx,g1x,recf(x,fx),t16,xout(x)):is(<xout(x)>g1x,<xout(x)>recf(x,fx))
t18:=isinoutn(xs,xs,lessisi3(xs)):is"n"(xs,inn(xs,xout(xs)))
t19:=tris(nat,x1,xs,inn(xs,xout(xs)),satz4a(x),t18):is"n"(x1,inn(xs,xout(xs)))
t20:=isoutni(x1,x1,lessisi3(x1),inn(xs,xout(xs)),trlessis"n"(inn(xs,xout(xs)),xs,x1,1top(xs,xout(xs)),t3),t19):is"e"(1to(x1),xout(x1),left1to(x1,xs,t3,xout(xs)))
t21:=isp1(1to(x1),[t:1to(x1)]is(<t>recf(x1,f),<<t>f><<xout(x)>g1x>q),left1to(x1,xs,t3,xout(xs)),xout(x1),t9,t20):is(<xout(x1)>recf(x1,f),<<xout(x1)>f><<xout(x)>g1x>q)
t22:=isf(cx,cx,[t:cx]<<xout(x1)>f><t>q,<xout(x)>g1x,<xout(x)>recf(x,fx),t17):is(<<xout(x1)>f><<xout(x)>g1x>q,<<xout(x1)>f><<xout(x)>recf(x,fx)>q)
-8276
satz276:=tris(cx,<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>g1x".8276">q,<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,fx".8276")>q,t21".8276",t22".8276"):is(<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
x@[f:[u:1to(x)]cx]
smpr:=rec(x,f,xout(x)):cx
@[x:nat][f:[u:1to(x)]cx]
sum:=smpr([t:cx][u:cx]pl(t,u),x,f):cx
prod:=smpr([t:cx][u:cx]ts(t,u),x,f):cx
q@[f:[u:1to(1)]cx]
+8277
t1:=isoutni(1,1,satz24a(1),1,lessisi3(1),refis(nat,1)):is"e"(1to(1),1out(1),xout(1))
-8277
satz277:=isp(1to(1),[t:1to(1)]is(rec(1,f,t),<t>f),1out(1),xout(1),satz275b(1,f),t1".8277"):is(smpr(1,f),<xout(1)>f)
q@[x:nat][f:[u:1to(pl"n"(x,1))]cx]
satz278:=satz276(x,f):is(smpr(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><smpr(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
x@[f:[u:1to(x)]cx][y:nat][i:is"n"(y,x)]
+v8
t1:=lessisi2"n"(y,x,i):lessis"n"(y,x)
f0:=left(cx,x,y,t1,f):[t:1to(y)]cx
t2:=fise(1to(y),cx,left(cx,x,y,t1,recf(x,f)),recf(y,f0),satz275f(x,y,t1,f),xout(y)):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(y,f0))
t3:=tris1(nat,inn(y,xout(y)),x,y,isinoutn(y,y,lessisi3(y)),i):is"n"(inn(y,xout(y)),x)
t4:=isoutni(x,inn(y,xout(y)),trlessis"n"(inn(y,xout(y)),y,x,1top(y,xout(y)),t1),x,lessisi3(x),t3):is"e"(1to(x),left1to(x,y,t1,xout(y)),xout(x))
t5:=isf(1to(x),cx,recf(x,f),left1to(x,y,t1,xout(y)),xout(x),t4):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(x,f))
-v8
issmpr:=tris1(cx,smpr(y,f0".v8"),smpr(x,f),<left1to(x,y,t1".v8",xout(y))>recf(x,f),t2".v8",t5".v8"):is(smpr(y,left(cx,x,y,lessisi2"n"(y,x,i),f)),smpr(x,f))
@[z:complex][x:nat]
+8279
xr:=rlofnt(x):real
prop1:=is(sum(x,[t:1to(x)]z),ts(z,pli(xr,0))):'prop'
z@t1:=satz277([t:cx][u:cx]pl(t,u),[t:1to(1)]z):is(sum(1,[t:1to(1)]z),z)
t2:=tris(cx,sum(1,[t:1to(1)]z),z,ts(z,1c),t1,satz222a(z)):prop1(1)
x@[p:prop1(x)]
t3:=satz278([t:cx][u:cx]pl(t,u),x,[t:1to(pl"n"(x,1))]z):is(sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z))
t4:=ispl12(sum(x,[t:1to(x)]z),ts(z,pli(xr,0)),z,ts(z,1c),p,satz222a(z)):is(pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)))
t5:=distpt2(z,pli(xr,0),1c):is(pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)))
t6:=plis12a(xr,0,1rl,0):is(pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)))
t7:=isrecx12(pl"r"(xr,1rl),rlofnt(pl"n"(x,1)),pl"r"(0,0),0,satzr155b(x,1),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0))
t8:=tris(cx,pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0),t6,t7):is(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0))
t9:=ists2(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0),z,t8):is(ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)))
t10:=tr4is(cx,sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)),t3,t4,t5,t9):prop1(pl"n"(x,1))
t11:=isp(nat,[t:nat]prop1(t),pl"n"(x,1),<x>suc,t10,satz4a(x)):prop1(<x>suc)
-8279
satz279:=induction([t:nat]prop1".8279"(t),t2".8279",[u:nat][t:prop1".8279"(u)]t11".8279"(u,t),x):is(sum(x,[t:1to(x)]z),ts(z,pli(rlofnt(x),0)))
q@[f:[t:1to(2)]cx]
+8280
t1:=lessisi1"n"(1,2,satz18a(1,1)):lessis"n"(1,2)
f1:=left(cx,2,1,t1,f):[t:1to(1)]cx
t2:=satz278(q,1,f):is(smpr(2,f),<<xout(2)>f><smpr(1,f1)>q)
t3:=satz277(q,f1):is(smpr(1,f1),<xout(1)>f1)
t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
t5:=isoutni(2,1,satz24a(2),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,2,1top(1,xout(1)),t1),t4):is"e"(1to(2),1out(2),left1to(2,1,t1,xout(1)))
t6:=isf(1to(2),cx,f,1out(2),left1to(2,1,t1,xout(1)),t5):is(<1out(2)>f,<xout(1)>f1)
t7:=tris2(cx,smpr(1,f1),<1out(2)>f,<xout(1)>f1,t3,t6):is(smpr(1,f1),<1out(2)>f)
t8:=isf(cx,cx,[t:cx]<<xout(2)>f><t>q,smpr(1,f1),<1out(2)>f,t7):is(<<xout(2)>f><smpr(1,f1)>q,<<xout(2)>f><<1out(2)>f>q)
-8280
satz280:=tris(cx,smpr(2,f),<<xout(2)>f><smpr(1,f1".8280")>q,<<xout(2)>f><<1out(2)>f>q,t2".8280",t8".8280"):is(smpr(2,f),<<xout(2)>f><<1out(2)>f>q)
q@assoc:=[x:cx][y:cx][z:cx]is(<z><<y><x>q>q,<<z><y>q><x>q):'prop'
@assocp1:=[x:cx][y:cx][z:cx]asspl1(x,y,z):assoc([x:cx][y:cx]pl(x,y))
assocts:=[x:cx][y:cx][z:cx]assts1(x,y,z):assoc([x:cx][y:cx]ts(x,y))
q@[a:assoc][z:cx][u:cx][v:cx]
assq1:=<v><u><z>a:is(<v><<u><z>q>q,<<v><u>q><z>q)
assq2:=symis(cx,<v><<u><z>q>q,<<v><u>q><z>q,assq1):is(<<v><u>q><z>q,<v><<u><z>q>q)
q@[a:assoc(q)][x:nat][y:nat][f:[t:1to(pl"n"(x,y))]cx]
+8281
y@t1:=lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)):lessis"n"(x,pl"n"(x,y))
f@f1:=left(cx,pl"n"(x,y),x,t1,f):[t:1to(x)]cx
f2:=right(cx,x,y,f):[t:1to(y)]cx
prop1:=is(smpr(pl"n"(x,y),f),<smpr(y,f2)><smpr(x,f1)>q):'prop'
y@prop2:=all"l"([t:1to(pl"n"(x,y))]cx,[u:[t:1to(pl"n"(x,y))]cx]prop1(u)):'prop'
x@[f0:[t:1to(pl"n"(x,1))]cx]
t2:=satz278(q,x,f0):is(smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q)
t3:=satz277(q,f2(1,f0)):is(smpr(1,f2(1,f0)),<xout(1)>f2(1,f0))
t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
t5:=ispl2"n"(1,inn(1,xout(1)),x,t4):is"n"(pl"n"(x,1),pl"n"(x,inn(1,xout(1))))
t6:=isoutni(pl"n"(x,1),pl"n"(x,1),lessisi3(pl"n"(x,1)),pl"n"(x,inn(1,xout(1))),satz19o(inn(1,xout(1)),1,x,1top(1,xout(1))),t5):is"e"(1to(pl"n"(x,1)),xout(pl"n"(x,1)),right1to(x,1,xout(1)))
t7:=isf(1to(pl"n"(x,1)),cx,f0,xout(pl"n"(x,1)),right1to(x,1,xout(1)),t6):is(<xout(pl"n"(x,1))>f0,<xout(1)>f2(1,f0))
t8:=tris2(cx,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),<xout(1)>f2(1,f0),t7,t3):is(<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)))
t9:=isf(cx,cx,<smpr(x,f1(1,f0))>q,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),t8):is(<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q)
t10:=tris(cx,smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q,t2,t9):prop1(1,f0)
x@t11:=[u:[t:1to(pl"n"(x,1))]cx]t10(u):prop2(1)
y@yp1:=pl"n"(y,1):nat
xpy:=pl"n"(x,y):nat
xpy1:=pl"n"(x,yp1):nat
xyp1:=pl"n"(xpy,1):nat
t12:=lessisi2"n"(xyp1,xpy1,asspl1"n"(x,y,1)):lessis"n"(xyp1,xpy1)
[p:prop2(y)][f:[t:1to(xpy1)]cx]
t13:=isinoutn(xyp1,xyp1,lessisi3(xyp1)):is"n"(xyp1,inn(xyp1,xout(xyp1)))
t14:=tris(nat,xpy1,xyp1,inn(xyp1,xout(xyp1)),asspl2"n"(x,y,1),t13):is"n"(xpy1,inn(xyp1,xout(xyp1)))
t15:=isoutni(xpy1,xpy1,lessisi3(xpy1),inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),t14):is"e"(1to(xpy1),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)))
t16:=isf(1to(xpy1),cx,recf(xpy1,f),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),t15):is(smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)))
fr:=left(cx,xpy1,xyp1,t12,f):[t:1to(xyp1)]cx
t17:=satz275f(xpy1,xyp1,t12,f):is"e"([t:1to(xyp1)]cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr))
t18:=fise(1to(xyp1),cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr),t17,xout(xyp1)):is(<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr))
t19:=lessisi1"n"(xpy,xyp1,satz18a(xpy,1)):lessis"n"(xpy,xyp1)
frr:=left(cx,xyp1,xpy,t19,fr):[t:1to(xpy)]cx
t20:=satz278(xpy,fr):is(smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q)
t21:=isf(cx,cx,[u:cx]<<xout(xyp1)>fr><u>q,smpr(xpy,frr),<smpr(y,f2(frr))><smpr(x,f1(frr))>q,<frr>p):is(<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
t22:=assq1(a,smpr(x,f1(frr)),smpr(y,f2(frr)),<xout(xyp1)>fr):is(<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q)
t23:=lessisi1"n"(y,yp1,satz18a(y,1)):lessis"n"(y,yp1)
fy:=left(cx,yp1,y,t23,f2(yp1,f)):[t:1to(y)]cx
t24:=satz278(y,f2(yp1,f)):is(smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
t25:=isinoutn(yp1,yp1,lessisi3(yp1)):is"n"(yp1,inn(yp1,xout(yp1)))
t26:=ispl2"n"(yp1,inn(yp1,xout(yp1)),x,t25):is"n"(xpy1,pl"n"(x,inn(yp1,xout(yp1))))
t27:=tris1(nat,inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))),xpy1,t14,t26):is"n"(inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))))
t28:=isoutni(xpy1,inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),pl"n"(x,inn(yp1,xout(yp1))),satz19o(inn(yp1,xout(yp1)),yp1,x,1top(yp1,xout(yp1))),t27):is"e"(1to(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)))
t29:=isf(1to(xpy1),cx,f,left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)),t28):is(<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f))
t30:=isf(cx,cx,<smpr(y,f2(frr))>q,<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f),t29):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q)
[n:1to(y)]
n0:=inn(y,n):nat
nyp1:=left1to(yp1,y,t23,n):1to(yp1)
t31:=isinoutn(yp1,n0,trlessis"n"(n0,y,yp1,1top(y,n),t23)):is"n"(n0,inn(yp1,nyp1))
t32:=ispl2"n"(n0,inn(yp1,nyp1),x,t31):is"n"(pl"n"(x,n0),pl"n"(x,inn(yp1,nyp1)))
nxpy:=right1to(x,y,n):1to(xpy)
nxyp1:=left1to(xyp1,xpy,t19,nxpy):1to(xyp1)
t33:=isinoutn(xyp1,inn(xpy,nxpy),trlessis"n"(inn(xpy,nxpy),xpy,xyp1,1top(xpy,nxpy),t19)):is"n"(inn(xpy,nxpy),inn(xyp1,nxyp1))
t34:=isinoutn(xpy,pl"n"(x,n0),satz19o(n0,y,x,1top(y,n))):is"n"(pl"n"(x,n0),inn(xpy,nxpy))
t35:=tris(nat,pl"n"(x,n0),inn(xpy,nxpy),inn(xyp1,nxyp1),t34,t33):is"n"(pl"n"(x,n0),inn(xyp1,nxyp1))
t36:=tris1(nat,pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1),pl"n"(x,n0),t32,t35):is"n"(pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1))
t37:=isoutni(xpy1,pl"n"(x,inn(yp1,nyp1)),satz19o(inn(yp1,nyp1),yp1,x,1top(yp1,nyp1)),inn(xyp1,nxyp1),trlessis"n"(inn(xyp1,nxyp1),xyp1,xpy1,1top(xyp1,nxyp1),t12),t36):is"e"(1to(xpy1),right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1))
t38:=isf(1to(xpy1),cx,f,right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1),t37):is(<n>fy,<n>f2(frr))
f@t39:=fisi(1to(y),cx,fy,f2(frr),[u:1to(y)]t38(u)):is"e"([u:1to(y)]cx,fy,f2(frr))
t40:=isf([u:1to(y)]cx,cx,[t:[u:1to(y)]cx]smpr(y,t),fy,f2(frr),t39):is(smpr(y,fy),smpr(y,f2(frr)))
t41:=isf(cx,cx,[t:cx]<<xout(yp1)>f2(yp1,f)><t>q,smpr(y,f2(frr)),smpr(y,fy),symis(cx,smpr(y,fy),smpr(y,f2(frr)),t40)):is(<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
t41a:=tris(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t30,t41):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
t42:=tris2(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t41a,t24):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)))
t43:=isf(cx,cx,<smpr(x,f1(frr))>q,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),t42):is(<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q)
[m:1to(x)]
m0:=inn(x,m):nat
mxpy:=left1to(xpy,x,t1,m):1to(xpy)
mxyp1:=left1to(xyp1,xpy,t19,mxpy):1to(xyp1)
t44:=isinoutn(xyp1,inn(xpy,mxpy),trlessis"n"(inn(xpy,mxpy),xpy,xyp1,1top(xpy,mxpy),t19)):is"n"(inn(xpy,mxpy),inn(xyp1,mxyp1))
t45:=isinoutn(xpy,m0,trlessis"n"(m0,x,xpy,1top(x,m),t1)):is"n"(m0,inn(xpy,mxpy))
t46:=tris(nat,m0,inn(xpy,mxpy),inn(xyp1,mxyp1),t45,t44):is"n"(m0,inn(xyp1,mxyp1))
t47:=isoutni(xpy1,m0,trlessis"n"(m0,x,xpy1,1top(x,m),t1(yp1)),inn(xyp1,mxyp1),trlessis"n"(inn(xyp1,mxyp1),xyp1,xpy1,1top(xyp1,mxyp1),t12),t46):is"e"(1to(xpy1),left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1))
t48:=isf(1to(xpy1),cx,f,left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1),t47):is(<m>f1(x,yp1,f),<m>f1(x,y,frr))
f@t49:=fisi(1to(x),cx,f1(x,yp1,f),f1(x,y,frr),[u:1to(x)]t48(u)):is"e"([u:1to(x)]cx,f1(x,yp1,f),f1(x,y,frr))
t50:=isf([u:1to(x)]cx,cx,[t:[u:1to(x)]cx]smpr(x,t),f1(yp1,f),f1(frr),t49):is(smpr(x,f1(yp1,f)),smpr(x,f1(frr)))
t51:=isf(cx,cx,[t:cx]<smpr(yp1,f2(yp1,f))><t>q,smpr(x,f1(frr)),smpr(x,f1(yp1,f)),symis(cx,smpr(x,f1(yp1,f)),smpr(x,f1(frr)),t50)):is(<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q)
t52:=tr4is(cx,smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,t16,t18,t20,t21):is(smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
t53:=tr4is(cx,smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q,t52,t22,t43,t51):prop1(yp1,f)
p@t54:=[u:[t:1to(xpy1)]cx]t53(u):prop2(yp1)
t55:=isp(nat,[t:nat]prop2(t),yp1,<y>suc,t54,satz4a(y)):prop2(<y>suc)
y@t56:=induction([t:nat]prop2(t),t11,[z:nat][t:prop2(z)]t55(z,t),y):prop2(y)
-8281
satz281:=<f>t56".8281":is(smpr(pl"n"(x,y),f),<smpr(y,right(cx,x,y,f))><smpr(x,left(cx,pl"n"(x,y),x,lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)),f))>q)
q@commut:=[x:cx][y:cx]is(<y><x>q,<x><y>q):'prop'
@commutpl:=[x:cx][y:cx]compl(x,y):commut([x:cx][y:cx]pl(x,y))
commutts:=[x:cx][y:cx]comts(x,y):commut([x:cx][y:cx]ts(x,y))
q@[c:commut][z:cx][u:cx]
comq:=<u><z>c:is(<u><z>q,<z><u>q)
a@[c:commut(q)][x:nat][f:[t:1to(x)]cx][g:[t:1to(x)]cx]
+8282
prop1:=is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q):'prop'
x@prop2:=all"l"([t:1to(x)]cx,[u:[t:1to(x)]cx]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]prop1(u,v))):'prop'
c@[f0:[t:1to(1)]cx][g0:[t:1to(1)]cx]
t1:=satz277([t:1to(1)]<<t>g0><<t>f0>q):is(smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<<xout(1)>g0><<xout(1)>f0>q)
t2:=isf(cx,cx,<smpr(1,f0)>q,smpr(1,g0),<xout(1)>g0,satz277(g0)):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q)
t3:=isf(cx,cx,[t:cx]<<xout(1)>g0><t>q,smpr(1,f0),<xout(1)>f0,satz277(f0)):is(<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
t4:=tris(cx,<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t2,t3):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
t5:=tris2(cx,smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t1,t4):prop1(1,f0,g0)
c@t6:=[u:[t:1to(1)]cx][v:[t:1to(1)]cx]t5(u,v):prop2(1)
x@xp1:=pl"n"(x,1):nat
[p:prop2(x)][f:[t:1to(xp1)]cx][g:[t:1to(xp1)]cx]
c@[u:cx][v:cx][w:cx][z:cx]
t7:=assq2(a,<v><u>q,w,z):is(<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q)
t8:=comq(c,<v><u>q,w):is(<w><<v><u>q>q,<<v><u>q><w>q)
t9:=assq2(a,w,u,v):is(<<v><u>q><w>q,<v><<u><w>q>q)
t10:=tris(cx,<w><<v><u>q>q,<<v><u>q><w>q,<v><<u><w>q>q,t8,t9):is(<w><<v><u>q>q,<v><<u><w>q>q)
t11:=isf(cx,cx,[t:cx]<z><t>q,<w><<v><u>q>q,<v><<u><w>q>q,t10):is(<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q)
t12:=assq1(a,<u><w>q,v,z):is(<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q)
t13:=comq(c,w,u):is(<u><w>q,<w><u>q)
t14:=isf(cx,cx,[t:cx]<<z><v>q><t>q,<u><w>q,<w><u>q,t13):is(<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q)
t15:=tr4is(cx,<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q,t7,t11,t12,t14):is(<<z><w>q><<v><u>q>q,<<z><v>q><<w><u>q>q)
g@t16:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
sfx:=smpr(x,left(cx,xp1,x,t16,f)):cx
sgx:=smpr(x,left(cx,xp1,x,t16,g)):cx
h:=[t:1to(xp1)]<<t>g><<t>f>q:[t:1to(xp1)]cx
shx:=smpr(x,left(cx,xp1,x,t16,h)):cx
t17:=satz278(x,h):is(smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q)
t18:=<left(cx,xp1,x,t16,g)><left(cx,xp1,x,t16,f)>p:is(shx,<sgx><sfx>q)
t19:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><<xout(xp1)>f>q><t>q,shx,<sgx><sfx>q,t18):is(<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q)
t20:=t15(sfx,sgx,<xout(xp1)>f,<xout(xp1)>g):is(<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
t21:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><sfx>q,satz278(x,f)):is(<<xout(xp1)>f><sfx>q,smpr(xp1,f))
t22:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><sgx>q><t>q,<<xout(xp1)>f><sfx>q,smpr(xp1,f),t21):is(<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q)
t23:=symis(cx,smpr(xp1,g),<<xout(xp1)>g><sgx>q,satz278(x,g)):is(<<xout(xp1)>g><sgx>q,smpr(xp1,g))
t24:=isf(cx,cx,<smpr(xp1,f)>q,<<xout(xp1)>g><sgx>q,smpr(xp1,g),t23):is(<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q)
t25:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,t17,t19,t20):is(smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
t26:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q,t25,t22,t24):prop1(xp1,f,g)
p@t27:=[u:[t:1to(xp1)]cx][v:[t:1to(xp1)]cx]t26(u,v):prop2(xp1)
t28:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t27,satz4a(x)):prop2(<x>suc)
x@t29:=induction([t:nat]prop2(t),t6,[y:nat][t:prop2(y)]t28(y,t),x):prop2(x)
-8282
satz282:=<g><f>t29".8282":is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q)
x@[s:[t:1to(x)]1to(x)][b:bijective(1to(x),1to(x),s)][f:[t:1to(x)]cx]
+8283
s@[f:[t:1to(x)]cx]
g:=[t:1to(x)]<<t>s>f:[t:1to(x)]cx
prop1:=is(smpr(x,g),smpr(x,f)):'prop'
x@prop2:=all"l"([t:1to(x)]1to(x),[u:[t:1to(x)]1to(x)]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]imp(bijective(1to(x),1to(x),u),prop1(u,v)))):'prop'
c@[s:[t:1to(1)]1to(1)][f:[t:1to(1)]cx]
t1:=tris2(1to(1),<xout(1)>s,xout(1),1o"n",th1"n.singlet"(<xout(1)>s),th1"n.singlet"(xout(1))):is"e"(1to(1),<xout(1)>s,xout(1))
t2:=satz277(g(1,s,f)):is(smpr(1,g(1,s,f)),<xout(1)>g(1,s,f))
t3:=isf(1to(1),cx,f,<xout(1)>s,xout(1),t1):is(<xout(1)>g(1,s,f),<xout(1)>f)
t4:=symis(cx,smpr(1,f),<xout(1)>f,satz277(f)):is(<xout(1)>f,smpr(1,f))
t5:=tr3is(cx,smpr(1,g(1,s,f)),<xout(1)>g(1,s,f),<xout(1)>f,smpr(1,f),t2,t3,t4):prop1(1,s,f)
c@t6:=[u:[t:1to(1)]1to(1)][v:[t:1to(1)]cx][w:bijective(1to(1),1to(1),u)]t5(u,v):prop2(1)
x@xp1:=pl"n"(x,1):nat
t7:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
[p:prop2(x)][s:[t:1to(xp1)]1to(xp1)][f:[t:1to(xp1)]cx][b:bijective(1to(xp1),1to(xp1),s)]
t8:=ande1(injective(1to(xp1),1to(xp1),s),surjective(1to(xp1),1to(xp1),s),b):injective(1to(xp1),1to(xp1),s)
[case1:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))][u:1to(x)]
u1:=left1to(xp1,x,t7,u):1to(xp1)
n1:=inn(xp1,<u1>s):nat
[i:is"n"(n1,xp1)]
t9:=tr3is(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),xout(xp1),<xout(xp1)>s,isoutinn(xp1,<u1>s),isoutni(xp1,n1,1top(xp1,<u1>s),xp1,lessisi3(xp1),i),symis(1to(xp1),<xout(xp1)>s,xout(xp1),case1)):is"e"(1to(xp1),<u1>s,<xout(xp1)>s)
t10:=isfe(1to(xp1),1to(xp1),s,t8,u1,xout(xp1),t9):is"e"(1to(xp1),u1,xout(xp1))
t11:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t10):is"n"(inn(x,u),xp1)
t12:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
t13:=<t11>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t12):con
u@t14:=ore1(less"n"(n1,xp1),is"n"(n1,xp1),1top(xp1,<u1>s),[t:is"n"(n1,xp1)]t13(t)):less"n"(n1,xp1)
t15:=satz26(x,n1,t14):lessis"n"(n1,x)
w1:=outn(x,n1,t15):1to(x)
case1@s01:=[t:1to(x)]w1(t):[t:1to(x)]1to(x)
u@[v:1to(x)][i:is"e"(1to(x),w1(u),w1(v))]
t16:=isoutne(x,n1(u),t15(u),n1(v),t15(v),i):is"n"(n1(u),n1(v))
t17:=<isinne(xp1,<u1(u)>s,<u1(v)>s,t16)><u1(v)><u1(u)>t8:is"e"(1to(xp1),u1(u),u1(v))
t18:=thleft1(xp1,x,t7,u,v,t17):is"e"(1to(x),u,v)
u@u2:=<u1>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
n2:=inn(xp1,u2):nat
[i:is"n"(n2,xp1)]
t19:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),xout(xp1),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),xp1,lessisi3(xp1),i)):is"e"(1to(xp1),u2,xout(xp1))
t20:=tr3is(1to(xp1),u1,<u2>s,<xout(xp1)>s,xout(xp1),thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,xout(xp1),t19),case1):is"e"(1to(xp1),u1,xout(xp1))
t21:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t20):is"n"(inn(x,u),xp1)
t22:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
t23:=<t21>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t22):con
u@t24:=ore1(less"n"(n2,xp1),is"n"(n2,xp1),1top(xp1,u2),[t:is"n"(n2,xp1)]t23(t)):less"n"(n2,xp1)
t25:=satz26(x,n2,t24):lessis"n"(n2,x)
w2:=outn(x,n2,t25):1to(x)
t26:=isinoutn(x,n2,t25):is"n"(n2,inn(x,w2))
t27:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),u1(w2),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),inn(x,w2),trlessis"n"(inn(x,w2),x,xp1,1top(x,w2),t7),t26)):is"e"(1to(xp1),u2,u1(w2))
t28:=tris(1to(xp1),u1,<u2>s,<u1(w2)>s,thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,u1(w2),t27)):is"e"(1to(xp1),u1,<u1(w2)>s)
t29:=tris(nat,inn(x,u),inn(xp1,u1),n1(w2),isinoutn(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7)),isinni(xp1,u1,<u1(w2)>s,t28)):is"n"(inn(x,u),n1(w2))
t30:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w1(w2),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),n1(w2),t15(w2),t29)):is"e"(1to(x),u,w1(w2))
t31:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w1(t)),w2,t30):image(1to(x),1to(x),s01,u)
case1@t32:=andi(injective(1to(x),1to(x),s01),surjective(1to(x),1to(x),s01),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s01,<u>s01)]t18(t,u,v),[t:1to(x)]t31(t)):bijective(1to(x),1to(x),s01)
f01:=left(cx,xp1,x,t7,f):[t:1to(x)]cx
t33:=<t32><f01><s01>p:prop1(s01,f01)
g1:=left(cx,xp1,x,t7,g(xp1,s,f)):[t:1to(x)]cx
g2:=g(x,s01,f01):[t:1to(x)]cx
u@t33a:=isoutinn(xp1,<u1>s):is"e"(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)))
t34:=isinoutn(x,n1,t15):is"n"(n1,inn(x,w1))
t35:=isoutni(xp1,n1,1top(xp1,<u1>s),inn(x,w1),trlessis"n"(inn(x,w1),x,xp1,1top(x,w1),t7),t34):is"e"(1to(xp1),outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1))
t36:=tris(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1),t33a,t35):is"e"(1to(xp1),<u1>s,left1to(xp1,x,t7,w1))
t37:=isf(1to(xp1),cx,f,<u1>s,left1to(xp1,x,t7,w1),t36):is(<u>g1,<u>g2)
case1@t38:=fisi(1to(x),cx,g1,g2,[t:1to(x)]t37(t)):is"e"([t:1to(x)]cx,g1,g2)
t39:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g1,g2,t38):is(smpr(x,g1),smpr(x,g2))
t40:=tris(cx,smpr(x,g1),smpr(x,g2),smpr(x,f01),t39,t33):is(smpr(x,g1),smpr(x,f01))
t41:=isf(1to(xp1),cx,f,<xout(xp1)>s,xout(xp1),case1):is(<xout(xp1)>g(xp1,s,f),<xout(xp1)>f)
t42:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q)
t43:=isf(cx,cx,<smpr(x,g1)>q,<xout(xp1)>g(xp1,s,f),<xout(xp1)>f,t41):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q)
t44:=isf(cx,cx,[t:cx]<<xout(xp1)>f><t>q,smpr(x,g1),smpr(x,f01),t40):is(<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q)
t45:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><smpr(x,f01)>q,satz278(x,f)):is(<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f))
t46:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f),t42,t43,t44,t45):prop1(xp1,s,f)
b@1px:=pl"n"(1,x):nat
[case2:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))][u:1to(x)]
u3:=right1to(1,x,u):1to(1px)
case2@t47:=lessisi2"n"(1px,xp1,compl"n"(1,x)):lessis"n"(1px,xp1)
s02:=left(1to(xp1),xp1,1px,t47,s):[t:1to(1px)]1to(xp1)
u@n3:=inn(xp1,<u3>s02):nat
[i:is"n"(n3,1)]
t48:=tr3is(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),1out(xp1),<1out(xp1)>s,isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),1,satz24a(xp1),i),symis(1to(xp1),<1out(xp1)>s,1out(xp1),case2)):is"e"(1to(xp1),<u3>s02,<1out(xp1)>s)
t49:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3),1out(xp1),t48):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
t50:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t49):is"n"(inn(1px,u3),1)
t51:=isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))):is"n"(pl"n"(1,inn(x,u)),inn(1px,u3))
t52:=ismore1"n"(pl"n"(1,inn(x,u)),inn(1px,u3),1,t51,satz18(1,inn(x,u))):more"n"(inn(1px,u3),1)
t53:=<t50>ec3e21(is"n"(inn(1px,u3),1),more"n"(inn(1px,u3),1),less"n"(inn(1px,u3),1),satz10b(inn(1px,u3),1),t52):con
u@t54:=ore1(more"n"(n3,1),is"n"(n3,1),satz24(n3),[t:is"n"(n3,1)]t53(t)):more"n"(n3,1)
nm1:=mn"n"(n3,1,t54):nat
t54a:=islessis1"n"(n3,pl"n"(nm1,1),xp1,th1c"n.mn"(n3,1,t54),1top(xp1,<u3>s02)):lessis"n"(pl"n"(nm1,1),xp1)
t55:=th9"l.or"(less"n"(pl"n"(nm1,1),xp1),is"n"(pl"n"(nm1,1),xp1),less"n"(nm1,x),is"n"(nm1,x),t54a,[t:less"n"(pl"n"(nm1,1),xp1)]satz20c(nm1,x,1,t),[t:is"n"(pl"n"(nm1,1),xp1)]satz20b(nm1,x,1,t)):lessis"n"(nm1,x)
w3:=outn(x,nm1,t55):1to(x)
case2@s03:=[t:1to(x)]w3(t):[t:1to(x)]1to(x)
u@[v:1to(x)][i:is"e"(1to(x),w3(u),w3(v))]
t56:=isoutne(x,nm1(u),t55(u),nm1(v),t55(v),i):is"n"(nm1(u),nm1(v))
t57:=tr3is(nat,n3(u),pl"n"(nm1(u),1),pl"n"(nm1(v),1),n3(v),th1c"n.mn"(n3(u),1,t54(u)),ispl1"n"(nm1(u),nm1(v),1,t56),th1d"n.mn"(n3(v),1,t54(v))):is"n"(n3(u),n3(v))
t58:=isinne(xp1,<u3(u)>s02,<u3(v)>s02,t57):is"e"(1to(xp1),<u3(u)>s02,<u3(v)>s02)
t59:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)),t58):is"e"(1to(xp1),left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)))
t60:=thleft1(xp1,1px,t47,u3(u),u3(v),t59):is"e"(1to(1px),u3(u),u3(v))
t61:=thright1(1,x,u,v,t60):is"e"(1to(x),u,v)
case2@s04:=left(1to(xp1),xp1,1px,t47,invf(1to(xp1),1to(xp1),s,b)):[t:1to(1px)]1to(xp1)
u@u4:=<u3>s04:1to(xp1)
n4:=inn(xp1,u4):nat
[i:is"n"(n4,1)]
t62:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),1out(xp1),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),1,satz24a(xp1),i)):is"e"(1to(xp1),u4,1out(xp1))
t63:=tr3is(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<1out(xp1)>s,1out(xp1),thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,1out(xp1),t62),case2):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
t64:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t63):is"n"(inn(1px,u3),1)
t65:=tris(nat,pl"n"(1,inn(x,u)),inn(1px,u3),1,isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),t64):is"n"(pl"n"(1,inn(x,u)),1)
t66:=<t65>ec3e21(is"n"(pl"n"(1,inn(x,u)),1),more"n"(pl"n"(1,inn(x,u)),1),less"n"(pl"n"(1,inn(x,u)),1),satz10b(pl"n"(1,inn(x,u)),1),satz18(1,inn(x,u))):con
u@t67:=ore1(more"n"(n4,1),is"n"(n4,1),satz24(n4),[t:is"n"(n4,1)]t66(t)):more"n"(n4,1)
nm2:=mn"n"(n4,1,t67):nat
t68:=islessis1"n"(n4,pl"n"(nm2,1),xp1,th1c"n.mn"(n4,1,t67),1top(xp1,u4)):lessis"n"(pl"n"(nm2,1),xp1)
t69:=th9"l.or"(less"n"(pl"n"(nm2,1),xp1),is"n"(pl"n"(nm2,1),xp1),less"n"(nm2,x),is"n"(nm2,x),t68,[t:less"n"(pl"n"(nm2,1),xp1)]satz20c(nm2,x,1,t),[t:is"n"(pl"n"(nm2,1),xp1)]satz20b(nm2,x,1,t)):lessis"n"(nm2,x)
w4:=outn(x,nm2,t69):1to(x)
t70:=isinoutn(x,nm2,t69):is"n"(nm2,inn(x,w4))
t71:=tr3is(nat,n4,pl"n"(1,nm2),pl"n"(1,inn(x,w4)),inn(1px,u3(w4)),th1a"n.mn"(n4,1,t67),ispl2"n"(nm2,inn(x,w4),1,t70),isinoutn(1px,pl"n"(1,inn(x,w4)),satz19o(inn(x,w4),x,1,1top(x,w4)))):is"n"(n4,inn(1px,u3(w4)))
t72:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),left1to(xp1,1px,t47,u3(w4)),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),inn(1px,u3(w4)),trlessis"n"(inn(1px,u3(w4)),1px,xp1,1top(1px,u3(w4)),t47),t71)):is"e"(1to(xp1),u4,left1to(xp1,1px,t47,u3(w4)))
t73:=tris(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<u3(w4)>s02,thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,left1to(xp1,1px,t47,u3(w4)),t72)):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),<u3(w4)>s02)
t74:=tr3is(nat,pl"n"(1,inn(x,u)),inn(1px,u3),inn(xp1,left1to(xp1,1px,t47,u3)),n3(w4),isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),isinoutn(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47)),isinni(xp1,left1to(xp1,1px,t47,u3),<u3(w4)>s02,t73)):is"n"(pl"n"(1,inn(x,u)),n3(w4))
t75:=th1e"n.mn"(n3(w4),1,inn(x,u),t54(w4),t74):is"n"(inn(x,u),nm1(w4))
t76:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w3(w4),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),nm1(w4),t55(w4),t75)):is"e"(1to(x),u,w3(w4))
t77:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w3(t)),w4,t76):image(1to(x),1to(x),s03,u)
case2@t78:=andi(injective(1to(x),1to(x),s03),surjective(1to(x),1to(x),s03),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s03,<u>s03)]t61(t,u,v),[t:1to(x)]t77(t)):bijective(1to(x),1to(x),s03)
f02:=left(cx,xp1,1px,t47,f):[t:1to(1px)]cx
f03:=right(cx,1,x,f02):[t:1to(x)]cx
t79:=<t78><f03><s03>p:prop1(s03,f03)
g3:=left(cx,xp1,1px,t47,g(xp1,s,f)):[t:1to(1px)]cx
g4:=right(cx,1,x,g3):[t:1to(x)]cx
g5:=g(x,s03,f03):[t:1to(x)]cx
u@t80:=tr3is(nat,n3,pl"n"(1,nm1),pl"n"(1,inn(x,w3)),inn(1px,right1to(1,x,w3)),th1a"n.mn"(n3,1,t54),ispl2"n"(nm1,inn(x,w3),1,isinoutn(x,nm1,t55)),isinoutn(1px,pl"n"(1,inn(x,w3)),satz19o(inn(x,w3),x,1,1top(x,w3)))):is"n"(n3,inn(1px,right1to(1,x,w3)))
t81:=tris(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),left1to(xp1,1px,t47,right1to(1,x,w3)),isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),inn(1px,right1to(1,x,w3)),trlessis"n"(inn(1px,right1to(1,x,w3)),1px,xp1,1top(1px,right1to(1,x,w3)),t47),t80)):is"e"(1to(xp1),<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)))
t82:=isf(1to(xp1),cx,f,<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)),t81):is(<u>g4,<u>g5)
case2@t83:=fisi(1to(x),cx,g4,g5,[t:1to(x)]t82(t)):is"e"([t:1to(x)]cx,g4,g5)
t85:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g4,g5,t83):is(smpr(x,g4),smpr(x,g5))
t86:=tris(cx,smpr(x,g4),smpr(x,g5),smpr(x,f03),t85,t79):is(smpr(x,g4),smpr(x,f03))
t87:=lessisi1"n"(1,1px,satz18a(1,x)):lessis"n"(1,1px)
g6:=left(cx,1px,1,t87,g3):[t:1to(1)]cx
f04:=left(cx,1px,1,t87,f02):[t:1to(1)]cx
t87a:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
1d:=left1to(1px,1,t87,xout(1)):1to(1px)
t87b:=isinoutn(1px,inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,1px,1top(1,xout(1)),t87)):is"n"(inn(1,xout(1)),inn(1px,1d))
t88:=tris(nat,1,inn(1,xout(1)),inn(1px,1d),t87a,t87b):is"n"(1,inn(1px,1d))
1e:=left1to(xp1,1px,t47,1d):1to(xp1)
t88a:=isoutni(xp1,1,satz24a(xp1),inn(1px,1d),trlessis"n"(inn(1px,1d),1px,xp1,1top(1px,1d),t47),t88):is"e"(1to(xp1),1out(xp1),1e)
t88b:=isf(1to(xp1),1to(xp1),s,1e,1out(xp1),symis(1to(xp1),1out(xp1),1e,t88a)):is"e"(1to(xp1),<1e>s,<1out(xp1)>s)
t89:=tr3is(1to(xp1),<1e>s,<1out(xp1)>s,1out(xp1),1e,t88b,case2,t88a):is"e"(1to(xp1),<1e>s,1e)
t89a:=tr3is(cx,smpr(1,g6),<xout(1)>g6,<xout(1)>f04,smpr(1,f04),satz277(g6),isf(1to(xp1),cx,f,<1e>s,1e,t89),symis(cx,smpr(1,f04),<xout(1)>f04,satz277(f04))):is(smpr(1,g6),smpr(1,f04))
t90:=satz281(1,x,g3):is(smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q)
t91:=isf(cx,cx,<smpr(1,g6)>q,smpr(x,g4),smpr(x,f03),t86):is(<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q)
t92:=isf(cx,cx,[t:cx]<smpr(x,f03)><t>q,smpr(1,g6),smpr(1,f04),t89a):is(<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q)
t93:=symis(cx,smpr(1px,f02),<smpr(x,f03)><smpr(1,f04)>q,satz281(1,x,f02)):is(<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02))
t94:=tr4is(cx,smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02),t90,t91,t92,t93):is(smpr(1px,g3),smpr(1px,f02))
t95:=issmpr(xp1,f,1px,compl"n"(1,x)):is(smpr(1px,f02),smpr(xp1,f))
t96:=symis(cx,smpr(1px,g3),smpr(xp1,g(xp1,s,f)),issmpr(xp1,g(xp1,s,f),1px,compl"n"(1,x))):is(smpr(xp1,g(xp1,s,f)),smpr(1px,g3))
t97:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(1px,g3),smpr(1px,f02),smpr(xp1,f),t96,t94,t95):prop1(xp1,s,f)
b@[not1:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))][not2:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]
a0:=<1out(xp1)>s:1to(xp1)
b0:=<1out(xp1)>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
t98:=thinvf2(1to(xp1),1to(xp1),s,b,1out(xp1)):is"e"(1to(xp1),1out(xp1),<b0>s)
t99:=not2:not(is"e"(1to(xp1),a0,1out(xp1)))
t100:=symnotis(1to(xp1),<1out(xp1)>s,<b0>s,th3"e.notis"(1to(xp1),<1out(xp1)>s,1out(xp1),<b0>s,not2,t98)):not(is"e"(1to(xp1),<b0>s,<1out(xp1)>s))
t101:=th3"l.imp"(is"e"(1to(xp1),b0,1out(xp1)),is"e"(1to(xp1),<b0>s,<1out(xp1)>s),t100,[t:is"e"(1to(xp1),b0,1out(xp1))]isf(1to(xp1),1to(xp1),s,b0,1out(xp1),t)):not(is"e"(1to(xp1),b0,1out(xp1)))
s1:=changef(1to(xp1),1to(xp1),s,1out(xp1),b0):[t:1to(xp1)]1to(xp1)
[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
t102:=changef1(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,<b0>s)
t103:=tris2(1to(xp1),<u>s1,1out(xp1),<b0>s,t102,t98):is"e"(1to(xp1),<u>s1,1out(xp1))
u@[i:is"e"(1to(xp1),u,b0)]
t104:=changef2(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,a0)
u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
t105:=changef3(1to(xp1),1to(xp1),s,1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
not2@t106:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),b0,b):bijective(1to(xp1),1to(xp1),s1)
[alpha:not(is"e"(1to(xp1),a0,xout(xp1)))]
s2:=wissel(1to(xp1),1out(xp1),a0):[t:1to(xp1)]1to(xp1)
t107:=th3"e.wissel"(1to(xp1),1out(xp1),a0):bijective(1to(xp1),1to(xp1),s2)
[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
t108:=iswissel1(1to(xp1),1out(xp1),a0,<u>s1,t103(u,i)):is"e"(1to(xp1),<<u>s1>s2,a0)
t109:=tris2(1to(xp1),<u>s,<<u>s1>s2,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t108):is"e"(1to(xp1),<u>s,<<u>s1>s2)
u@[i:is"e"(1to(xp1),u,b0)]
t110:=iswissel2(1to(xp1),1out(xp1),a0,<u>s1,t104(u,i)):is"e"(1to(xp1),<<u>s1>s2,1out(xp1))
t111:=tris2(1to(xp1),<u>s,<<u>s1>s2,1out(xp1),tris2(1to(xp1),<u>s,1out(xp1),<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),t98),t110):is"e"(1to(xp1),<u>s,<<u>s1>s2)
u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))][i:is"e"(1to(xp1),<u>s1,1out(xp1))]
t112:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,1out(xp1),tris2(1to(xp1),<u>s1,<1out(xp1)>s1,1out(xp1),i,t103(1out(xp1),refis(1to(xp1),1out(xp1))))):is"e"(1to(xp1),u,1out(xp1))
o@t113:=th3"l.imp"(is"e"(1to(xp1),<u>s1,1out(xp1)),is"e"(1to(xp1),u,1out(xp1)),n,[t:is"e"(1to(xp1),<u>s1,1out(xp1))]t112(t)):not(is"e"(1to(xp1),<u>s1,1out(xp1)))
[i:is"e"(1to(xp1),<u>s1,a0)]
t114:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,b0,tris2(1to(xp1),<u>s1,<b0>s1,a0,i,t104(b0,refis(1to(xp1),b0)))):is"e"(1to(xp1),u,b0)
o@t115:=th3"l.imp"(is"e"(1to(xp1),<u>s1,a0),is"e"(1to(xp1),u,b0),o,[t:is"e"(1to(xp1),<u>s1,a0)]t114(t)):not(is"e"(1to(xp1),<u>s1,a0))
t116:=iswissel3(1to(xp1),1out(xp1),a0,<u>s1,t113,t115):is"e"(1to(xp1),<<u>s1>s2,<u>s1)
t117:=symis(1to(xp1),<<u>s1>s2,<u>s,tris(1to(xp1),<<u>s1>s2,<u>s1,<u>s,t116,t105(u,n,o))):is"e"(1to(xp1),<u>s,<<u>s1>s2)
n@t118:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,b0)]t111(t),[t:not(is"e"(1to(xp1),u,b0))]t117(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
u@t119:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,1out(xp1))]t109(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t118(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
alpha@t120:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s1>s2,[t:1to(xp1)]t119(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s1>s2)
not2@t121:=t103(1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s1,1out(xp1))
t121a:=ec3e21(is"n"(xp1,1),more"n"(xp1,1),less"n"(xp1,1),satz10b(xp1,1),ismore1"n"(1px,xp1,1,compl"n"(1,x),satz18(1,x))):nis"n"(xp1,1)
t122:=th3"l.imp"(is"e"(1to(xp1),xout(xp1),1out(xp1)),is"n"(xp1,1),t121a,[t:is"e"(1to(xp1),xout(xp1),1out(xp1))]isoutne(xp1,xp1,lessisi3(xp1),1,satz24a(xp1),t)):not(is"e"(1to(xp1),xout(xp1),1out(xp1)))
alpha@t123:=symnotis(1to(xp1),a0,xout(xp1),alpha):not(is"e"(1to(xp1),xout(xp1),a0))
t124:=iswissel3(1to(xp1),1out(xp1),a0,xout(xp1),t122,t123):is"e"(1to(xp1),<xout(xp1)>s2,xout(xp1))
t125:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s1>s2,t120):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))))
t126:=t97(s1,g(xp1,s2,f),t106,t121):is(smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)))
t127:=t46(s2,f,t107,t124):is(smpr(xp1,g(xp1,s2,f)),smpr(xp1,f))
t128:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)),smpr(xp1,f),t125,t126,t127):prop1(xp1,s,f)
not2@[i3:is"e"(1to(xp1),a0,xout(xp1))][beta:not(is"e"(1to(xp1),b0,xout(xp1)))]
s3:=wissel(1to(xp1),1out(xp1),b0):[t:1to(xp1)]1to(xp1)
t129:=th3"e.wissel"(1to(xp1),1out(xp1),b0):bijective(1to(xp1),1to(xp1),s3)
[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
t130:=t104(<u>s3,iswissel1(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,a0)
t131:=tris2(1to(xp1),<u>s,<<u>s3>s1,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t130):is"e"(1to(xp1),<u>s,<<u>s3>s1)
u@[i:is"e"(1to(xp1),u,b0)]
t132:=t103(<u>s3,iswissel2(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,1out(xp1))
t133:=tris2(1to(xp1),<u>s,<<u>s3>s1,<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),tris(1to(xp1),<<u>s3>s1,1out(xp1),<b0>s,t132,t98)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
t134:=iswissel3(1to(xp1),1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s3,u)
t135:=isf(1to(xp1),1to(xp1),s1,<u>s3,u,t134):is"e"(1to(xp1),<<u>s3>s1,<u>s1)
t136:=t105(u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
t139:=symis(1to(xp1),<<u>s3>s1,<u>s,tris(1to(xp1),<<u>s3>s1,<u>s1,<u>s,t135,t136)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
n@t140:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,b0)]t133(t),[t:not(is"e"(1to(xp1),u,b0))]t139(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
u@t141:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,1out(xp1))]t131(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t140(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
beta@t142:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s3>s1,[t:1to(xp1)]t141(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s3>s1)
t143:=symnotis(1to(xp1),b0,xout(xp1),beta):not(is"e"(1to(xp1),xout(xp1),b0))
t144:=iswissel3(1to(xp1),1out(xp1),b0,xout(xp1),t122,t143):is"e"(1to(xp1),<xout(xp1)>s3,xout(xp1))
t145:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s3>s1,t142):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))))
t146:=t46(s3,g(xp1,s1,f),t129,t144):is(smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)))
t147:=t97(s1,f,t106,t121):is(smpr(xp1,g(xp1,s1,f)),smpr(xp1,f))
t148:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)),smpr(xp1,f),t145,t146,t147):prop1(xp1,s,f)
i3@[gamma:is"e"(1to(xp1),b0,xout(xp1))][i:is"n"(x,1)]
t149:=ispl1"n"(1,x,1,symis(nat,x,1,i)):is"n"(2,xp1)
t150:=lessisi2"n"(2,xp1,t149):lessis"n"(2,xp1)
f05:=left(cx,xp1,2,t150,f):[t:1to(2)]cx
s05:=left(1to(xp1),xp1,2,t150,s):[t:1to(2)]1to(xp1)
g7:=left(cx,xp1,2,t150,g(xp1,s,f)):[t:1to(2)]cx
t151:=issmpr(xp1,f,2,t149):is(smpr(2,f05),smpr(xp1,f))
t152:=issmpr(xp1,g(xp1,s,f),2,t149):is(smpr(2,g7),smpr(xp1,g(xp1,s,f)))
t153:=satz280(f05):is(smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q)
t154:=satz280(g7):is(smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q)
t155:=tris1(nat,inn(2,xout(2)),xp1,2,isinoutn(2,2,lessisi3(2)),t149):is"n"(inn(2,xout(2)),xp1)
t156:=isoutni(xp1,inn(2,xout(2)),trlessis"n"(inn(2,xout(2)),2,xp1,1top(2,xout(2)),t150),xp1,lessisi3(xp1),t155):is"e"(1to(xp1),left1to(xp1,2,t150,xout(2)),xout(xp1))
t157:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,xout(2)),xout(xp1),t156):is"e"(1to(xp1),<xout(2)>s05,<xout(xp1)>s)
t158:=symis(nat,1,inn(2,1out(2)),isinoutn(2,1,satz24a(2))):is"n"(inn(2,1out(2)),1)
t159:=isoutni(xp1,inn(2,1out(2)),trlessis"n"(inn(2,1out(2)),2,xp1,1top(2,1out(2)),t150),1,satz24a(xp1),t158):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1))
t160:=tr3is(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1),<b0>s,<xout(xp1)>s,t159,t98,isf(1to(xp1),1to(xp1),s,b0,xout(xp1),gamma)):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),<xout(xp1)>s)
t161:=tris2(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)),<xout(xp1)>s,t157,t160):is"e"(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)))
t163:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,1out(2)),1out(xp1),t159):is"e"(1to(xp1),<1out(2)>s05,<1out(xp1)>s)
t164:=tris(1to(xp1),<1out(2)>s05,<1out(xp1)>s,xout(xp1),t163,i3):is"e"(1to(xp1),<1out(2)>s05,xout(xp1))
t165:=tris2(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)),xout(xp1),t164,t156):is"e"(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)))
t166:=isf(1to(xp1),cx,f,<xout(2)>s05,left1to(xp1,2,t150,1out(2)),t161):is(<xout(2)>g7,<1out(2)>f05)
t167:=isf(1to(xp1),cx,f,<1out(2)>s05,left1to(xp1,2,t150,xout(2)),t165):is(<1out(2)>g7,<xout(2)>f05)
t168:=isf(cx,cx,<<1out(2)>g7>q,<xout(2)>g7,<1out(2)>f05,t166):is(<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q)
t169:=comq(c,<1out(2)>g7,<1out(2)>f05):is(<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q)
t170:=isf(cx,cx,<<1out(2)>f05>q,<1out(2)>g7,<xout(2)>f05,t167):is(<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q)
t171:=tr4is(cx,smpr(xp1,g(xp1,s,f)),smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q,symis(cx,smpr(2,g7),smpr(xp1,g(xp1,s,f)),t152),t154,t168,t169):is(smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q)
t172:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q,smpr(2,f05),smpr(xp1,f),t171,t170,symis(cx,smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q,t153),t151):prop1(xp1,s,f)
trivial:=t172:prop1(xp1,s,f)
gamma@[n:nis"n"(x,1)]
t173:=ore1(more"n"(x,1),is"n"(x,1),satz24(x),n):more"n"(x,1)
xm1:=mn"n"(x,1,t173):nat
s4:=changef(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1)):[t:1to(xp1)]1to(xp1)
t174:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),b):bijective(1to(xp1),1to(xp1),s4)
t175:=changef2(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),xout(xp1),refis(1to(xp1),xout(xp1))):is"e"(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s)
t176:=symis(1to(xp1),a0,xout(xp1),i3):is"e"(1to(xp1),xout(xp1),<1out(xp1)>s)
t177:=tris2(1to(xp1),<xout(xp1)>s4,xout(xp1),<1out(xp1)>s,t175,t176):is"e"(1to(xp1),<xout(xp1)>s4,xout(xp1))
t178:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
g8:=left(cx,xp1,x,t178,g(xp1,s,f)):[t:1to(x)]cx
t179:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q)
t180:=th1b"n.mn"(x,1,t173):is"n"(pl"n"(1,xm1),x)
t181:=lessisi2"n"(pl"n"(1,xm1),x,t180):lessis"n"(pl"n"(1,xm1),x)
g9:=left(cx,x,pl"n"(1,xm1),t181,g8):[t:1to(pl"n"(1,xm1))]cx
t182:=symis(cx,smpr(pl"n"(1,xm1),g9),smpr(x,g8),issmpr(x,g8,pl"n"(1,xm1),t180)):is(smpr(x,g8),smpr(pl"n"(1,xm1),g9))
g10:=right(cx,1,xm1,g9):[t:1to(xm1)]cx
t183:=lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)):lessis"n"(1,pl"n"(1,xm1))
g11:=left(cx,pl"n"(1,xm1),1,t183,g9):[t:1to(1)]cx
t184:=satz281(a,1,xm1,g9):is(smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q)
t185:=satz277(g11):is(smpr(1,g11),<xout(1)>g11)
t186:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
1a:=left1to(pl"n"(1,xm1),1,t183,xout(1)):1to(pl"n"(1,xm1))
t187:=isinoutn(pl"n"(1,xm1),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,pl"n"(1,xm1),1top(1,xout(1)),t183)):is"n"(inn(1,xout(1)),inn(pl"n"(1,xm1),1a))
1b:=left1to(x,pl"n"(1,xm1),t181,1a):1to(x)
t188:=isinoutn(x,inn(pl"n"(1,xm1),1a),trlessis"n"(inn(pl"n"(1,xm1),1a),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),1a),t181)):is"n"(inn(pl"n"(1,xm1),1a),inn(x,1b))
t189:=tr3is(nat,1,inn(1,xout(1)),inn(pl"n"(1,xm1),1a),inn(x,1b),t186,t187,t188):is"n"(1,inn(x,1b))
1c:=left1to(xp1,x,t178,1b):1to(xp1)
t190:=isoutni(xp1,1,satz24a(xp1),inn(x,1b),trlessis"n"(inn(x,1b),x,xp1,1top(x,1b),t178),t189):is"e"(1to(xp1),1out(xp1),1c)
t191:=isf(1to(xp1),cx,g(xp1,s,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s,f),<xout(1)>g11)
t192:=tris2(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(1)>g11,t185,t191):is(smpr(1,g11),<1out(xp1)>g(xp1,s,f))
t193:=symis(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s,t175):is"e"(1to(xp1),<1out(xp1)>s,<xout(xp1)>s4)
t194:=isf(1to(xp1),cx,f,<1out(xp1)>s,<xout(xp1)>s4,t193):is(<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f))
t195:=tris(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f),t192,t194):is(smpr(1,g11),<xout(xp1)>g(xp1,s4,f))
t196:=isf(cx,cx,[t:cx]<smpr(xm1,g10)><t>q,smpr(1,g11),<xout(xp1)>g(xp1,s4,f),t195):is(<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
t197:=tr3is(cx,smpr(x,g8),smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t182,t184,t196):is(smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
t198:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s,f)><t>q,smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t197):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q)
t199:=assq1(a,<xout(xp1)>g(xp1,s4,f),smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q)
t200:=comq(c,<xout(xp1)>g(xp1,s4,f),<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q):is(<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
g12:=left(cx,xp1,x,t178,g(xp1,s4,f)):[t:1to(x)]cx
g13:=left(cx,x,pl"n"(1,xm1),t181,g12):[t:1to(pl"n"(1,xm1))]cx
g14:=right(cx,1,xm1,g13):[t:1to(xm1)]cx
g15:=left(cx,pl"n"(1,xm1),1,lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)),g13):[t:1to(1)]cx
t201:=satz278(x,g(xp1,s4,f)):is(smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
t202:=symis(cx,smpr(pl"n"(1,xm1),g13),smpr(x,g12),issmpr(x,g12,pl"n"(1,xm1),t180)):is(smpr(x,g12),smpr(pl"n"(1,xm1),g13))
t203:=satz281(a,1,xm1,g13):is(smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q)
t204:=satz277(g15):is(smpr(1,g15),<xout(1)>g15)
t205:=isf(1to(xp1),cx,g(xp1,s4,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s4,f),<xout(1)>g15)
t206:=tris2(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(1)>g15,t204,t205):is(smpr(1,g15),<1out(xp1)>g(xp1,s4,f))
t207:=changef1(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s4,<xout(xp1)>s)
t208:=isf(1to(xp1),cx,f,<1out(xp1)>s4,<xout(xp1)>s,t207):is(<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f))
t209:=tris(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f),t206,t208):is(smpr(1,g15),<xout(xp1)>g(xp1,s,f))
t210:=isf(cx,cx,[t:cx]<smpr(xm1,g14)><t>q,smpr(1,g15),<xout(xp1)>g(xp1,s,f),t209):is(<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
t211:=tr3is(cx,smpr(x,g12),smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t202,t203,t210):is(smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
[u:1to(xm1)]
ua:=right1to(1,xm1,u):1to(pl"n"(1,xm1))
ub:=left1to(x,pl"n"(1,xm1),t181,ua):1to(x)
uc:=left1to(xp1,x,t178,ub):1to(xp1)
[i:is"e"(1to(xp1),uc,xout(xp1))]
t212:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),xp1,lessisi3(xp1),i):is"n"(inn(x,ub),xp1)
t213:=satz16a(inn(x,ub),x,xp1,1top(x,ub),satz18a(x,1)):less"n"(inn(x,ub),xp1)
t214:=<t212>ec3e31(is"n"(inn(x,ub),xp1),more"n"(inn(x,ub),xp1),less"n"(inn(x,ub),xp1),satz10b(inn(x,ub),xp1),t213):con
u@t215:=[t:is"e"(1to(xp1),uc,xout(xp1))]t214(t):not(is"e"(1to(xp1),uc,xout(xp1)))
[i:is"e"(1to(xp1),uc,1out(xp1))]
t216:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),1,satz24a(xp1),i):is"n"(inn(x,ub),1)
t217:=isinoutn(x,inn(pl"n"(1,xm1),ua),trlessis"n"(inn(pl"n"(1,xm1),ua),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),ua),t181)):is"n"(inn(pl"n"(1,xm1),ua),inn(x,ub))
t218:=isinoutn(pl"n"(1,xm1),pl"n"(1,inn(xm1,u)),satz19o(inn(xm1,u),xm1,1,1top(xm1,u))):is"n"(pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua))
t219:=tr3is(nat,pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua),inn(x,ub),1,t218,t217,t216):is"n"(pl"n"(1,inn(xm1,u)),1)
t220:=satz18(1,inn(xm1,u)):more"n"(pl"n"(1,inn(xm1,u)),1)
t221:=<t219>ec3e21(is"n"(pl"n"(1,inn(xm1,u)),1),more"n"(pl"n"(1,inn(xm1,u)),1),less"n"(pl"n"(1,inn(xm1,u)),1),satz10b(pl"n"(1,inn(xm1,u)),1),t220):con
u@t222:=[t:is"e"(1to(xp1),uc,1out(xp1))]t221(t):not(is"e"(1to(xp1),uc,1out(xp1)))
t223:=changef3(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),uc,t222,t215):is"e"(1to(xp1),<uc>s4,<uc>s)
t224:=isf(1to(xp1),cx,f,<uc>s4,<uc>s,t223):is(<u>g14,<u>g10)
n@t225:=fisi(1to(xm1),cx,g10,g14,[t:1to(xm1)]symis(cx,<t>g14,<t>g10,t224(t))):is"e"([t:1to(xm1)]cx,g10,g14)
t226:=isf([t:1to(xm1)]cx,cx,[u:[t:1to(xm1)]cx]smpr(xm1,u),g10,g14,t225):is(smpr(xm1,g10),smpr(xm1,g14))
t227:=comq(c,smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q)
t228:=isf(cx,cx,<<xout(xp1)>g(xp1,s,f)>q,smpr(xm1,g10),smpr(xm1,g14),t226):is(<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
t229:=tris(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t227,t228):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
t230:=tris2(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t229,t211):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12))
t231:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s4,f)><t>q,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),t230):is(<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
t232:=symis(cx,smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,t201):is(<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)))
t233:=t46(s4,f,t174,t177):is(smpr(xp1,g(xp1,s4,f)),smpr(xp1,f))
t234:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,t179,t198,t199,t200):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
t235:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)),smpr(xp1,f),t234,t231,t232,t233):prop1(xp1,s,f)
gamma@t236:=th1"l.imp"(is"n"(x,1),prop1(xp1,s,f),[t:is"n"(x,1)]t172(t),[t:not(is"n"(x,1))]t235(t)):prop1(xp1,s,f)
i3@t237:=th1"l.imp"(is"e"(1to(xp1),b0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),b0,xout(xp1))]t236(t),[t:not(is"e"(1to(xp1),b0,xout(xp1)))]t148(t)):prop1(xp1,s,f)
not2@t238:=th1"l.imp"(is"e"(1to(xp1),a0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),a0,xout(xp1))]t237(t),[t:not(is"e"(1to(xp1),a0,xout(xp1)))]t128(t)):prop1(xp1,s,f)
not1@t239:=th1"l.imp"(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))]t97(t),[t:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]t238(t)):prop1(xp1,s,f)
b@t240:=th1"l.imp"(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))]t46(t),[t:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))]t239(t)):prop1(xp1,s,f)
p@t241:=[u:[t:1to(xp1)]1to(xp1)][v:[t:1to(xp1)]cx][w:bijective(1to(xp1),1to(xp1),u)]t240(u,v,w):prop2(xp1)
t242:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t241,satz4a(x)):prop2(<x>suc)
x@t243:=induction([t:nat]prop2(t),t6,[t:nat][u:prop2(t)]t242(t,u),x):prop2(x)
-8283
satz283:=<b><f><s>t243".8283":is(smpr(x,[t:1to(x)]<<t>s>f),smpr(x,f))
@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
shiftl:=shiftl"r"(x,ix,y,iy,ly):nat
[n:1to(shiftl)]
shiftr:=shiftr"r"(x,ix,y,iy,ly,n):real
intshiftr:=intshiftr"r"(x,ix,y,iy,ly,n):intrl(shiftr)
shiftrls:=shiftrls"r"(x,ix,y,iy,ly,n):lessis(shiftr,x)
lsshiftr:=lsshiftr"r"(x,ix,y,iy,ly,n):lessis(y,shiftr)
[m:1to(shiftl)][i:is"r"(shiftr(n),shiftr(m))]
iseshiftr:=iseshiftr"r"(x,ix,y,iy,ly,n,m,i):is"e"(1to(shiftl),n,m)
ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
shiftl1:=shiftl1"r"(x,ix,y,iy,ly,u,a):1to(shiftl)
shiftinv1:=shiftinv1"r"(x,ix,y,iy,ly,u,a):is"r"(u,shiftr(shiftl1))
shiftinv2:=shiftinv2"r"(x,ix,y,iy,ly,u,a):is"r"(shiftr(shiftl1),u)
ly@[f:seq(x,ix,y,iy,ly,cx)]
shiftf:=shiftf(x,ix,y,iy,ly,cx,f):[t:1to(shiftl)]cx
[q:[t:cx][u:cx]cx]
smpri:=smpr(q,shiftl,shiftf):cx
f@[pi:proofsirrelevant(x,ix,y,iy,ly,cx,f)][q:[t:cx][u:cx]cx][a:assoc(q)][u:real][iu:intrl(u)][l:lessis(y,u)][k:less(u,x)][v:real][iv:intrl(v)][lv:lessis(y,v)][kv:lessis(v,u)]
+8284
t1:=lessisi1(v,x,satz172a(v,u,x,kv,k)):lessis(v,x)
-8284
k@lft:=[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]<t1".8284"(t,v,lt,kt)><lt><v><t>f:[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]cx
iv@[lv:lessis(pl"r"(u,1rl),v)][kv:lessis(v,x)]
+*8284
x@[y:real]
pl:=pl"r"(x,y):real
mn:=mn"r"(x,y):real
x@p1:=pl"r"(x,1rl):real
kv@t2:=satz190c(u,u,0,1rl,lessisi2(u,u,refis(real,u)),lemma1"r"(1rl,0,satz169a(1rl,natpos(1rl,natrl1)))):less(pl(u,0),p1(u))
t3:=isless1(pl(u,0),u,p1(u),pl02"r"(u,0,refis(real,0)),t2):less(u,p1(u))
t4:=lessisi1(y,v,satz172b(y,p1(u),v,satz172a(y,u,p1(u),l,t3),lv)):lessis(y,v)
-8284
k@rgt:=[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]<kt><t4".8284"(t,v,lt,kt)><v><t>f:[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]cx
+*8284
k@t5:=intpl(u,iu,1rl,intrl1):intrl(p1(u))
t6:=satzr25(u,iu,x,ix,k):lessis(p1(u),x)
t7:=tr3is(real,pl(mn(p1(u),y),mn(p1(x),p1(u))),pl(mn(p1(x),p1(u)),mn(p1(u),y)),mn(pl(mn(p1(x),p1(u)),p1(u)),y),mn(p1(x),y),compl"r"(mn(p1(u),y),mn(p1(x),p1(u))),asspl2"r"(mn(p1(x),p1(u)),p1(u),m0"r"(y)),ismn1"r"(pl(mn(p1(x),p1(u)),p1(u)),p1(x),y,plmn(p1(x),p1(u)))):is"r"(pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y))
sxy:=shiftl(x,ix,y,iy,ly):nat
suy:=shiftl(u,iu,y,iy,l):nat
sxu:=shiftl(x,ix,p1(u),t5,t6):nat
t8:=tr4is(real,rlofnt(pl"n"(suy,sxu)),pl(rlofnt(suy),rlofnt(sxu)),pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y),rlofnt(sxy),satzr155a(suy,sxu),ispl12"r"(rlofnt(suy),mn(p1(u),y),rlofnt(sxu),mn(p1(x),p1(u)),isrlnt2(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l)),isrlnt2(mn(p1(x),p1(u)),t6"r.shift"(x,ix,p1(u),t5,t6))),t7,isrlnt1(mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly))):is"r"(rlofnt(pl"n"(suy,sxu)),rlofnt(sxy))
t9:=isntirl(pl"n"(suy,sxu),sxy,t8):is"n"(pl"n"(suy,sxu),sxy)
t10:=lessisi2"n"(pl"n"(suy,sxu),sxy,t9):lessis"n"(pl"n"(suy,sxu),sxy)
f1:=left(cx,sxy,pl"n"(suy,sxu),t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(pl"n"(suy,sxu))]cx
t11:=issmpr(q,sxy,shiftf(x,ix,y,iy,ly,f),pl"n"(suy,sxu),t9):is(smpr(q,pl"n"(suy,sxu),f1),smpri(x,ix,y,iy,ly,f,q))
fr:=right(cx,suy,sxu,f1):[t:1to(sxu)]cx
t12:=lessisi1"n"(suy,pl"n"(suy,sxu),satz18a(suy,sxu)):lessis"n"(suy,pl"n"(suy,sxu))
fl:=left(cx,pl"n"(suy,sxu),suy,t12,f1):[t:1to(suy)]cx
t12a:=satz281(q,a,suy,sxu,f1):is(smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q)
[n:1to(sxu)]
t13:=isinoutn(pl"n"(suy,sxu),pl"n"(suy,inn(sxu,n)),satz19o(inn(sxu,n),sxu,suy,1top(sxu,n))):is"n"(pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)))
t14:=isinoutn(sxy,inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),trlessis"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),right1to(suy,sxu,n)),t10)):is"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n))))
n1:=left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n)):1to(sxy)
t15:=tris(nat,pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,n1),t13,t14):is"n"(pl"n"(suy,inn(sxu,n)),inn(sxy,n1))
t16:=isnterl(pl"n"(suy,inn(sxu,n)),inn(sxy,n1),t15):is"r"(rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)))
t17:=satzr155b(suy,inn(sxu,n)):is"r"(pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))))
t18:=ispl1"r"(mn(p1(u),y),rlofnt(suy),rlofnt(inn(sxu,n)),isrlnt1(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l))):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))))
t19:=tr3is(real,pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)),t18,t17,t16):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)))
t20:=ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)),y,t19):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxy,n1)),y))
t21:=tr3is(real,pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y),pl(rlofnt(inn(sxu,n)),pl(mn(p1(u),y),y)),pl(rlofnt(inn(sxu,n)),p1(u)),ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y,compl"r"(mn(p1(u),y),rlofnt(inn(sxu,n)))),asspl1"r"(rlofnt(inn(sxu,n)),mn(p1(u),y),y),ispl2"r"(pl(mn(p1(u),y),y),p1(u),rlofnt(inn(sxu,n)),plmn(p1(u),y))):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxu,n)),p1(u)))
t22:=tris1(real,pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),t20,t21):is"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)))
t23:=ismn1"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),1rl,t22):is"r"(shiftr(x,ix,y,iy,ly,n1),shiftr(x,ix,p1(u),t5,t6,n))
t24:=intshiftr(x,ix,y,iy,ly,n1):intrl(shiftr(x,ix,y,iy,ly,n1))
t25:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,shiftr(x,ix,y,iy,ly,n1))
t26:=shiftrls(x,ix,y,iy,ly,n1):lessis(shiftr(x,ix,y,iy,ly,n1),x)
t27:=intshiftr(x,ix,p1(u),t5,t6,n):intrl(shiftr(x,ix,p1(u),t5,t6,n))
t28:=lsshiftr(x,ix,p1(u),t5,t6,n):lessis(p1(u),shiftr(x,ix,p1(u),t5,t6,n))
t29:=shiftrls(x,ix,p1(u),t5,t6,n):lessis(shiftr(x,ix,p1(u),t5,t6,n),x)
t30:=t4(shiftr(x,ix,p1(u),t5,t6,n),t27,t28,t29):lessis(y,shiftr(x,ix,p1(u),t5,t6,n))
t31:=<t23><t29><t30><t27><shiftr(x,ix,p1(u),t5,t6,n)><t26><t25><t24><shiftr(x,ix,y,iy,ly,n1)>pi:is(<n>fr,<n>shiftf(x,ix,p1(u),t5,t6,rgt))
k@t32:=fisi(1to(sxu),cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt),[t:1to(sxu)]t31(t)):is"e"([t:1to(sxu)]cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt))
t33:=isf([t:1to(sxu)]cx,cx,[v:[t:1to(sxu)]cx]smpr(q,sxu,v),fr,shiftf(x,ix,p1(u),t5,t6,rgt),t32):is(smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q))
t34:=isf(cx,cx,<smpr(q,suy,fl)>q,smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q),t33):is(<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q)
[n:1to(suy)]
t35:=isinoutn(pl"n"(suy,sxu),inn(suy,n),trlessis"n"(inn(suy,n),suy,pl"n"(suy,sxu),1top(suy,n),t12)):is"n"(inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)))
t36:=isinoutn(sxy,inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),trlessis"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),t10)):is"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n))))
n2:=left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n)):1to(sxy)
t37:=tris(nat,inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,n2),t35,t36):is"n"(inn(suy,n),inn(sxy,n2))
t38:=isnterl(inn(suy,n),inn(sxy,n2),t37):is"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)))
t39:=ispl1"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)),y,t38):is"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y))
t40:=ismn1"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y),1rl,t39):is"r"(shiftr(u,iu,y,iy,l,n),shiftr(x,ix,y,iy,ly,n2))
t41:=intshiftr(u,iu,y,iy,l,n):intrl(shiftr(u,iu,y,iy,l,n))
t42:=lsshiftr(u,iu,y,iy,l,n):lessis(y,shiftr(u,iu,y,iy,l,n))
t43:=shiftrls(u,iu,y,iy,l,n):lessis(shiftr(u,iu,y,iy,l,n),u)
t44:=t1(shiftr(u,iu,y,iy,l,n),t41,t42,t43):lessis(shiftr(u,iu,y,iy,l,n),x)
t45:=intshiftr(x,ix,y,iy,ly,n2):intrl(shiftr(x,ix,y,iy,ly,n2))
t46:=lsshiftr(x,ix,y,iy,ly,n2):lessis(y,shiftr(x,ix,y,iy,ly,n2))
t47:=shiftrls(x,ix,y,iy,ly,n2):lessis(shiftr(x,ix,y,iy,ly,n2),x)
t48:=<t40><t47><t46><t45><shiftr(x,ix,y,iy,ly,n2)><t44><t42><t41><shiftr(u,iu,y,iy,l,n)>pi:is(<n>shiftf(u,iu,y,iy,l,lft),<n>fl)
t49:=symis(cx,<n>shiftf(u,iu,y,iy,l,lft),<n>fl,t48):is(<n>fl,<n>shiftf(u,iu,y,iy,l,lft))
k@t50:=fisi(1to(suy),cx,fl,shiftf(u,iu,y,iy,l,lft),[t:1to(suy)]t49(t)):is"e"([t:1to(suy)]cx,fl,shiftf(u,iu,y,iy,l,lft))
t51:=isf([t:1to(suy)]cx,cx,[v:[t:1to(suy)]cx]smpr(q,suy,v),fl,shiftf(u,iu,y,iy,l,lft),t50):is(smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q))
t52:=isf(cx,cx,[t:cx]<smpri(x,ix,p1(u),t5,t6,rgt,q)><t>q,smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q),t51):is(<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
t53:=tr3is(cx,smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,t12a,t34,t52):is(smpr(q,pl"n"(suy,sxu),f1),<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-8284
k@satz284:=tris1(cx,smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,smpr(q,pl"n"(suy".8284",sxu".8284"),f1".8284"),t11".8284",t53".8284"):is(smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
q@[v:real][iv:intrl(v)][w:real][iw:intrl(w)][lw:lessis(pl"r"(y,v),w)][kw:lessis(w,pl"r"(x,v))]
+8285
x@[y:real]
pl:=pl"r"(x,y):real
mn:=mn"r"(x,y):real
x@p1:=pl"r"(x,1rl):real
kw@t1:=th9"l.or"(less(pl(y,v),w),is"r"(pl(y,v),w),less(mn(pl(y,v),v),mn(w,v)),is"r"(mn(pl(y,v),v),mn(w,v)),lw,[t:less(pl(y,v),w)]satz188f(pl(y,v),w,m0"r"(v),t),[t:is"r"(pl(y,v),w)]ismn1"r"(pl(y,v),w,v,t)):lessis(mn(pl(y,v),v),mn(w,v))
t2:=islessis1(mn(pl(y,v),v),y,mn(w,v),mnpl(y,v),t1):lessis(y,mn(w,v))
t3:=th9"l.or"(less(w,pl(x,v)),is"r"(w,pl(x,v)),less(mn(w,v),mn(pl(x,v),v)),is"r"(mn(w,v),mn(pl(x,v),v)),kw,[t:less(w,pl(x,v))]satz188f(w,pl(x,v),m0"r"(v),t),[t:is"r"(w,pl(x,v))]ismn1"r"(w,pl(x,v),v,t)):lessis(mn(w,v),mn(pl(x,v),v))
t4:=islessis2(mn(pl(x,v),v),x,mn(w,v),mnpl(x,v),t3):lessis(mn(w,v),x)
-8285
iv@sft:=[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]<t4".8285"(t,w,lt,kt)><t2".8285"(t,w,lt,kt)><intmn(t,w,v,iv)><mn"r"(t,v)>f:[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]cx
+*8285
iv@t5:=tris(real,m0"r"(pl(y,v)),m0"r"(pl(v,y)),pl(m0"r"(v),m0"r"(y)),ism0"r"(pl(y,v),pl(v,y),compl"r"(y,v)),satz180(v,y)):is"r"(m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)))
t6:=tr3is(real,mn(pl(1rl,pl(x,v)),v),pl(1rl,mn(pl(x,v),v)),pl(1rl,x),p1(x),asspl1"r"(1rl,pl(x,v),m0"r"(v)),ispl2"r"(mn(pl(x,v),v),x,1rl,mnpl(x,v)),compl"r"(1rl,x)):is"r"(mn(pl(1rl,pl(x,v)),v),p1(x))
t7:=tr3is(real,mn(p1(pl(x,v)),pl(y,v)),pl(pl(1rl,pl(x,v)),pl(m0"r"(v),m0"r"(y))),mn(mn(pl(1rl,pl(x,v)),v),y),mn(p1(x),y),ispl12"r"(p1(pl(x,v)),pl(1rl,pl(x,v)),m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)),compl"r"(pl(x,v),1rl),t5),asspl2"r"(pl(1rl,pl(x,v)),m0"r"(v),m0"r"(y)),ismn1"r"(mn(pl(1rl,pl(x,v)),v),p1(x),y,t6)):is"r"(mn(p1(pl(x,v)),pl(y,v)),mn(p1(x),y))
t8:=th9"l.or"(less(y,x),is"r"(y,x),less(pl(y,v),pl(x,v)),is"r"(pl(y,v),pl(x,v)),ly,[t:less(y,x)]satz188f(y,x,v,t),[t:is"r"(y,x)]ispl1"r"(y,x,v,t)):lessis(pl(y,v),pl(x,v))
s0:=shiftl(x,ix,y,iy,ly):nat
sv:=shiftl(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8):nat
t9:=isrlent(mn(p1(pl(x,v)),pl(y,v)),t6"r.shift"(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8),mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly),t7):is"n"(sv,s0)
t10:=lessisi2"n"(sv,s0,t9):lessis"n"(sv,s0)
f1:=left(cx,s0,sv,t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(sv)]cx
t11:=issmpr(q,s0,shiftf(x,ix,y,iy,ly,f),sv,t9):is(smpr(q,sv,f1),smpri(x,ix,y,iy,ly,f,q))
[n:1to(sv)]
t12:=isinoutn(s0,inn(sv,n),trlessis"n"(inn(sv,n),sv,s0,1top(sv,n),t10)):is"n"(inn(sv,n),inn(s0,left1to(s0,sv,t10,n)))
n1:=left1to(s0,sv,t10,n):1to(s0)
t13:=isnterl(inn(sv,n),inn(s0,n1),t12):is"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)))
t14:=tris(real,mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(sv,n)),mn(pl(y,v),v)),pl(rlofnt(inn(s0,n1)),y),asspl1"r"(rlofnt(inn(sv,n)),pl(y,v),m0"r"(v)),ispl12"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)),mn(pl(y,v),v),y,t13,mnpl(y,v))):is"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y))
st0:=shiftr(x,ix,y,iy,ly,n1):real
stv:=shiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):real
t15:=tr4is(real,mn(stv,v),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(1rl),m0"r"(v))),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(v),m0"r"(1rl))),mn(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),1rl),st0,asspl1"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(1rl),m0"r"(v)),ispl2"r"(pl(m0"r"(1rl),m0"r"(v)),pl(m0"r"(v),m0"r"(1rl)),pl(rlofnt(inn(sv,n)),pl(y,v)),compl"r"(m0"r"(1rl),m0"r"(v))),asspl2"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(v),m0"r"(1rl)),ismn1"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y),1rl,t14)):is"r"(mn(stv,v),st0)
t16:=intshiftr(x,ix,y,iy,ly,n1):intrl(st0)
t17:=shiftrls(x,ix,y,iy,ly,n1):lessis(st0,x)
t18:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,st0)
t19:=intshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):intrl(stv)
t20:=shiftrls(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(stv,pl(x,v))
t21:=lsshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(pl(y,v),stv)
t22:=intmn(stv,t19,v,iv):intrl(mn(stv,v))
t23:=t2(stv,t19,t21,t20):lessis(y,mn(stv,v))
t24:=t4(stv,t19,t21,t20):lessis(mn(stv,v),x)
t25:=<t15><t17><t18><t16><st0><t24><t23><t22><mn(stv,v)>pi:is(<n>shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),<n>f1)
iv@t26:=fisi(1to(sv),cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,[t:1to(sv)]t25(t)):is"e"([t:1to(sv)]cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1)
t27:=isf([t:1to(sv)]cx,cx,[w:[t:1to(sv)]cx]smpr(q,sv,w),shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,t26):is(smpri(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft,q),smpr(q,sv,f1))
-8285
iv@lemma285:=t8".8285":lessis(pl"r"(y,v),pl"r"(x,v))
satz285:=tris(cx,smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpr(q,sv".8285",f1".8285"),smpri(x,ix,y,iy,ly,f,q),t27".8285",t11".8285"):is(smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpri(x,ix,y,iy,ly,f,q))
ly@[s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][f:seq(x,ix,y,iy,ly,cx)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)]
us:=<ul><lu><iu><u>s:real
+8286
t1:=<ul><lu><iu><u>ins:and3(intrl(us),lessis(y,us),lessis(us,x))
-8286
inseqe1:=t22"r.shift"(x,ix,y,iy,ly,us,t1".8286"):intrl(us)
inseqe2:=t23"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(y,us)
inseqe3:=t24"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(us,x)
usf:=<inseqe3><inseqe2><inseqe1><us>f:cx
f@permseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]usf(t,u,v,w):[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]cx
q@[a:assoc(q)][c:commut(q)][s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][pri:proofsirrelevant(x,ix,y,iy,ly,real,s)][ps:perm(x,ix,y,iy,ly,s)]
+*8286
ps@ss:=shiftseq(x,ix,y,iy,ly,s,ins):[t:1to(shiftl)]1to(shiftl)
t2:=satz283(q,a,c,shiftl,ss,bijshiftseq(x,ix,y,iy,ly,s,ins,pri,ps),shiftf(f)):is(smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)),smpri(f,q))
[n:1to(shiftl)]
ns:=us(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):real
t3:=shiftinv1(ns,t34"r.shift"(x,ix,y,iy,ly,s,ins,n)):is"r"(ns,shiftr(<n>ss))
t4:=inseqe1(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):intrl(ns)
t5:=inseqe2(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(y,ns)
t6:=inseqe3(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(ns,x)
t7:=intshiftr(<n>ss):intrl(shiftr(<n>ss))
t8:=lsshiftr(<n>ss):lessis(y,shiftr(<n>ss))
t9:=shiftrls(<n>ss):lessis(shiftr(<n>ss),x)
t10:=<t3><t9><t8><t7><shiftr(<n>ss)><t6><t5><t4><ns>pi:is(<n>shiftf(permseq(s,ins,f)),<<n>ss>shiftf(f))
ps@t11:=fisi(1to(shiftl),cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),[t:1to(shiftl)]t10(t)):is"e"([t:1to(shiftl)]cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f))
t12:=isf([t:1to(shiftl)]cx,cx,[u:[t:1to(shiftl)]cx]smpr(q,shiftl,u),shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),t11):is(smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)))
-8286
ps@satz286:=tris(cx,smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss".8286">shiftf(f)),smpri(f,q),t12".8286",t2".8286"):is(smpri(permseq(s,ins,f),q),smpri(f,q))
@[x:nat][f:[t:1to(x)]cx]
modf:=[t:1to(x)]pli(mod(<t>f),0):[t:1to(x)]cx
+8287
[r:real]
prop1:=lessis(mod(sum(x,f)),r):'prop'
prop2:=is(sum(x,modf(f)),pli(r,0)):'prop'
prop3:=and(prop1,prop2):'prop'
f@prop4:=some"r"([t:real]prop3(t)):'prop'
x@prop5:=[u:[t:1to(x)]cx]prop4(u):'prop'
@[f:[t:1to(1)]cx]
t1:=satz277([t:cx][u:cx]pl(t,u),f):is(sum(1,f),<xout(1)>f)
t2:=ismod(sum(1,f),<xout(1)>f,t1):is"r"(mod(sum(1,f)),mod(<xout(1)>f))
t3:=lessisi2(mod(sum(1,f)),mod(<xout(1)>f),t2):prop1(1,f,mod(<xout(1)>f))
t4:=satz277([t:cx][u:cx]pl(t,u),modf(1,f)):prop2(1,f,mod(<xout(1)>f))
t5:=andi(prop1(1,f,mod(<xout(1)>f)),prop2(1,f,mod(<xout(1)>f)),t3,t4):prop3(1,f,mod(<xout(1)>f))
t6:=somei(real,[t:real]prop3(1,f,t),mod(<xout(1)>f),t5):prop4(1,f)
@t7:=[u:[t:1to(1)]cx]t6(u):prop5(1)
x@[p:prop5(x)][f:[t:1to(pl"n"(x,1))]cx]
t8:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
lf:=left(cx,pl"n"(x,1),x,t8,f):[t:1to(x)]cx
[r:real][pr:prop3(lf,r)]
t9:=ande1(prop1(lf,r),prop2(lf,r),pr):prop1(lf,r)
t10:=ande2(prop1(lf,r),prop2(lf,r),pr):prop2(lf,r)
t11:=satz278([t:cx][u:cx]pl(t,u),x,f):is(sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f))
t12:=ismod(pl(sum(x,lf),<xout(pl"n"(x,1))>f),sum(pl"n"(x,1),f),symis(cx,sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f),t11)):is"r"(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)))
m:=mod(<xout(pl"n"(x,1))>f):real
t13:=islessis1(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),t12,satz271(sum(x,lf),<xout(pl"n"(x,1))>f)):lessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m))
t14:=th9"l.or"(less(mod(sum(x,lf)),r),is"r"(mod(sum(x,lf)),r),less(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),is"r"(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),t9,[t:less(mod(sum(x,lf)),r)]satz188f(mod(sum(x,lf)),r,m,t),[t:is"r"(mod(sum(x,lf)),r)]ispl1"r"(mod(sum(x,lf)),r,m,t)):lessis(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m))
t15:=trlessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),pl"r"(r,m),t13,t14):prop1(pl"n"(x,1),f,pl"r"(r,m))
lmf:=left(cx,pl"n"(x,1),x,t8,modf(pl"n"(x,1),f)):[t:1to(x)]cx
t16:=satz278([t:cx][u:cx]pl(t,u),x,modf(pl"n"(x,1),f)):is(sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)))
t17:=ispl1(sum(x,lmf),pli(r,0),pli(m,0),t10):is(pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)))
t18:=plis12a(r,0,m,0):is(pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)))
t19:=isrecx2(pl"r"(0,0),0,pl"r"(r,m),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0))
t20:=tr4is(cx,sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0),t16,t17,t18,t19):prop2(pl"n"(x,1),f,pl"r"(r,m))
t21:=andi(prop1(pl"n"(x,1),f,pl"r"(r,m)),prop2(pl"n"(x,1),f,pl"r"(r,m)),t15,t20):prop3(pl"n"(x,1),f,pl"r"(r,m))
t22:=somei(real,[t:real]prop3(pl"n"(x,1),f,t),pl"r"(r,m),t21):prop4(pl"n"(x,1),f)
f@t23:=someapp(real,[t:real]prop3(lf,t),<lf>p,prop4(pl"n"(x,1),f),[t:real][u:prop3(lf,t)]t22(t,u)):prop4(pl"n"(x,1),f)
p@t25:=[u:[t:1to(pl"n"(x,1))]cx]t23(u):prop5(pl"n"(x,1))
t26:=isp(nat,[t:nat]prop5(t),pl"n"(x,1),<x>suc,t25,satz4a(x)):prop5(<x>suc)
-8287
satz287:=<f>induction([t:nat]prop5".8287"(t),t7".8287",[t:nat][u:prop5".8287"(t)]t26".8287"(t,u),x):some"r"([t:real]and(lessis(mod(sum(x,f)),t),is(sum(x,modf(f)),pli(t,0))))
+8288
prop1:=is(pli(mod(prod(x,f)),0),prod(x,modf(f))):'prop'
x@prop2:=[u:[t:1to(x)]cx]prop1(u):'prop'
@[f:[t:1to(1)]cx]
t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
t2:=ismod(prod(1,f),<xout(1)>f,t1):is"r"(mod(prod(1,f)),mod(<xout(1)>f))
t3:=isrecx1(mod(prod(1,f)),mod(<xout(1)>f),0,t2):is(pli(mod(prod(1,f)),0),pli(mod(<xout(1)>f),0))
t4:=satz277([t:cx][u:cx]ts(t,u),modf(1,f)):is(prod(1,modf(1,f)),pli(mod(<xout(1)>f),0))
t5:=tris2(cx,pli(mod(prod(1,f)),0),prod(1,modf(1,f)),pli(mod(<xout(1)>f),0),t3,t4):prop1(1,f)
@t6:=[u:[t:1to(1)]cx]t5(u):prop2(1)
x@[p:prop2(x)][f:[t:1to(pl"n"(x,1))]cx]
t7:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
lf:=left(cx,pl"n"(x,1),x,t7,f):[t:1to(x)]cx
t8:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
m:=mod(<xout(pl"n"(x,1))>f):real
t9:=ismod(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),t8):is"r"(mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)))
t10:=satz268(prod(x,lf),<xout(pl"n"(x,1))>f):is"r"(mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m))
t11:=tris(real,mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m),t9,t10):is"r"(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m))
t12:=isrecx1(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m),0,t11):is(pli(mod(prod(pl"n"(x,1),f)),0),pli(ts"r"(mod(prod(x,lf)),m),0))
lmf:=left(cx,pl"n"(x,1),x,t7,modf(pl"n"(x,1),f)):[t:1to(x)]cx
t13:=satz278([t:cx][u:cx]ts(t,u),x,modf(pl"n"(x,1),f)):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)))
t14:=symis(cx,pli(mod(prod(x,lf)),0),prod(x,lmf),<lf>p):is(prod(x,lmf),pli(mod(prod(x,lf)),0))
t15:=ists1(prod(x,lmf),pli(mod(prod(x,lf)),0),pli(m,0),t14):is(ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)))
t16:=tsis12a(mod(prod(x,lf)),0,m,0):is(ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))))
t17:=tris(real,mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),mn"r"(ts"r"(mod(prod(x,lf)),m),0),ts"r"(mod(prod(x,lf)),m),ismn2"r"(ts"r"(0,0),0,ts"r"(mod(prod(x,lf)),m),ts01"r"(0,0,refis(real,0))),pl02"r"(ts"r"(mod(prod(x,lf)),m),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m))
t18:=tris(real,pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),pl"r"(0,0),0,ispl12"r"(ts"r"(mod(prod(x,lf)),0),0,ts"r"(0,m),0,ts02"r"(mod(prod(x,lf)),0,refis(real,0)),ts01"r"(0,m,refis(real,0))),pl01"r"(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0)
t19:=isrecx12(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0,t17,t18):is(pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0))
t20:=tr4is(cx,prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0),t13,t15,t16,t19):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0))
t21:=tris2(cx,pli(mod(prod(pl"n"(x,1),f)),0),prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0),t12,t20):prop1(pl"n"(x,1),f)
p@t21a:=[u:[t:1to(pl"n"(x,1))]cx]t21(u):prop2(pl"n"(x,1))
t22:=isp(nat,[t:nat]prop2(t),pl"n"(x,1),<x>suc,t21a,satz4a(x)):prop2(<x>suc)
-8288
satz288:=<f>induction([t:nat]prop2".8288"(t),t6".8288",[t:nat][u:prop2".8288"(t)]t22".8288"(t,u),x):is(pli(mod(prod(x,f)),0),prod(x,modf(f)))
+8289
prop1:=is(prod(x,f),0c):'prop'
prop2:=some"l"(1to(x),[t:1to(x)]is(<t>f,0c)):'prop'
prop3:=iff(prop1,prop2):'prop'
x@prop4:=[u:[t:1to(x)]cx]prop3(u):'prop'
@[f:[t:1to(1)]cx]
t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
[p:prop1(1,f)]
t2:=tris1(cx,<xout(1)>f,0c,prod(1,f),t1,p):is(<xout(1)>f,0c)
t3:=somei(1to(1),[t:1to(1)]is(<t>f,0c),xout(1),t2):prop2(1,f)
f@[p:prop2(1,f)][u:1to(1)][i:is(<u>f,0c)]
t4:=th1"n.singlet"(u):is"e"(1to(1),u,xout(1))
t5:=tr3is(cx,prod(1,f),<xout(1)>f,<u>f,0c,t1,isf(1to(1),cx,f,xout(1),u,symis(1to(1),u,xout(1),t4)),i):prop1(1,f)
p@t6:=someapp(1to(1),[t:1to(1)]is(<t>f,0c),p,prop1(1,f),[t:1to(1)][u:is(<t>f,0c)]t5(t,u)):prop1(1,f)
f@t7:=iffi(prop1(1,f),prop2(1,f),[t:prop1(1,f)]t3(t),[t:prop2(1,f)]t6(t)):prop3(1,f)
@t8:=[u:[t:1to(1)]cx]t7(u):prop4(1)
x@[p:prop4(x)][f:[t:1to(pl"n"(x,1))]cx]
t9:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
lf:=left(cx,pl"n"(x,1),x,t9,f):[t:1to(x)]cx
t10:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
[q:prop1(pl"n"(x,1),f)]
t11:=tris1(cx,ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,prod(pl"n"(x,1),f),t10,q):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
t12:=satz221c(prod(x,lf),<xout(pl"n"(x,1))>f,t11):or(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c))
[i:is(prod(x,lf),0c)]
t13:=th3"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,i):prop2(x,lf)
[n:1to(x)][j:is(<n>lf,0c)]
t14:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),left1to(pl"n"(x,1),x,t9,n),j):prop2(pl"n"(x,1),f)
i@t15:=someapp(1to(x),[t:1to(x)]is(<t>lf,0c),t13,prop2(pl"n"(x,1),f),[t:1to(x)][u:is(<t>lf,0c)]t14(t,u)):prop2(pl"n"(x,1),f)
q@[i:is(<xout(pl"n"(x,1))>f,0c)]
t16:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),xout(pl"n"(x,1)),i):prop2(pl"n"(x,1),f)
q@t17:=orapp(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c),prop2(pl"n"(x,1),f),t12,[t:is(prod(x,lf),0c)]t15(t),[t:is(<xout(pl"n"(x,1))>f,0c)]t16(t)):prop2(pl"n"(x,1),f)
f@[q:prop2(pl"n"(x,1),f)][n:1to(pl"n"(x,1))][i:is(<n>f,0c)][j:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]
t18:=tris1(cx,<xout(pl"n"(x,1))>f,0c,<n>f,isf(1to(pl"n"(x,1)),cx,f,n,xout(pl"n"(x,1)),j),i):is(<xout(pl"n"(x,1))>f,0c)
t20:=satz221b(prod(x,lf),<xout(pl"n"(x,1))>f,t18):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
i@[m:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]
n1:=inn(pl"n"(x,1),n):nat
[j:is"n"(n1,pl"n"(x,1))]
t21:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),pl"n"(x,1),lessisi3(pl"n"(x,1)),j):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)))
t22:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)),isoutinn(pl"n"(x,1),n),t21):is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))
m@t23:=th3"l.imp"(is"n"(n1,pl"n"(x,1)),is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),m,[t:is"n"(n1,pl"n"(x,1))]t22(t)):nis"n"(n1,pl"n"(x,1))
t24:=ore1(less"n"(n1,pl"n"(x,1)),is"n"(n1,pl"n"(x,1)),1top(pl"n"(x,1),n),t23):less"n"(n1,pl"n"(x,1))
t25:=satz26(x,n1,t24):lessis"n"(n1,x)
n2:=outn(x,n1,t25):1to(x)
t26:=isinoutn(x,n1,t25):is"n"(n1,inn(x,n2))
t27:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),inn(x,n2),trlessis"n"(inn(x,n2),x,pl"n"(x,1),1top(x,n2),t9),t26):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2))
t28:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2),isoutinn(pl"n"(x,1),n),t27):is"e"(1to(pl"n"(x,1)),n,left1to(pl"n"(x,1),x,t9,n2))
t29:=isf(1to(pl"n"(x,1)),cx,f,n,left1to(pl"n"(x,1),x,t9,n2),t28):is(<n>f,<n2>lf)
t30:=tris1(cx,<n2>lf,0c,<n>f,t29,i):is(<n2>lf,0c)
t31:=somei(1to(x),[t:1to(x)]is(<t>lf,0c),n2,t30):prop2(x,lf)
t32:=th4"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,t31):prop1(x,lf)
t34:=satz221a(prod(x,lf),<xout(pl"n"(x,1))>f,t32):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
i@t35:=th1"l.imp"(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c),[t:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]t20(t),[t:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]t34(t)):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
t36:=tris(cx,prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,t10,t35):prop1(pl"n"(x,1),f)
q@t37:=someapp(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),q,prop1(pl"n"(x,1),f),[t:1to(pl"n"(x,1))][u:is(<t>f,0c)]t36(t,u)):prop1(pl"n"(x,1),f)
f@t38:=iffi(prop1(pl"n"(x,1),f),prop2(pl"n"(x,1),f),[t:prop1(pl"n"(x,1),f)]t17(t),[t:prop2(pl"n"(x,1),f)]t37(t)):prop3(pl"n"(x,1),f)
p@t39:=[u:[t:1to(pl"n"(x,1))]cx]t38(u):prop4(pl"n"(x,1))
t40:=isp(nat,[t:nat]prop4(t),pl"n"(x,1),<x>suc,t39,satz4a(x)):prop4(<x>suc)
-8289
satz289:=<f>induction([t:nat]prop4".8289"(t),t8".8289",[t:nat][u:prop4".8289"(t)]t40".8289"(t,u),x):iff(is(prod(x,f),0c),some"l"(1to(x),[t:1to(x)]is(<t>f,0c)))
[i:is(prod(x,f),0c)]
satz289a:=th3"l.iff"(prop1".8289",prop2".8289",satz289,i):some"l"(1to(x),[t:1to(x)]is(<t>f,0c))
f@[n:1to(x)][i:is(<n>f,0c)]
+*8289
i"c"@t41:=somei(1to(x),[t:1to(x)]is(<t>f,0c),n,i):prop2
-8289
i@satz289b:=th4"l.iff"(prop1".8289",prop2".8289",satz289,t41".8289"):is(prod(x,f),0c)
@[x:complex][m:real][mi:intrl(m)][o:or(nis(x,0c),pos(m))]
+v9
[p:pos(m)]
t1:=posintnatrl(m,p,mi):natrl(m)
m1:=ntofrl(m,t1):nat
pw1:=prod(m1,[t:1to(m1)]x):cx
-v9
x@[y:complex][m:real][n:real][i:is(x,y)][j:is"r"(m,n)][mi1:intrl(m)][ni1:intrl(n)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(n))]
+*v9
oy@[mp:pos(m)][np:pos(n)]
m0:=m1(x,m,mi1,ox,mp):nat
n0:=m1(y,n,ni1,oy,np):nat
t2:=isrlent(m,t1(x,m,mi1,ox,mp),n,t1(y,n,ni1,oy,np),j):is"n"(m0,n0)
t3:=lessisi2"n"(m0,n0,t2):lessis"n"(m0,n0)
t4:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]y,m0,t2):is(prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np))
t5:=fisi(1to(m0),cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),[t:1to(m0)]i):is"e"([t:1to(m0)]cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y))
t6:=isf([t:1to(m0)]cx,cx,[u:[t:1to(m0)]cx]prod(m0,u),[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),t5):is(pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)))
t7:=tris(cx,pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np),t6,t4):is(pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,np))
p@[p1:pos(m)]
t8:=t7(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,p,p1):is(pw1(p),pw1(p1))
p@[n:nis(x,0c)]
t9:=th5"l.some"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c),[t:1to(m1)]n):not(some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)))
t10:=th3"l.imp"(is(pw1,0c),some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)),t9,[t:is(pw1,0c)]satz289a(m1,[u:1to(m1)]x,t)):nis(pw1,0c)
o@[n:neg(m)]
mi@t11:=intabs(m,mi):intrl(abs(m))
n@t12:=satz166b(m,n):pos(abs(m))
t13:=ori2(nis(x,0c),pos(abs(m)),t12):or(nis(x,0c),pos(abs(m)))
t14:=ore1(nis(x,0c),pos(m),o,nnotp(m,n)):nis(x,0c)
t15:=t10(abs(m),t11,t13,t12,t14):nis(pw1(abs(m),t11,t13,t12),0c)
pw2:=ov(1c,pw1(abs(m),t11,t13,t12),t15):cx
oy@[nm:neg(m)][nn:neg(n)]
pwm:=pw1(x,abs(m),t11(x,m,mi1),t13(x,m,mi1,ox,nm),t12(x,m,mi1,ox,nm)):cx
pwn:=pw1(y,abs(n),t11(y,n,ni1),t13(y,n,ni1,oy,nn),t12(y,n,ni1,oy,nn)):cx
t16:=t7(abs(m),abs(n),i,isabs(m,n,j),t11(x,m,mi1),t11(y,n,ni1),t13(x,m,mi1,ox,nm),t13(y,n,ni1,oy,nn),t12(x,m,mi1,ox,nm),t12(y,n,ni1,oy,nn)):is(pwm,pwn)
t17:=isov2(pwm,pwn,1c,t16,t15(x,m,mi1,ox,nm),t15(y,n,ni1,oy,nn)):is(pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,nn))
n@[n1:neg(m)]
t18:=t17(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,n,n1):is(pw2(n),pw2(n1))
o@pw3:=ite"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c)):cx
n@t19:=itet"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),n):is(pw3,pw2(n))
o@[nn:not(neg(m))]
t20:=itef"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),nn):is(pw3,1c)
nm@t21:=isp(real,[t:real]neg(t),m,n,nm,j):neg(n)
t22:=t19(x,m,mi1,ox,nm):is(pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm))
t23:=symis(cx,pw3(y,n,ni1,oy),pw2(y,n,ni1,oy,t21),t19(y,n,ni1,oy,t21)):is(pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy))
t24:=tr3is(cx,pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy),t22,t17(t21),t23):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
oy@[nn:not(neg(m))]
t25:=isp(real,[t:real]not(neg(t)),m,n,nn,j):not(neg(n))
t26:=t20(x,m,mi1,ox,nn):is(pw3(x,m,mi1,ox),1c)
t27:=t20(y,n,ni1,oy,t25):is(pw3(y,n,ni1,oy),1c)
t28:=tris2(cx,pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),1c,t26,t27):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
oy@t29:=th1"l.imp"(neg(m),is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy)),[t:neg(m)]t24(t),[t:not(neg(m))]t28(t)):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-v9
o@pw:=ite"l.r"(pos(m),cx,[t:pos(m)]pw1".v9"(t),[t:not(pos(m))]pw3".v9",[t:pos(m)][u:pos(m)]t8".v9"(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3".v9")):cx
+*v9
p@t30:=itet"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),p):is(pw,pw1(p))
o@[n:not(pos(m))]
t31:=itef"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),n):is(pw,pw3)
o@[i:is"r"(m,0)]
t32:=tris(cx,pw,pw3,1c,t31(0notp(m,i)),t20(0notn(m,i))):is(pw,1c)
o@[n:neg(m)]
t33:=tris(cx,pw,pw3,pw2(n),t31(nnotp(m,n)),t19(n)):is(pw,pw2(n))
-v9
o@[p:pos(m)]
posexp:=t30".v9"(p):is(pw(x,m,mi,o),prod(ntofrl(m,posintnatrl(m,p,mi)),[t:1to(ntofrl(m,posintnatrl(m,p,mi)))]x))
[n:nis(x,0c)]
lemmapw1:=th2"e.notis"(cx,pw1".v9"(p),0c,pw,t10".v9"(p,n),posexp):nis(pw(x,m,mi,o),0c)
o@[i:is"r"(m,0)]
0exp:=t32".v9"(i):is(pw(x,m,mi,o),1c)
o@[n:neg(m)]
lemmapw2:=t14".v9"(n):nis(x,0c)
lemmapw3:=t13".v9"(n):or(nis(x,0c),pos(abs(m)))
+*v9
n@t34:=t30(abs(m),t11,t13(n),t12(n)):is(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)))
t35:=isov2(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)),1c,t34,lemmapw1(abs(m),t11,t13(n),t12(n),t14(n)),t15(n)):is(ov(1c,pw(x,abs(m),t11,t13(n)),lemmapw1(abs(m),t11,t13(n),t12(n),t14(n))),pw2(n))
-v9
n@negexp:=tris2(cx,pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)),pw2".v9"(n),t33".v9"(n),t35".v9"(n)):is(pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)))
+*v9
mp@t36:=isp(real,[t:real]pos(t),m,n,mp,j):pos(n)
t37:=t30(x,m,mi1,ox,mp):is(pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp))
t38:=symis(cx,pw(y,n,ni1,oy),pw1(y,n,ni1,oy,t36),t30(y,n,ni1,oy,t36)):is(pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy))
t39:=tr3is(cx,pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy),t37,t7(t36),t38):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
oy@[np:not(pos(m))]
t40:=isp(real,[t:real]not(pos(t)),m,n,np,j):not(pos(n))
t41:=t31(x,m,mi1,ox,np):is(pw(x,m,mi1,ox),pw3(x,m,mi1,ox))
t42:=symis(cx,pw(y,n,ni1,oy),pw3(y,n,ni1,oy),t31(y,n,ni1,oy,t40)):is(pw3(y,n,ni1,oy),pw(y,n,ni1,oy))
t43:=tr3is(cx,pw(x,m,mi1,ox),pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),pw(y,n,ni1,oy),t41,t29,t42):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-v9
oy@ispw12:=th1"l.imp"(pos(m),is(pw(x,m,mi1,ox),pw(y,n,ni1,oy)),[t:pos(m)]t39".v9"(t),[t:not(pos(m))]t43".v9"(t)):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
m@[i:is(x,y)][mi:intrl(m)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(m))]
ispw1:=ispw12(x,y,m,m,i,refis(real,m),mi,mi,ox,oy):is(pw(x,m,mi,ox),pw(y,m,mi,oy))
x@[m:real][n:real][i:is"r"(m,n)][mi:intrl(m)][ni:intrl(n)][om:or(nis(x,0c),pos(m))][on:or(nis(x,0c),pos(n))]
ispw2:=ispw12(x,x,m,n,refis(cx,x),i,mi,ni,om,on):is(pw(x,m,mi,om),pw(x,n,ni,on))
o@[n:nis(x,0c)]
+9290
[p:pos(m)]
t1:=lemmapw1(p,n):nis(pw(x,m,mi,o),0c)
@[i:is(1c,0c)]
t2:=tr3is(real,1rl,re(1c),re(0c),0,isre(1rl,0),iscere(1c,0c,i),reis(0,0)):is"r"(1rl,0)
-9290
@1not0:=th3"l.imp"(is(1c,0c),is"r"(1rl,0),pnot0(1rl,pos1),[t:is(1c,0c)]t2".9290"(t)):nis(1c,0c)
+*9290
n@[i:is"r"(m,0)]
t4:=th2"e.notis"(cx,1c,0c,pw(x,m,mi,o),1not0,0exp(i)):nis(pw(x,m,mi,o),0c)
n@[nm:neg(m)]
p0:=pw(x,abs(m),intabs(m,mi),lemmapw3(nm)):cx
t5:=lemmapw1(x,abs(m),intabs(m,mi),lemmapw3(nm),satz166b(m,nm),lemmapw2(nm)):nis(p0,0c)
t6:=tris(cx,ts(pw(x,m,mi,o),p0),ts(ov(1c,p0,t5),p0),1c,ists1(pw(x,m,mi,o),ov(1c,p0,t5),p0,negexp(nm)),satz229e(1c,p0,t5)):is(ts(pw(x,m,mi,o),p0),1c)
t7:=th2"e.notis"(cx,1c,0c,ts(pw(x,m,mi,o),p0),1not0,t6):nis(ts(pw(x,m,mi,o),p0),0c)
t8:=th3"l.imp"(is(pw(x,m,mi,o),0c),is(ts(pw(x,m,mi,o),p0),0c),t7,[t:is(pw(x,m,mi,o),0c)]satz221a(pw(x,m,mi,o),p0,t)):nis(pw(x,m,mi,o),0c)
-9290
n@satz290:=rapp(m,nis(pw(x,m,mi,o),0c),[t:pos(m)]t1".9290"(t),[t:is"r"(m,0)]t4".9290"(t),[t:neg(m)]t8".9290"(t)):nis(pw(x,m,mi,o),0c)
x@lemma291:=ori2(nis(x,0c),pos(1rl),pos1):or(nis(x,0c),pos(1rl))
+9291
1a:=ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)):nat
t1:=posexp(x,1rl,intrl1,lemma291,pos1):is(pw(x,1rl,intrl1,lemma291),prod(1a,[t:1to(1a)]x))
t2:=tris(nat,1,ntofrl(1rl,natrl1),ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)),isntrl1(1),isrlent(1rl,natrl1,1rl,posintnatrl(1rl,pos1,intrl1),refis(real,1rl))):is"n"(1,1a)
t3:=lessisi2"n"(1,1a,t2):lessis"n"(1,1a)
t4:=issmpr([t:cx][u:cx]ts(t,u),1a,[t:1to(1a)]x,1,t2):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),prod(1a,[t:1to(1a)]x))
t5:=satz277([t:cx][u:cx]ts(t,u),left(cx,1a,1,t3,[t:1to(1a)]x)):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),x)
t6:=tris1(cx,prod(1a,[t:1to(1a)]x),x,prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),t4,t5):is(prod(1a,[t:1to(1a)]x),x)
-9291
satz291:=tris(cx,pw(x,1rl,intrl1,lemma291),prod(1a".9291",[t:1to(1a".9291")]x),x,t1".9291",t6".9291"):is(pw(x,1rl,intrl1,lemma291),x)
[y:cx][m:real][mi:intrl(m)][o:or(and(nis(x,0c),nis(y,0c)),pos(m))]
+9292
[a:and(nis(x,0c),nis(y,0c))]
t1:=ande1(nis(x,0c),nis(y,0c),a):nis(x,0c)
t2:=ande2(nis(x,0c),nis(y,0c),a):nis(y,0c)
t3:=satz221d(x,y,t1,t2):nis(ts(x,y),0c)
-9292
lemma292a:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(x,0c),o,[t:and(nis(x,0c),nis(y,0c))]t1".9292"(t)):or(nis(x,0c),pos(m))
lemma292b:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(y,0c),o,[t:and(nis(x,0c),nis(y,0c))]t2".9292"(t)):or(nis(y,0c),pos(m))
lemma292c:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(ts(x,y),0c),o,[t:and(nis(x,0c),nis(y,0c))]t3".9292"(t)):or(nis(ts(x,y),0c),pos(m))
+*9292
x@[n:nat]
nr:=rlofnt(n):real
t4:=natintrl(nr,natrli(n)):intrl(nr)
t5:=ori2(nis(x,0c),pos(nr),natpos(nr,natrli(n))):or(nis(x,0c),pos(nr))
p0:=pw(x,nr,t4,t5):cx
x@t6:=tris(cx,p0(1),pw(x,1rl,intrl1,lemma291(x)),x,ispw1(x,x,1rl,refis(cx,x),intrl1,t5(1),lemma291(x)),satz291(x)):is(p0(1),x)
n@n0:=ntofrl(nr,posintnatrl(nr,natpos(nr,natrli(n)),t4)):nat
t7:=tris(nat,n,ntofrl(nr,natrli(n)),n0,isntrl1(n),isrlent(nr,natrli(n),nr,posintnatrl(nr,natpos(nr,natrli(n)),t4),refis(real,nr))):is"n"(n,n0)
t8:=lessisi2"n"(n,n0,t7):lessis"n"(n,n0)
t9:=posexp(x,nr,t4,t5,natpos(nr,natrli(n))):is(p0,prod(n0,[t:1to(n0)]x))
t10:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]x,n,t7):is(prod(n,left(cx,n0,n,t8,[t:1to(n0)]x)),prod(n0,[t:1to(n0)]x))
t11:=tris2(cx,p0,prod(n,[t:1to(n)]x),prod(n0,[t:1to(n0)]x),t9,t10):is(p0,prod(n,[t:1to(n)]x))
n1:=pl"n"(n,1):nat
t12:=lessisi1"n"(n,n1,satz18a(n,1)):lessis"n"(n,n1)
t13:=satz278([t:cx][u:cx]ts(t,u),n,[t:1to(n1)]x):is(prod(n1,[t:1to(n1)]x),ts(prod(n,left(cx,n1,n,t12,[t:1to(n1)]x)),x))
t14:=ists1(p0,prod(n,[t:1to(n)]x),x,t11):is(ts(p0,x),ts(prod(n,[t:1to(n)]x),x))
t15:=tris2(cx,prod(n1,[t:1to(n1)]x),ts(p0,x),ts(prod(n,[t:1to(n)]x),x),t13,t14):is(prod(n1,[t:1to(n1)]x),ts(p0,x))
t16:=tris(cx,p0(n1),prod(n1,[t:1to(n1)]x),ts(p0,x),t11(n1),t15):is(p0(n1),ts(p0(n),x))
y@[n:nat]
prop1:=is(p0(ts(x,y),n),ts(p0(x,n),p0(y,n))):'prop'
y@t17:=ists12(p0(x,1),x,p0(y,1),y,t6(x),t6(y)):is(ts(p0(x,1),p0(y,1)),ts(x,y))
t18:=tris2(cx,p0(ts(x,y),1),ts(p0(x,1),p0(y,1)),ts(x,y),t6(ts(x,y)),t17):prop1(1)
n@[p:prop1(n)]
t19:=ists1(p0(ts(x,y),n),ts(p0(x,n),p0(y,n)),ts(x,y),p):is(ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)))
t20:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),x),ts(p0(x,n),ts(p0(y,n),x)),ts(p0(x,n),ts(x,p0(y,n))),ts(ts(p0(x,n),x),p0(y,n)),assts1(p0(x,n),p0(y,n),x),ists2(ts(p0(y,n),x),ts(x,p0(y,n)),p0(x,n),comts(p0(y,n),x)),assts2(p0(x,n),x,p0(y,n))):is(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)))
t21:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(ts(p0(x,n),p0(y,n)),x),y),ts(ts(ts(p0(x,n),x),p0(y,n)),y),ts(ts(p0(x,n),x),ts(p0(y,n),y)),assts2(ts(p0(x,n),p0(y,n)),x,y),ists1(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)),y,t20),assts1(ts(p0(x,n),x),p0(y,n),y)):is(ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
t22:=tr3is(cx,p0(ts(x,y),n1(n)),ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t16(ts(x,y),n),t19,t21):is(p0(ts(x,y),n1(n)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
t23:=ists12(p0(x,n1(n)),ts(p0(x,n),x),p0(y,n1(n)),ts(p0(y,n),y),t16(x,n),t16(y,n)):is(ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
t24:=tris2(cx,p0(ts(x,y),n1(n)),ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t22,t23):prop1(n1(n))
t25:=isp(nat,[t:nat]prop1(t),n1(n),<n>suc,t24,satz4a(n)):prop1(<n>suc)
n@t26:=induction([t:nat]prop1(t),t18,[t:nat][u:prop1(t)]t25(t,u),n):prop1
o@prop2:=is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b))):'prop'
[p:pos(m)]
t28:=posintnatrl(m,p,mi):natrl(m)
m0:=ntofrl(m,t28):nat
t29:=isrlnt1(m,t28):is"r"(m,nr(m0))
t30:=isrlnt2(m,t28):is"r"(nr(m0),m)
t31:=ispw2(ts(x,y),m,nr(m0),t29,mi,t4(ts(x,y),m0),lemma292c,t5(ts(x,y),m0)):is(pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0))
t32:=ists12(p0(x,m0),pw(x,m,mi,lemma292a),p0(y,m0),pw(y,m,mi,lemma292b),ispw2(x,nr(m0),m,t30,t4(x,m0),mi,t5(x,m0),lemma292a),ispw2(y,nr(m0),m,t30,t4(y,m0),mi,t5(y,m0),lemma292b)):is(ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
t33:=tr3is(cx,pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0),ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),t31,t26(m0),t32):prop2
o@[i:is"r"(m,0)]
t34:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(1c,1c),1c,ists12(pw(x,m,mi,lemma292a),1c,pw(y,m,mi,lemma292b),1c,0exp(x,m,mi,lemma292a,i),0exp(y,m,mi,lemma292b,i)),satz222(1c)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c)
t35:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c,0exp(ts(x,y),m,mi,lemma292c,i),t34):prop2
o@[n:neg(m)]
t36:=intabs(m,mi):intrl(abs(m))
t37:=ori2(and(nis(x,0c),nis(y,0c)),pos(abs(m)),satz166b(m,n)):or(and(nis(x,0c),nis(y,0c)),pos(abs(m)))
t38:=lemma292a(abs(m),t36,t37):or(nis(x,0c),pos(abs(m)))
t39:=lemma292b(abs(m),t36,t37):or(nis(y,0c),pos(abs(m)))
t40:=lemma292c(abs(m),t36,t37):or(nis(ts(x,y),0c),pos(abs(m)))
t41:=lemmapw3(x,m,mi,lemma292a,n):or(nis(x,0c),pos(abs(m)))
t42:=lemmapw3(y,m,mi,lemma292b,n):or(nis(y,0c),pos(abs(m)))
t43:=lemmapw3(ts(x,y),m,mi,lemma292c,n):or(nis(ts(x,y),0c),pos(abs(m)))
t44:=ispw2(ts(x,y),abs(m),abs(m),refis(real,abs(m)),t36,t36,t43,t40):is(pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40))
t45:=t33(abs(m),t36,t37,satz166b(m,n)):is(pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)))
t46:=ists12(pw(x,abs(m),t36,t38),pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t39),pw(y,abs(m),t36,t42),ispw2(x,abs(m),abs(m),refis(real,abs(m)),t36,t36,t38,t41),ispw2(y,abs(m),abs(m),refis(real,abs(m)),t36,t36,t39,t42)):is(ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
t47:=tr3is(cx,pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t44,t45,t46):is(pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
t48:=lemmapw1(x,abs(m),t36,t41,satz166b(m,n),lemmapw2(x,m,mi,lemma292a,n)):nis(pw(x,abs(m),t36,t41),0c)
t49:=lemmapw1(y,abs(m),t36,t42,satz166b(m,n),lemmapw2(y,m,mi,lemma292b,n)):nis(pw(y,abs(m),t36,t42),0c)
t50:=lemmapw1(ts(x,y),abs(m),t36,t43,satz166b(m,n),lemmapw2(ts(x,y),m,mi,lemma292c,n)):nis(pw(ts(x,y),abs(m),t36,t43),0c)
t51:=satz221d(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42),t48,t49):nis(ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),0c)
t52:=negexp(ts(x,y),m,mi,lemma292c,n):is(pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50))
t53:=isov12(1c,ts(1c,1c),pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),satz222a(1c),t47,t50,t51):is(ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
t54:=tris(cx,pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t52,t53):is(pw(ts(x,y),m,mi,lemma292c),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
t55:=ists12(pw(x,m,mi,lemma292a),ov(1c,pw(x,abs(m),t36,t41),t48),pw(y,m,mi,lemma292b),ov(1c,pw(y,abs(m),t36,t42),t49),negexp(x,m,mi,lemma292a,n),negexp(y,m,mi,lemma292b,n)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)))
t56:=satz247(1c,pw(x,abs(m),t36,t41),1c,pw(y,abs(m),t36,t42),t48,t49):is(ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
t57:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t55,t56):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
t58:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t54,t57):prop2
-9292
o@satz292:=rapp(m,prop2".9292",[t:pos(m)]t33".9292"(t),[t:is"r"(m,0)]t35".9292"(t),[t:neg(m)]t58".9292"(t)):is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
@[m:real]
lemma293:=ori1(nis(1c,0c),pos(m),1not0):or(nis(1c,0c),pos(m))
[mi:intrl(m)]
+9293
t1:=ori1(and(nis(1c,0c),nis(1c,0c)),pos(m),andi(nis(1c,0c),nis(1c,0c),1not0,1not0)):or(and(nis(1c,0c),nis(1c,0c)),pos(m))
1m:=pw(1c,m,mi,lemma293):cx
t2:=satz222(1m):is(ts(1m,1c),1m)
t3:=ispw1(1c,ts(1c,1c),m,satz222a(1c),mi,lemma293,lemma292c(1c,1c,m,mi,t1)):is(1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)))
t4:=satz292(1c,1c,m,mi,t1):is(pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))))
t5:=ists12(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),1m,pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1)),1m,ispw1(1c,1c,m,refis(cx,1c),mi,lemma292a(1c,1c,m,mi,t1),lemma293),ispw1(1c,1c,m,refis(cx,1c),mi,lemma292b(1c,1c,m,mi,t1),lemma293)):is(ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m))
t6:=tr4is(cx,ts(1m,1c),1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m),t2,t3,t4,t5):is(ts(1m,1c),ts(1m,1m))
t7:=tris(cx,ts(1m,mn(1m,1c)),mn(ts(1m,1m),ts(1m,1c)),0c,disttm2(1m,1m,1c),satz213b(ts(1m,1m),ts(1m,1c),symis(cx,ts(1m,1c),ts(1m,1m),t6))):is(ts(1m,mn(1m,1c)),0c)
t8:=ore2(is(1m,0c),is(mn(1m,1c),0c),satz221c(1m,mn(1m,1c),t7),satz290(1c,m,mi,lemma293,1not0)):is(mn(1m,1c),0c)
-9293
satz293:=satz213a(1m".9293",1c,t8".9293"):is(pw(1c,m,mi,lemma293),1c)
x@[m:real][n:real][mi:intrl(m)][ni:intrl(n)][o:or(nis(x,0c),and(pos(m),pos(n)))]
+9294
[a:and(pos(m),pos(n))]
t1:=ande1(pos(m),pos(n),a):pos(m)
t2:=ande2(pos(m),pos(n),a):pos(n)
t3:=pospl(m,n,t1,t2):pos(pl"r"(m,n))
-9294
lemma294a:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(m),o,[t:and(pos(m),pos(n))]t1".9294"(t)):or(nis(x,0c),pos(m))
lemma294b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(n),o,[t:and(pos(m),pos(n))]t2".9294"(t)):or(nis(x,0c),pos(n))
lemma294c:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(pl"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9294"(t)):or(nis(x,0c),pos(pl"r"(m,n)))
+*9294
o@prop1:=is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c)):'prop'
a@m1:=ntofrl(m,posintnatrl(m,t1,mi)):nat
n1:=ntofrl(n,posintnatrl(n,t2,ni)):nat
t4:=ists12(pw(x,m,mi,lemma294a),prod(m1,[t:1to(m1)]x),pw(x,n,ni,lemma294b),prod(n1,[t:1to(n1)]x),posexp(x,m,mi,lemma294a,t1),posexp(x,n,ni,lemma294b,t2)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
p1:=ntofrl(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni))):nat
t5:=posexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t3):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(p1,[t:1to(p1)]x))
t6:=tris(real,pl"r"(m,n),pl"r"(rlofnt(m1),rlofnt(n1)),rlofnt(pl"n"(m1,n1)),ispl12"r"(m,rlofnt(m1),n,rlofnt(n1),isrlnt1(m,posintnatrl(m,t1,mi)),isrlnt1(n,posintnatrl(n,t2,ni))),satzr155b(m1,n1)):is"r"(pl"r"(m,n),rlofnt(pl"n"(m1,n1)))
t7:=tris2(nat,pl"n"(m1,n1),p1,ntofrl(rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1))),isntrl1(pl"n"(m1,n1)),isrlent(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni)),rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1)),t6)):is"n"(pl"n"(m1,n1),p1)
t8:=lessisi2"n"(pl"n"(m1,n1),p1,t7):lessis"n"(pl"n"(m1,n1),p1)
t9:=issmpr([t:cx][u:cx]ts(t,u),p1,[t:1to(p1)]x,pl"n"(m1,n1),t7):is(prod(pl"n"(m1,n1),left(cx,p1,pl"n"(m1,n1),t8,[t:1to(p1)]x)),prod(p1,[t:1to(p1)]x))
t10:=tris2(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),prod(p1,[t:1to(p1)]x),t5,t9):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x))
t11:=lessisi1"n"(m1,pl"n"(m1,n1),satz18a(m1,n1)):lessis"n"(m1,pl"n"(m1,n1))
t12:=satz281([t:cx][u:cx]ts(t,u),assocts,m1,n1,[t:1to(pl"n"(m1,n1))]x):is(prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,left(cx,pl"n"(m1,n1),m1,t11,[t:1to(pl"n"(m1,n1))]x)),prod(n1,right(cx,m1,n1,[t:1to(pl"n"(m1,n1))]x))))
t13:=tris(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t10,t12):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
t14:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t4,t13):prop1
o@[na:not(and(pos(m),pos(n)))]
t15:=ore1(nis(x,0c),and(pos(m),pos(n)),o,na):nis(x,0c)
t16:=th15"l.or"(pos(m),pos(n),na):or(not(pos(m)),not(pos(n)))
o@am:=abs(m):real
an:=abs(n):real
ap:=abs(pl"r"(m,n)):real
t17:=intabs(m,mi):intrl(am)
t18:=intabs(n,ni):intrl(an)
t19:=intabs(pl"r"(m,n),intpl(m,mi,n,ni)):intrl(ap)
na@[nm:neg(m)][nn:neg(n)]
t20:=andi(pos(am),pos(an),satz166e(m,nnot0(m,nm)),satz166e(n,nnot0(n,nn))):and(pos(am),pos(an))
t21:=ori2(nis(x,0c),and(pos(am),pos(an)),t20):or(nis(x,0c),and(pos(am),pos(an)))
t22:=lemmapw3(x,m,mi,lemma294a,nm):or(nis(x,0c),pos(am))
t23:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
t24:=lemma294a(x,am,an,t17,t18,t21):or(nis(x,0c),pos(am))
t25:=lemma294b(x,am,an,t17,t18,t21):or(nis(x,0c),pos(an))
t26:=ists12(pw(x,am,t17,t22),pw(x,am,t17,t24),pw(x,an,t18,t23),pw(x,an,t18,t25),ispw1(x,x,am,refis(cx,x),t17,t22,t24),ispw1(x,x,an,refis(cx,x),t18,t23,t25)):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)))
t27:=lemma294c(x,am,an,t17,t18,t21):or(nis(x,0c),pos(pl"r"(am,an)))
t28:=t14(x,am,an,t17,t18,t21,t20):is(ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27))
t29:=tr3is(real,pl"r"(am,an),pl"r"(m0"r"(m),m0"r"(n)),m0"r"(pl"r"(m,n)),ap,ispl12"r"(am,m0"r"(m),an,m0"r"(n),absn(m,nm),absn(n,nn)),satz180a(m,n),symis(real,ap,m0"r"(pl"r"(m,n)),absn(pl"r"(m,n),negpl(m,n,nm,nn)))):is"r"(pl"r"(am,an),ap)
t30:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn)):or(nis(x,0c),pos(ap))
t31:=ispw2(x,pl"r"(am,an),ap,t29,intpl(am,t17,an,t18),t19,t27,t30):is(pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30))
t32:=tr3is(cx,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30),t26,t28,t31):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30))
t33:=lemmapw1(x,am,t17,t22,satz166b(m,nm),lemmapw2(x,m,mi,lemma294a,nm)):nis(pw(x,am,t17,t22),0c)
t34:=lemmapw1(x,an,t18,t23,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t23),0c)
t35:=lemmapw1(x,ap,t19,t30,satz166b(pl"r"(m,n),negpl(m,n,nm,nn)),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):nis(pw(x,ap,t19,t30),0c)
t36:=ists12(pw(x,m,mi,lemma294a),ov(1c,pw(x,am,t17,t22),t33),pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t23),t34),negexp(x,m,mi,lemma294a,nm),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)))
t37:=satz221d(pw(x,am,t17,t22),pw(x,an,t18,t23),t33,t34):nis(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),0c)
t38:=satz247(1c,pw(x,am,t17,t22),1c,pw(x,an,t18,t23),t33,t34):is(ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37))
t39:=isov12(ts(1c,1c),1c,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30),satz222(1c),t32,t37,t35):is(ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35))
t40:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t30),t35),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):is(ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
t41:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t36,t38,t39,t40):prop1
na@[pm:pos(m)][nn:neg(n)]
t42:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
t43:=lemmapw1(x,an,t18,t42,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t42),0c)
t44:=ists2(pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t42),t43),pw(x,m,mi,lemma294a),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)))
t45:=satz244a(pw(x,m,mi,lemma294a),1c,pw(x,an,t18,t42),t43):is(ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43))
t46:=isov1(ts(pw(x,m,mi,lemma294a),1c),pw(x,m,mi,lemma294a),pw(x,an,t18,t42),satz222(pw(x,m,mi,lemma294a)),t43):is(ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
t47:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t44,t45,t46):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
[casea:more(m,an)]
t48:=satz182d(m,an,casea):pos(mn"r"(m,an))
t49:=satz166e(n,nnot0(n,nn)):pos(an)
t50:=andi(pos(an),pos(mn"r"(m,an)),t49,t48):and(pos(an),pos(mn"r"(m,an)))
t51:=ori2(nis(x,0c),and(pos(an),pos(mn"r"(m,an))),t50):or(nis(x,0c),and(pos(an),pos(mn"r"(m,an))))
t52:=intmn(m,mi,an,t18):intrl(mn"r"(m,an))
t53:=lemma294a(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(an))
t54:=lemma294b(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(mn"r"(m,an)))
t55:=lemma294c(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(pl"r"(an,mn"r"(m,an))))
t56:=intpl(an,t18,mn"r"(m,an),t52):intrl(pl"r"(an,mn"r"(m,an)))
t57:=t14(x,an,mn"r"(m,an),t18,t52,t51,t50):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55))
t58:=satz187a(m,an):is"r"(pl"r"(an,mn"r"(m,an)),m)
t59:=ispw2(x,pl"r"(an,mn"r"(m,an)),m,t58,t56,mi,t55,lemma294a):is(pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a))
t60:=tris(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a),t57,t59):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a))
t61:=ispw1(x,x,an,refis(cx,x),t18,t53,t42):is(pw(x,an,t18,t53),pw(x,an,t18,t42))
t62:=isp1(cx,[t:cx]nis(t,0c),pw(x,an,t18,t42),pw(x,an,t18,t53),t43,t61):nis(pw(x,an,t18,t53),0c)
t63:=isov12(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a),pw(x,an,t18,t53),pw(x,an,t18,t42),t60,t61,t62,t43):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
t64:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t63):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62))
t65:=satz229h(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54),t62,refis(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)))):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54))
t66:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
t67:=ispw2(x,mn"r"(m,an),pl"r"(m,n),t66,t52,intpl(m,mi,n,ni),t54,lemma294c):is(pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
t68:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t64,t65,t67):prop1
nn@[caseb:is"r"(m,an)]
t69:=ispw2(x,m,an,caseb,mi,t18,lemma294a,t42):is(pw(x,m,mi,lemma294a),pw(x,an,t18,t42))
t70:=satz251a(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43,t69):is(ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c)
t71:=tr3is(real,pl"r"(m,n),mn"r"(m,m0"r"(n)),mn"r"(m,an),0,ispl2"r"(n,m0"r"(m0"r"(n)),m,satz177a(n)),ismn2"r"(m0"r"(n),an,m,symis(real,an,m0"r"(n),absn(n,nn))),satz182e(m,an,caseb)):is"r"(pl"r"(m,n),0)
t72:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),1c,0exp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t71)):is(1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
t73:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t47,t70,t72):prop1
nn@[casec:less(m,an)]
t74:=satz182d(an,m,lemma2"r"(m,an,casec)):pos(mn"r"(an,m))
t75:=andi(pos(m),pos(mn"r"(an,m)),pm,t74):and(pos(m),pos(mn"r"(an,m)))
t76:=ori2(nis(x,0c),and(pos(m),pos(mn"r"(an,m))),t75):or(nis(x,0c),and(pos(m),pos(mn"r"(an,m))))
t77:=intmn(an,t18,m,mi):intrl(mn"r"(an,m))
t78:=lemma294a(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(m))
t79:=lemma294b(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(mn"r"(an,m)))
t80:=lemma294c(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(pl"r"(m,mn"r"(an,m))))
t81:=intpl(m,mi,mn"r"(an,m),t77):intrl(pl"r"(m,mn"r"(an,m)))
t81a:=t14(x,m,mn"r"(an,m),mi,t77,t76,t75):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80))
t82:=satz187a(an,m):is"r"(pl"r"(m,mn"r"(an,m)),an)
t83:=ispw2(x,pl"r"(m,mn"r"(an,m)),an,t82,t81,t18,t80,t42):is(pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42))
t84:=tris(cx,ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42),t81a,t83):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42))
t85:=satz290(x,m,mi,t78,t15):nis(pw(x,m,mi,t78),0c)
t86:=satz290(x,mn"r"(an,m),t77,t79,t15):nis(pw(x,mn"r"(an,m),t77,t79),0c)
t87:=satz221d(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79),t85,t86):nis(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),0c)
t88:=satz222(pw(x,m,mi,t78)):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78))
t89:=ispw1(x,x,m,refis(cx,x),mi,t78,lemma294a):is(pw(x,m,mi,t78),pw(x,m,mi,lemma294a))
t90:=tris(cx,ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78),pw(x,m,mi,lemma294a),t88,t89):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a))
t91:=isov12(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42),t90,t84,t87,t43):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
t92:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t91):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87))
t93:=satz246a(1c,pw(x,mn"r"(an,m),t77,t79),pw(x,m,mi,t78),t86,t85):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86))
t94:=satz182f(m,an,casec):neg(mn"r"(m,an))
t94a:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
t95:=tr3is(real,mn"r"(an,m),m0"r"(mn"r"(m,an)),abs(mn"r"(m,an)),ap,satz181a(an,m),symis(real,abs(mn"r"(m,an)),m0"r"(mn"r"(m,an)),absn(mn"r"(m,an),t94)),isabs(mn"r"(m,an),pl"r"(m,n),t94a)):is"r"(mn"r"(an,m),ap)
t96:=isp(real,[t:real]neg(t),mn"r"(m,an),pl"r"(m,n),t94,t94a):neg(pl"r"(m,n))
t97:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96):or(nis(x,0c),pos(ap))
t98:=lemmapw1(x,ap,t19,t97,satz166b(pl"r"(m,n),t96),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):nis(pw(x,ap,t19,t97),0c)
t99:=ispw2(x,mn"r"(an,m),ap,t95,t77,t19,t79,t97):is(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97))
t100:=isov2(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97),1c,t99,t86,t98):is(ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98))
t101:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t97),t98),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):is(ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
t102:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t92,t93,t100,t101):prop1
nn@t103:=or3app(is"r"(m,an),more(m,an),less(m,an),prop1,satz167a(m,an),[t:is"r"(m,an)]t73(t),[t:more(m,an)]t68(t),[t:less(m,an)]t102(t)):prop1
na@[nm:neg(m)][qn:pos(n)]
na@t104:=ori1(nis(x,0c),and(pos(n),pos(m)),t15):or(nis(x,0c),and(pos(n),pos(m)))
t104a:=th5"l.and"(pos(m),pos(n),na):not(and(pos(n),pos(m)))
t105:=lemma294a(x,n,m,ni,mi,t104):or(nis(x,0c),pos(n))
t106:=lemma294b(x,n,m,ni,mi,t104):or(nis(x,0c),pos(m))
t107:=lemma294c(x,n,m,ni,mi,t104):or(nis(x,0c),pos(pl"r"(n,m)))
t108:=ists12(pw(x,m,mi,lemma294a),pw(x,m,mi,t106),pw(x,n,ni,lemma294b),pw(x,n,ni,t105),ispw1(x,x,m,refis(cx,x),mi,lemma294a,t106),ispw1(x,x,n,refis(cx,x),ni,lemma294b,t105)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)))
t109:=comts(pw(x,m,mi,t106),pw(x,n,ni,t105)):is(ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)))
qn@t110:=t103(x,n,m,ni,mi,t104,t104a,qn,nm):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
na@t111:=ispw2(x,pl"r"(n,m),pl"r"(m,n),compl"r"(n,m),intpl(n,ni,m,mi),intpl(m,mi,n,ni),t107,lemma294c):is(pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
qn@t112:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t110,t111):prop1
na@[i:is"r"(m,0)]
t113:=ists1(pw(x,m,mi,lemma294a),1c,pw(x,n,ni,lemma294b),0exp(x,m,mi,lemma294a,i)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)))
t114:=satz222b(pw(x,n,ni,lemma294b)):is(ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b))
t115:=symis(real,pl"r"(m,n),n,pl01"r"(m,n,i)):is"r"(n,pl"r"(m,n))
t116:=ispw2(x,n,pl"r"(m,n),t115,ni,intpl(m,mi,n,ni),lemma294b,lemma294c):is(pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
t117:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t113,t114,t116):prop1
na@[i:is"r"(n,0)]
t118:=t117(x,n,m,ni,mi,t104,t104a,i):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
t119:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t118,t111):prop1
na@[pm:pos(m)]
t120:=ore2(not(pos(m)),not(pos(n)),t16,weli(pos(m),pm)):not(pos(n))
t121:=rapp(n,prop1,th2"l.imp"(pos(n),prop1,t120),[t:is"r"(n,0)]t119(t),[t:neg(n)]t103(pm,t)):prop1
na@[nm:neg(m)]
t122:=rapp(n,prop1,[t:pos(n)]t112(nm,t),[t:is"r"(n,0)]t119(t),[t:neg(n)]t41(nm,t)):prop1
na@t123:=rapp(m,prop1,[t:pos(m)]t121(t),[t:is"r"(m,0)]t117(t),[t:neg(m)]t122(t)):prop1
-9294
o@satz294:=th1"l.imp"(and(pos(m),pos(n)),prop1".9294",[t:and(pos(m),pos(n))]t14".9294"(t),[t:not(and(pos(m),pos(n)))]t123".9294"(t)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
ni@[o:nis(x,0c)]
lemma295a:=ori1(nis(x,0c),pos(m),o):or(nis(x,0c),pos(m))
lemma295b:=ori1(nis(x,0c),pos(n),o):or(nis(x,0c),pos(n))
lemma295c:=ori1(nis(x,0c),pos(mn"r"(m,n)),o):or(nis(x,0c),pos(mn"r"(m,n)))
+9295
t1:=ori1(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)),o):or(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)))
t2:=intmn(m,mi,n,ni):intrl(mn"r"(m,n))
t3:=lemma294a(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(mn"r"(m,n)))
t4:=lemma294b(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(n))
t5:=lemma294c(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(pl"r"(mn"r"(m,n),n)))
t6:=ists12(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,lemma295b),pw(x,n,ni,t4),ispw1(x,x,mn"r"(m,n),refis(cx,x),t2,lemma295c,t3),ispw1(x,x,n,refis(cx,x),ni,lemma295b,t4)):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)))
t7:=satz294(x,mn"r"(m,n),n,t2,ni,t1):is(ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5))
t8:=plmn(m,n):is"r"(pl"r"(mn"r"(m,n),n),m)
t9:=ispw2(x,pl"r"(mn"r"(m,n),n),m,t8,intpl(mn"r"(m,n),t2,n,ni),mi,t5,lemma295a):is(pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a))
t10:=tr3is(cx,ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a),t6,t7,t9):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),pw(x,m,mi,lemma295a))
t11:=satz290(x,n,ni,lemma295b,o):nis(pw(x,n,ni,lemma295b),0c)
-9295
satz295:=satz229k(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),pw(x,mn"r"(m,n),t2".9295",lemma295c),t11".9295",t10".9295"):is(ov(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),satz290(x,n,ni,lemma295b,o)),pw(x,mn"r"(m,n),intmn(m,mi,n,ni),lemma295c))
m@[mi:intrl(m)][n:nis(x,0c)]
lemma296:=ori1(nis(x,0c),pos(m),n):or(nis(x,0c),pos(m))
+9296
t1:=intrli0(0,refis(real,0)):intrl(0)
t2:=lemma295a(x,0,m,t1,mi,n):or(nis(x,0c),pos(0))
t3:=lemma295b(x,0,m,t1,mi,n):or(nis(x,0c),pos(m))
t4:=lemma295c(x,0,m,t1,mi,n):or(nis(x,0c),pos(mn"r"(0,m)))
t5:=satz290(x,m,mi,lemma296,n):nis(pw(x,m,mi,lemma296),0c)
t6:=satz290(x,m,mi,t3,n):nis(pw(x,m,mi,t3),0c)
t7:=symis(cx,pw(x,0,t1,t2),1c,0exp(x,0,t1,t2,refis(real,0))):is(1c,pw(x,0,t1,t2))
t8:=ispw1(x,x,m,refis(cx,x),mi,lemma296,t3):is(pw(x,m,mi,lemma296),pw(x,m,mi,t3))
t9:=isov12(1c,pw(x,0,t1,t2),pw(x,m,mi,lemma296),pw(x,m,mi,t3),t7,t8,t5,t6):is(ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6))
t10:=satz295(x,0,m,t1,mi,n):is(ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4))
t11:=pl01(0,m0"r"(m),refis(real,0)):is"r"(mn"r"(0,m),m0"r"(m))
t12:=lemma296(x,m0"r"(m),intm0(m,mi),n):or(nis(x,0c),pos(m0"r"(m)))
t13:=ispw2(x,mn"r"(0,m),m0"r"(m),t11,intmn(0,t1,m,mi),intm0(m,mi),t4,t12):is(pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12))
t14:=tr3is(cx,ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12),t9,t10,t13):is(ov(1c,pw(x,m,mi,lemma296),t5),pw(x,m0"r"(m),intm0(m,mi),t12))
-9296
satz296:=t14".9296":is(ov(1c,pw(x,m,mi,lemma296),satz290(x,m,mi,lemma296,n)),pw(x,m0"r"(m),intm0(m,mi),lemma296(m0"r"(m),intm0(m,mi),n)))
ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
+9297
[p:nis(x,0c)]
t1:=satz290(x,m,mi,lemma294a(o),p):nis(pw(x,m,mi,lemma294a(o)),0c)
o@[a:and(pos(m),pos(n))]
t2:=ande2(pos(m),pos(n),a):pos(n)
t3:=postspp(m,n,ande1(pos(m),pos(n),a),t2):pos(ts"r"(m,n))
-9297
lemma297a:=th9"l.or"(nis(x,0c),and(pos(m),pos(n)),nis(pw(x,m,mi,lemma294a(o)),0c),pos(n),o,[t:nis(x,0c)]t1".9297"(t),[t:and(pos(m),pos(n))]t2".9297"(t)):or(nis(pw(x,m,mi,lemma294a(o)),0c),pos(n))
lemma297b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(ts"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9297"(t)):or(nis(x,0c),pos(ts"r"(m,n)))
mi@[o:or(nis(x,0c),pos(m))][i:is(x,0c)]
+*9297
i@t4:=ore2(nis(x,0c),pos(m),o,weli(is(x,0c),i)):pos(m)
m1:=ntofrl(m,posintnatrl(m,t4,mi)):nat
t5:=posexp(x,m,mi,o,t4):is(pw(x,m,mi,o),prod(m1,[t:1to(m1)]x))
t6:=satz289b(m1,[t:1to(m1)]x,xout(m1),i):is(prod(m1,[t:1to(m1)]x),0c)
t7:=tris(cx,pw(x,m,mi,o),prod(m1,[t:1to(m1)]x),0c,t5,t6):is(pw(x,m,mi,o),0c)
-9297
i@pw0:=t7".9297":is(pw(x,m,mi,o),0c)
ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
+*9297
ni@t8:=intts(m,mi,n,ni):intrl(ts"r"(m,n))
o@prop1:=is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o))):'prop'
[i:is(x,0c)]
t9:=pw0(x,m,mi,lemma294a(o),i):is(pw(x,m,mi,lemma294a(o)),0c)
t10:=pw0(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o),t9):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),0c)
t11:=pw0(x,ts"r"(m,n),t8,lemma297b(o),i):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),0c)
t12:=tris2(cx,pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),0c,t10,t11):prop1
m@[mi:intrl(m)][p:nis(x,0c)]
t13:=ori1(nis(x,0c),pos(m),p):or(nis(x,0c),pos(m))
p0:=pw(x,m,mi,t13):cx
[n:nat]
nr:=rlofnt(n):real
t14:=natintrl(nr,natrli(n)):intrl(nr)
t15:=ori2(nis(p0,0c),pos(nr),natpos(nr,natrli(n))):or(nis(p0,0c),pos(nr))
t16:=ori1(nis(x,0c),pos(ts"r"(m,nr)),p):or(nis(x,0c),pos(ts"r"(m,nr)))
t17:=intts(m,mi,nr,t14):intrl(ts"r"(m,nr))
prop2:=is(pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16)):'prop'
p@t18:=ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t15(1),lemma291(p0)):is(pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)))
t19:=satz291(p0):is(pw(p0,1rl,intrl1,lemma291(p0)),p0)
t20:=ispw2(x,m,ts"r"(m,1rl),satz195a(m),mi,t17(1),t13,t16(1)):is(p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)))
t21:=tr3is(cx,pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)),t18,t19,t20):prop2(1)
n@[p2:prop2(n)]
n1:=pl"n"(n,1):nat
t22:=satz290(x,m,mi,t13,p):nis(p0,0c)
t23:=ori1(nis(p0,0c),and(pos(nr),pos(1rl)),t22):or(nis(p0,0c),and(pos(nr),pos(1rl)))
t24:=lemma294a(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(nr))
t25:=lemma294b(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(1rl))
t26:=lemma294c(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(pl"r"(nr,1rl)))
t27:=ispw2(p0,nr(n1),pl"r"(nr,1rl),satzr155a(n,1),t14(n1),intpl(nr,t14,1rl,intrl1),t15(n1),t26):is(pw(p0,nr(n1),t14(n1),t15(n1)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
t27a:=satz294(p0,nr,1rl,t14,intrl1,t23):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
t28:=tris2(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26),t27,t27a):is(pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)))
t29:=ori1(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)),p):or(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)))
t30:=lemma294a(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(ts"r"(m,nr)))
t31:=lemma294b(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(m))
t32:=lemma294c(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(pl"r"(ts"r"(m,nr),m)))
t33:=tr3is(cx,pw(p0,nr,t14,t24),pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16),pw(x,ts"r"(m,nr),t17,t30),ispw1(p0,p0,nr,refis(cx,p0),t14,t24,t15),p2,ispw1(x,x,ts"r"(m,nr),refis(cx,x),t17,t16,t30)):is(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30))
t34:=tr3is(cx,pw(p0,1rl,intrl1,t25),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,m,mi,t31),ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t25,lemma291(p0)),t19,ispw1(x,x,m,refis(cx,x),mi,t13,t31)):is(pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31))
t35:=ists12(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30),pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31),t33,t34):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)))
t36:=satz294(x,ts"r"(m,nr),m,t17,mi,t29):is(ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32))
t37:=tr3is(real,pl"r"(ts"r"(m,nr),m),pl"r"(ts"r"(m,nr),ts"r"(m,1rl)),ts"r"(m,pl"r"(nr,1rl)),ts"r"(m,nr(n1)),ispl2"r"(m,ts"r"(m,1rl),ts"r"(m,nr),satz195a(m)),distpt2"r"(m,nr,1rl),ists2"r"(pl"r"(nr,1rl),nr(n1),m,satzr155b(n,1))):is"r"(pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)))
t38:=ispw2(x,pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)),t37,intpl(ts"r"(m,nr),t17,m,mi),t17(n1),t32,t16(n1)):is(pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)))
t39:=tr4is(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)),t28,t35,t36,t38):prop2(n1)
t40:=isp(nat,[t:nat]prop2(t),n1,<n>suc,t39,satz4a(n)):prop2(<n>suc)
n@t41:=induction([t:nat]prop2(t),t21,[t:nat][u:prop2(t)]t40(t,u),n):prop2(n)
o@[p:nis(x,0c)][q:pos(n)]
t42:=posintnatrl(n,q,ni):natrl(n)
n0:=ntofrl(n,t42):nat
t43:=isrlnt1(n,t42):is"r"(n,rlofnt(n0))
t44:=isrlnt2(n,t42):is"r"(rlofnt(n0),n)
o@p1:=pw(x,m,mi,lemma294a(o)):cx
q@t44a:=ispw2(x,m,m,refis(real,m),mi,mi,lemma294a(o),t13(mi,p)):is(p1,p0(mi,p))
t45:=ispw12(p1,p0(mi,p),n,rlofnt(n0),t44a,t43,ni,t14(mi,p,n0),lemma297a(o),t15(mi,p,n0)):is(pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)))
t46:=t41(mi,p,n0):is(pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)))
t47:=ists2"r"(rlofnt(n0),n,m,t44):is"r"(ts"r"(m,rlofnt(n0)),ts"r"(m,n))
t48:=ispw2(x,ts"r"(m,rlofnt(n0)),ts"r"(m,n),t47,t17(mi,p,n0),t8,t16(mi,p,n0),lemma297b(o)):is(pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)))
t49:=tr3is(cx,pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)),t45,t46,t48):prop1
p@[i:is"r"(n,0)]
t50:=0exp(p1,n,ni,lemma297a(o),i):is(pw(p1,n,ni,lemma297a(o)),1c)
t51:=ts02"r"(m,n,i):is"r"(ts"r"(m,n),0)
t52:=0exp(x,ts"r"(m,n),t8,lemma297b(o),t51):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),1c)
t53:=tris2(cx,pw(p1,n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),1c,t50,t52):prop1
p@[q:neg(n)]
an:=abs(n):real
t54:=intabs(n,ni):intrl(an)
t55:=ori1(nis(x,0c),and(pos(m),pos(an)),p):or(nis(x,0c),and(pos(m),pos(an)))
p1t55:=p1(an,mi,t54,t55):cx
t56:=satz166e(n,nnot0(n,q)):pos(an)
t56a:=lemma294a(an,mi,t54,t55):or(nis(x,0c),pos(m))
t57:=lemma297a(an,mi,t54,t55):or(nis(p1t55,0c),pos(an))
t58:=lemma297b(an,mi,t54,t55):or(nis(x,0c),pos(ts"r"(m,an)))
t59:=t49(an,mi,t54,t55,p,t56):is(pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58))
t60:=satz177c(an,n,absn(n,q)):is"r"(n,m0"r"(an))
t61:=intm0(an,t54):intrl(m0"r"(an))
t62:=satz290(x,m,mi,t56a,p):nis(p1t55,0c)
t63:=lemma296(p1t55,an,t54,t62):or(nis(p1t55,0c),pos(an))
t64:=satz290(p1t55,an,t54,t63,t62):nis(pw(p1t55,an,t54,t63),0c)
t65:=lemma296(p1t55,m0"r"(an),t61,t62):or(nis(p1t55,0c),pos(m0"r"(an)))
t66:=satz296(p1t55,an,t54,t62):is(ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65))
t67:=ispw1(x,x,m,refis(cx,x),mi,lemma294a(o),t56a):is(p1,p1t55)
t68:=ispw12(p1,p1t55,n,m0"r"(an),t67,t60,ni,t61,lemma297a(o),t65):is(pw(p1,n,ni,lemma297a(o)),pw(p1t55,m0"r"(an),t61,t65))
t69:=tris2(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65),t68,t66):is(pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64))
t70:=tris(real,m0"r"(ts"r"(m,an)),ts"r"(m,m0"r"(an)),ts"r"(m,n),satz197f(m,an),ists2"r"(m0"r"(an),n,m,symis(real,n,m0"r"(an),t60))):is"r"(m0"r"(ts"r"(m,an)),ts"r"(m,n))
t71:=intm0(ts"r"(m,an),t8(an,mi,t54)):intrl(m0"r"(ts"r"(m,an)))
t72:=lemma296(x,ts"r"(m,an),t8(an,mi,t54),p):or(nis(x,0c),pos(ts"r"(m,an)))
t73:=satz290(x,ts"r"(m,an),t8(an,mi,t54),t72,p):nis(pw(x,ts"r"(m,an),t8(an,mi,t54),t72),0c)
t74:=lemma296(x,m0"r"(ts"r"(m,an)),t71,p):or(nis(x,0c),pos(m0"r"(ts"r"(m,an))))
t75:=satz296(x,ts"r"(m,an),t8(an,mi,t54),p):is(ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74))
t76:=ispw2(x,m0"r"(ts"r"(m,an)),ts"r"(m,n),t70,t71,t8,t74,lemma297b(o)):is(pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)))
t77:=ispw1(p1t55,p1t55,an,refis(cx,p1t55),t54,t63,t57):is(pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57))
t78:=ispw1(x,x,ts"r"(m,an),refis(cx,x),t8(an,mi,t54),t58,t72):is(pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
t79:=tr3is(cx,pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t77,t59,t78):is(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
t80:=isov2(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),1c,t79,t64,t73):is(ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73))
t81:=tr4is(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)),t69,t80,t75,t76):prop1
p@t82:=rapp(n,prop1,[t:pos(n)]t49(t),[t:is"r"(n,0)]t53(t),[t:neg(n)]t81(t)):prop1
-9297
o@satz297:=th1"l.imp"(is(x,0c),prop1".9297",[t:is(x,0c)]t12".9297"(t),[t:nis(x,0c)]t82".9297"(t)):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),intts(m,mi,n,ni),lemma297b(o)))
@[r:real][s:real]
+10298
t1:=tris(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),pl"r"(0,0)),pli(pl"r"(r,s),0),plis12a(r,0,s,0),isrecx2(pl"r"(0,0),0,pl"r"(r,s),pl01(0,0,refis(real,0)))):is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
-10298
satz298a:=symis(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0),t1".10298"):is(pli(pl"r"(r,s),0),pl(pli(r,0),pli(s,0)))
satz298b:=t1".10298":is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
+*10298
s@t2:=tris(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),mn"r"(0,0)),pli(mn"r"(r,s),0),mnis12a(r,0,s,0),isrecx2(mn"r"(0,0),0,mn"r"(r,s),pl02(0,m0"r"(0),satz176b(0,refis(real,0))))):is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
-10298
s@satz298c:=symis(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0),t2".10298"):is(pli(mn"r"(r,s),0),mn(pli(r,0),pli(s,0)))
satz298d:=t2".10298":is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
+*10298
s@t3:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
t4:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
t5:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t3,t4)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-10298
s@satz298e:=symis(cx,ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0),t5".10298"):is(pli(ts"r"(r,s),0),ts(pli(r,0),pli(s,0)))
satz298f:=t5".10298":is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
[n:nis"r"(s,0)]
+*10298
n@[i:is(pli(s,0),0c)]
t6:=tr3is(real,s,re(pli(s,0)),re(0c),0,isre(s,0),iscere(pli(s,0),0c,i),reis(0,0)):is"r"(s,0)
-10298
n@lemma298:=th3"l.imp"(is(pli(s,0),0c),is"r"(s,0),n,[t:is(pli(s,0),0c)]t6".10298"(t)):nis(pli(s,0),0c)
+*10298
n@t7:=tris(cx,ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(ts"r"(s,ov"r"(r,s,n)),0),pli(r,0),t5(s,ov"r"(r,s,n)),isrecx1(ts"r"(s,ov"r"(r,s,n)),r,0,satz204c(r,s,n))):is(ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(r,0))
-10298
n@satz298g:=satz229g(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(pli(ov"r"(r,s,n),0),ov(pli(r,0),pli(s,0),lemma298))
satz298h:=satz229h(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(ov(pli(r,0),pli(s,0),lemma298),pli(ov"r"(r,s,n),0))
+*10298
r@t8:=tris(cx,m0(pli(r,0)),pli(m0"r"(r),m0"r"(0)),pli(m0"r"(r),0),m0isa(r,0),isrecx2(m0"r"(0),0,m0"r"(r),satz176b(0,refis(real,0)))):is(m0(pli(r,0)),pli(m0"r"(r),0))
-10298
r@satz298j:=symis(cx,m0(pli(r,0)),pli(m0"r"(r),0),t8".10298"):is(pli(m0"r"(r),0),m0(pli(r,0)))
satz298k:=t8".10298":is(m0(pli(r,0)),pli(m0"r"(r),0))
+*10298
r@t9:=tris(real,mod2(pli(r,0)),ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(r,r),pl02(ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(im(pli(r,0)),im(pli(r,0))),ts01(im(pli(r,0)),im(pli(r,0)),imis(r,0))),ists12"r"(re(pli(r,0)),r,re(pli(r,0)),r,reis(r,0),reis(r,0))):is"r"(mod2(pli(r,0)),ts"r"(r,r))
ar:=abs(r):real
[p:pos(r)]
t10:=satz196a(r,r,p,p):is"r"(ts"r"(r,r),ts"r"(ar,ar))
r@[i:is"r"(r,0)]
t11:=tris2(real,ts"r"(r,r),ts"r"(ar,ar),0,ts01(r,r,i),ts01(ar,ar,abs0(r,i))):is"r"(ts"r"(r,r),ts"r"(ar,ar))
r@[n:neg(r)]
t12:=satz196b(r,r,n,n):is"r"(ts"r"(r,r),ts"r"(ar,ar))
r@t13:=rapp(r,is"r"(ts"r"(r,r),ts"r"(ar,ar)),[t:pos(r)]t10(t),[t:is"r"(r,0)]t11(t),[t:neg(r)]t12(t)):is"r"(ts"r"(r,r),ts"r"(ar,ar))
t14:=tris(real,mod2(pli(r,0)),ts"r"(r,r),ts"r"(ar,ar),t9,t13):is"r"(mod2(pli(r,0)),ts"r"(ar,ar))
t15:=th1"l.imp"(is"r"(r,0),not(neg(ar)),[t:is"r"(r,0)]0notn(ar,abs0(r,t)),[t:nis"r"(r,0)]pnotn(ar,satz166e(r,t))):not(neg(ar))
-10298
r@satz298l:=thsqrt3(mod2(pli(r,0)),lemma5(pli(r,0)),abs(r),t15".10298",t14".10298"):is"r"(mod(pli(r,0)),abs(r))
satz298m:=symis(real,mod(pli(r,0)),abs(r),satz298l):is"r"(abs(r),mod(pli(r,0)))
cofrl:=pli(r,0):complex
s@[i:is(cofrl(r),cofrl(s))]
isrlic:=tr3is(real,r,re(cofrl(r)),re(cofrl(s)),s,isre(r,0),iscere(cofrl(r),cofrl(s),i),reis(s,0)):is"r"(r,s)
s@[i:is"r"(r,s)]
isrlec:=isrecx1(r,s,0,i):is(cofrl(r),cofrl(s))
+v10
@t1:=[t:real][u:real][v:is(cofrl(t),cofrl(u))]isrlic(t,u,v):injective(real,cx,[t:real]cofrl(t))
-v10
@[x:cx]
realc:=image(real,cx,[t:real]cofrl(t),x):'prop'
r@reali:=imagei(real,cx,[t:real]cofrl(t),r):realc(cofrl(r))
x@[rx:realc(x)]
rlofc:=soft(real,cx,[t:real]cofrl(t),t1".v10",x,rx):real
[y:cx][ry:realc(y)][i:is"r"(rlofc(x,rx),rlofc(y,ry))]
iscirl:=isinve(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is(x,y)
ry@[i:is(x,y)]
iscerl:=isinv(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is"r"(rlofc(x,rx),rlofc(y,ry))
r@isrlc1:=isst1(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(r,rlofc(cofrl(r),reali(r)))
isrlc2:=isst2(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(rlofc(cofrl(r),reali(r)),r)
rx@iscrl1:=ists1"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(x,cofrl(rlofc(x,rx)))
iscrl2:=ists2"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(cofrl(rlofc(x,rx)),x)
@[n:nat]
cofn:=cofrl(rlofnt(n)):complex
[m:nat][i:is"n"(n,m)]
isnec:=isrlec(rlofnt(n),rlofnt(m),isnterl(n,m,i)):is(cofn(n),cofn(m))
m@[i:is(cofn(n),cofn(m))]
isnic:=isntirl(n,m,isrlic(rlofnt(n),rlofnt(m),i)):is"n"(n,m)
+*v10
@t2:=[t:nat][u:nat][v:is(cofn(t),cofn(u))]isnic(t,u,v):injective(nat,cx,[t:nat]cofn(t))
-v10
x@natc:=image(nat,cx,[t:nat]cofn(t),x):'prop'
n@nati:=imagei(nat,cx,[t:nat]cofn(t),n):natc(cofn(n))
x@[nx:natc(x)]
nofc:=soft(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):nat
[y:cx][ny:natc(y)][i:is(x,y)]
iscen:=isinv(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is"n"(nofc(x,nx),nofc(y,ny))
ny@[i:is"n"(nofc(x,nx),nofc(y,ny))]
iscin:=isinve(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is(x,y)
n@isnc1:=isst1(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(n,nofc(cofn(n),nati(n)))
isnc2:=isst2(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(nofc(cofn(n),nati(n)),n)
nx@iscn1:=ists1"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(x,cofn(nofc(x,nx)))
iscn2:=ists2"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(cofn(nofc(x,nx)),x)
@natt:=ot(cx,[t:cx]natc(t)):'type'
[nt:natt]
cofnt:=in"e"(cx,[t:cx]natc(t),nt):cx
natti:=inp(cx,[t:cx]natc(t),nt):natc(cofnt(nt))
[mt:natt][i:is"e"(natt,nt,mt)]
isntec:=isini(cx,[t:cx]natc(t),nt,mt,i):is(cofnt(nt),cofnt(mt))
mt@[i:is(cofnt(nt),cofnt(mt))]
isntic:=isine(cx,[t:cx]natc(t),nt,mt,i):is"e"(natt,nt,mt)
nx@ntofc:=out(cx,[t:cx]natc(t),x,nx):natt
ny@[i:is(x,y)]
iscent:=isouti(cx,[t:cx]natc(t),x,nx,y,ny,i):is"e"(natt,ntofc(x,nx),ntofc(y,ny))
ny@[i:is"e"(natt,ntofc(x,nx),ntofc(y,ny))]
iscint:=isoute(cx,[t:cx]natc(t),x,nx,y,ny,i):is(x,y)
nt@isntc1:=isoutin(cx,[t:cx]natc(t),nt):is"e"(natt,nt,ntofc(cofnt(nt),natti(nt)))
isntc2:=symis(natt,nt,ntofc(cofnt(nt),natti(nt)),isntc1):is"e"(natt,ntofc(cofnt(nt),natti(nt)),nt)
nx@iscnt1:=isinout(cx,[t:cx]natc(t),x,nx):is(x,cofnt(ntofc(x,nx)))
iscnt2:=symis(cx,x,cofnt(ntofc(x,nx)),iscnt1):is(cofnt(ntofc(x,nx)),x)
n@ntofn:=ntofc(cofn(n),nati(n)):natt
m@[i:is"n"(n,m)]
isnent:=iscent(cofn(n),nati(n),cofn(m),nati(m),isnec(n,m,i)):is"e"(natt,ntofn(n),ntofn(m))
m@[i:is"e"(natt,ntofn(n),ntofn(m))]
isnint:=isnic(n,m,iscint(cofn(n),nati(n),cofn(m),nati(m),i)):is"n"(n,m)
nt@nofnt:=nofc(cofnt(nt),natti(nt)):nat
mt@[i:is"e"(natt,nt,mt)]
isnter:=iscen(cofnt(nt),natti(nt),cofnt(mt),natti(mt),isntec(nt,mt,i)):is"n"(nofnt(nt),nofnt(mt))
mt@[i:is"n"(nofnt(nt),nofnt(mt))]
isntin:=isntic(nt,mt,iscin(cofnt(nt),natti(nt),cofnt(mt),natti(mt),i)):is"e"(natt,nt,mt)
+*v10
n@t3:=iscnt1(cofn(n),nati(n)):is(cofn(n),cofnt(ntofn(n)))
-v10
n@isnnt1:=tris(nat,n,nofc(cofn(n),nati(n)),nofnt(ntofn(n)),isnc1(n),iscen(cofn(n),nati(n),cofnt(ntofn(n)),natti(ntofn(n)),t3".v10")):is"n"(n,nofnt(ntofn(n)))
isnnt2:=symis(nat,n,nofnt(ntofn(n)),isnnt1):is"n"(nofnt(ntofn(n)),n)
+*v10
nt@t4:=iscn1(cofnt(nt),natti(nt)):is(cofnt(nt),cofn(nofnt(nt)))
-v10
nt@isntn1:=tris(natt,nt,ntofc(cofnt(nt),natti(nt)),ntofn(nofnt(nt)),isntc1(nt),iscent(cofnt(nt),natti(nt),cofn(nofnt(nt)),nati(nofnt(nt)),t4".v10")):is"e"(natt,nt,ntofn(nofnt(nt)))
isntn2:=symis(natt,nt,ntofn(nofnt(nt)),isntn1):is"e"(natt,ntofn(nofnt(nt)),nt)
@1t:=ntofn(1):natt
suct:=[t:natt]ntofn(<nofnt(t)>suc):[t:natt]natt
+10299
nt@[i:is"e"(natt,<nt>suct,1t)]
t1:=isnint(<nofnt(nt)>suc,1,i):is"n"(<nofnt(nt)>suc,1)
-10299
nt@satz299a:=th3"l.imp"(is"e"(natt,<nt>suct,1t),is"n"(<nofnt(nt)>suc,1),<nofnt(nt)>ax3,[t:is"e"(natt,<nt>suct,1t)]t1".10299"(t)):not(is"e"(natt,<nt>suct,1t))
@ax3t:=[t:natt]satz299a(t):[t:natt]not(is"e"(natt,<t>suct,1t))
mt@[i:is"e"(natt,<nt>suct,<mt>suct)]
+*10299
i"c"@t2:=isnint(<nofnt(nt)>suc,<nofnt(mt)>suc,i):is"n"(<nofnt(nt)>suc,<nofnt(mt)>suc)
t3:=<t2><nofnt(mt)><nofnt(nt)>ax4:is"n"(nofnt(nt),nofnt(mt))
-10299
i@satz299b:=isntin(nt,mt,t3".10299"):is"e"(natt,nt,mt)
@ax4t:=[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]satz299b(t,u,v):[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]is"e"(natt,t,u)
[s:set(natt)]
cond1t:=esti(natt,1t,s):'prop'
cond2t:=all"l"(natt,[t:natt]imp(esti(natt,t,s),esti(natt,<t>suct,s))):'prop'
[c1:cond1t][c2:cond2t]
+*10299
c2@[n:nat]
prop1:=esti(natt,ntofn(n),s):'prop'
c2@t4:=c1:prop1(1)
n@[p:prop1(n)]
t5:=<p><ntofn(n)>c2:esti(natt,ntofn(<nofnt(ntofn(n))>suc),s)
t6:=isp(nat,[t:nat]esti(natt,ntofn(<t>suc),s),nofnt(ntofn(n)),n,t5,isnnt2(n)):prop1(<n>suc)
c2@[nt:natt]
t7:=induction([t:nat]prop1(t),t4,[t:nat][u:prop1(t)]t6(t,u),nofnt(nt)):prop1(nofnt(nt))
-10299
c2@satz299c:=[t:natt]isp(natt,[u:natt]esti(natt,u,s),ntofn(nofnt(t)),t,t7".10299"(t),isntn2(t)):[t:natt]esti(natt,t,s)
@ax5t:=[t:set(natt)][u:cond1t(t)][v:cond2t(t)]satz299c(t,u,v):[t:set(natt)][u:cond1t(t)][v:cond2t(t)][w:natt]esti(natt,w,t)
ic:=pli(0,1rl):complex
+10300
t1:=tsis12a(0,1rl,0,1rl):is(ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))))
t2:=tris(real,mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(ts"r"(1rl,1rl)),m0"r"(1rl),pl01(ts"r"(0,0),m0"r"(ts"r"(1rl,1rl)),ts01(0,0,refis(real,0))),ism0"r"(ts"r"(1rl,1rl),1rl,satz195(1rl))):is"r"(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl))
t3:=tris(real,pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),ts"r"(1rl,0),0,pl01(ts"r"(0,1rl),ts"r"(1rl,0),ts01(0,1rl,refis(real,0))),ts02(1rl,0,refis(real,0))):is"r"(pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0)
t4:=isrecx12(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0,t2,t3):is(pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)))
t5:=satz298j(1rl):is(cofrl(m0"r"(1rl)),m0(1c))
-10300
satz2300:=tr3is(cx,ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)),m0(1c),t1".10300",t4".10300",t5".10300"):is(ts(ic,ic),m0(1c))
[r:real][s:real]
+10301
t1:=tsis12a(s,0,0,1rl):is(ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))))
t2:=tris(real,mn"r"(ts"r"(s,0),ts"r"(0,1rl)),m0"r"(ts"r"(0,1rl)),0,pl01(ts"r"(s,0),m0"r"(ts"r"(0,1rl)),ts02(s,0,refis(real,0))),satz176b(ts"r"(0,1rl),ts01(0,1rl,refis(real,0)))):is"r"(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0)
t3:=tris(real,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),ts"r"(s,1rl),s,pl02(ts"r"(s,1rl),ts"r"(0,0),ts01(0,0,refis(real,0))),satz195(s)):is"r"(pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s)
t4:=isrecx12(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s,t2,t3):is(pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s))
t5:=tris(cx,ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s),t1,t4):is(ts(cofrl(s),ic),pli(0,s))
t6:=ispl2(ts(cofrl(s),ic),pli(0,s),cofrl(r),t5):is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)))
t7:=plis12a(r,0,0,s):is(pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)))
t8:=isrecx12(pl"r"(r,0),r,pl"r"(0,s),s,pl02(r,0,refis(real,0)),pl01(0,s,refis(real,0))):is(pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s))
-10301
satz301a:=tr3is(cx,pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s),t6".10301",t7".10301",t8".10301"):is"e"(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s))
satz301b:=symis(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s),satz301a):is(pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)))
@[x:complex]
satz301c:=tris(cx,x,pli(re(x),im(x)),pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),ispli(x),satz301b(re(x),im(x))):is(x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)))
satz301d:=symis(cx,x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),satz301c):is(pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),x)
s@[t:real][u:real][i:is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)))]
+*10301
i@t9:=tr3is(cx,pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)),pli(t,u),satz301b(r,s),i,satz301a(t,u)):is(pli(r,s),pli(t,u))
-10301
i@satz301e:=tr3is(real,r,re(pli(r,s)),re(pli(t,u)),t,isre(r,s),iscere(pli(r,s),pli(t,u),t9".10301"),reis(t,u)):is"r"(r,t)
satz301f:=tr3is(real,s,im(pli(r,s)),im(pli(t,u)),u,isim(r,s),isceim(pli(r,s),pli(t,u),t9".10301"),imis(t,u)):is"r"(s,u)
-c
-r
-rp
-rt
-n
-landau
-eq
-st
-e
-l
