Backstab

 ((...) Q={,;;,,;,,,,,;;;,;;,;,;;;;;,,;;;;;;,;,;;,,,;,;,,;,;,,,,,,;,;;,,,;,,;;,;;,;;,;;;;,,,,;,,;,;,;;;;;,,;;;,;,,;;,,,;,;,;,;;;;;,,;,,,,;,,,;,;;;,,,;,;,,,,;,,;,;;;;,,;;,,,;,;;;,;,,;;,,;;,,,;,;,;,,;,,;,,,;;;;,;;,;,;;,,;,,;;,,,,} l,K  ({{+-;-};{-+;-};{+-;-+}})  K[+-]<K[-+] Q[K[+-]],Q[K[-+]],K[--(-)],K[-]=Q[K[-]],Q[K[--(-)]],K[-]+(+-),K[-]-(-+)    (l) Q[l+(-)]   l=.sub  K={L=--(-),F=-+,[]=--(-);d=--(-);[]=--(-),R=-+,x=--(-),H=+-;a=-+;[]=+-,[]=-;[]=--(-);v=--(-),z=--(-),O=+-,[]=--(-);S=+-;A=-;Q=--(-);k=-+,f=+-;U=+-,E=-,G=-+;T=--(-),Y=-;[]=-+,c=-+,y=--(-),I=--(-),N=-;[]=-+,[]=+-,w=-+;g=-+;[]=-;i=-+;K=-+,s=-,W=--(-),j=--(-),h=--(-),X=-+,r=+-,C=-+,p=-;l=-;V=-+,b=-;t=+-;n=-+,q=--(-),u=+-,P=+-,m=--(-);B=--(-),M=--(-),[]=--(-),J=-+,D=+-,e=+-;Z=-+,[]=--(-);o=--(-)} V=.insert  r=.floor  x=.concat  O=.char  i=Q  h=.len  p=  Q=-,#i,+-   e=i[Q] (e)==  p=(e) W={} C=--(-) I=-  P=-+  C<=p   Q=(e,C,C) x=K[Q] x  I=I+x*(+-)^((-+)-P)P=P+(+-) P==+-  P=--(-) Q=(I/(+-)) l=((I%(-+))/(+-)) K=I%(-)(W,(Q,l,K))I=-+   Q== (W,((I/(-+)))) C>=p  (e,C+(-+),C+(-))~= (W,(((I%(--(-)))/(--(-)))))   C=C+(-+) i[Q]=(W)   ((Q,V,r,x,O,i,h,c,C,W,I,K,o,R,P,z,p,N,q,e,L,g,B)C,W,q,L,I,z,N,B,K,R,c,g,p,e,P,o=-+,()C=(-+)+C e[C]=-  C ,(Q,l) V=(l) r=(r,x,O,i) (Q,{r;x;O;i},l,V)  r ,(Q,l) V=(l) r=(r,x,O) (Q,{r;x;O},l,V)  r ,(Q) l=-+,#Q,--(-) e[Q[l]]=(+-)+e[Q[l]]  r   K=() V=(K)V[(--(-))],V[(--(-))],V[(--(-))]=Q,P,() -(-)  K   ({},{[(--(-))]=P,[(+-)]=Q;[(-)]=()-+ }) ,(Q)e[Q]=e[Q]-(--(-)) +-==e[Q] e[Q],p[Q]=,  ,(Q,l) V=(l) r=(...) (Q,{...},l,V)  r ,(Q,l) V=(l) r=(r,x,O,i,h) (Q,{r,x;O,i;h},l,V)  r ,(K,r,x,O) lG,n,h,d,U,N,J,v,E,KG,Y,j,s,b,t,D,VG,G,F,P,A,y,Z,a,S,T,w,k,e,X,I,m,H,QG,M,f,u,C  K   K<-(-)  K<-(-)  K<-+   K<-   K<+-   K<-   K<-+  n=p[C]K=n  -  + D=n  K= K=-+    K<--(-) h=p[x[+-]]N=(--(-))G=+ C=p[x[+-]]I=p[x[+-]]P=(N,G)e=C[P]I=p[x[-+]]K=+ P=p[x[--(-)]]T=- G=(-+)N=(G,T)C=I[N]h[e]=C h=p[x[-+]]e=() y=y+w U= v a=y<=E a=U  a U=y>=E U=v  U a=U  a U=+ K=a  U a=-(-)K=K  a     K<-+   K<-+  h={}K=Q[(-+)] K=h -+ -+    K<--(-) I=+- C=p[x[-+]]m=- f=- e=C%I P=p[x[+-]]T=p[x[--(-)]]a=p[x[-+]]Y=a-e a=--(-)A=Y/a t=m-A X=f^t G=T/X N=(G)X=-+ P=+ I=N%P N=-+ P=N^e e= C=I/P m=+- P=p[x[-+]]T=C%X X=+ G=T*X N=(G)f=-+ P=p[x[+-]]G=(C)I=N+G N=-+ T=--(-)C= P=I%N G=I-P N=G/T T=-+ G=P%T X=P-G T=X/f f=-+ X=N%f t=N-X f=t/m t={G,T;X;f}K=-(-)X= p[x[--(-)]]=t I= T= G= P= N= f=  C=(-+)I=-(-)e=C^I h=+ K=h-e h=(-+)e=K K=h/e h={K}K=Q[(-+)]     K<-+   K<-   K<-(-) h={e}K=Q[(--(-))] U=(U)b=(b)v=(v)w=(w)k= Z=(Z)K=+ S=(S)   K<+  h=(--(-))K=p[x[--(-)]]h=K[h]h=(K)K=+  K=p[x[--(-)]]h=(--(-))h=K[h]h=(K)K= p[x[--(-)]]=K K=-(-)    K<-   K<-  G= T= K=-  w= E M=M+J h=M<=u h=w  h w=M>=u w=E  w h=w  h w=-+ K=h  w h=- K=K  h    K<+  I=-+ h=+ C=(-)e=C^I K=h-e e=K h=(-)K=h/e h={K}K=Q[(-)] e=(+-)K=Q[e]I=+- C=p[x[-+]]e=(C,I)K=-       K<-   K<+   K<-(-)  K<-+  I=(-+)C=Q[I]K=Q[(-)]I=(-+)e=C[I]I=p[x[-]]C={(I)}h={(C)} K=p[x[-+]]h=()e=h K=e  - -+    K<-+  K= K=K  -(-) -(-) K=-(-)t=(-)f=Q[t]h=f     K<-(-)  K<-(-) K= K=K  +  +  VG=- j=p[T]F=p[C]lG=(--(-))KG=p[P]QG=(lG,VG)d=F[QG]K=+ s=j[d]H=(s)   K<-(-) U=--(-)F=+- v=(--(-))Z=- w=()p[w]=M h=Q[v]v=(-)K=h[v]v=+- h=(v,U)v=()b=--(-)p[v]=h K=p[T]U=- h=(U,b)U=()d=-+ b=- p[U]=h H=(-+)K=p[T]S=p[v]h=(b,S)k=- b=()p[b]=h h=p[T]S=(Z,k)h=+- k=(+-)K=S==h h=(-)S=()p[S]=K K=(-)n=Q[H]s=p[T]j={(d,F)}H=((j))n=(-+)K=a[K]D=H..n Z=k..D K=(a,h,Z)k=(--(-))Z=()p[Z]=K h=Q[k]D=(-(-),{T,w;t,I;C;y;S,Z,v;b,U,f})k={(D)}K={(k)}k=K K=p[S]K=K -+ -+  K=+ h=p[x[-]]I=()     K<-   K<-+   K<-+  K= C=(--(-))e=Q[C]G=(-)T=-+ I=p[x[--(-)]]P=p[x[--(-)]]N=(G,T)C=I[N]h=e[C]T=(-+)C=h e=K h=(-)K=Q[h]N=p[x[-+]]T=N[T]G={(N)}N={((G))}P=N[-+]I=N[+-]h=N[-+]N=h K=-+  K=- P= G= T=    K<-+  K=p[x[--(-)]]C=p[x[-+]]e[K]=C K=p[x[-+]]C={(e)}K=Q[(+-)]h={(C)} h={}K=Q[(--(-))]    K<-   K<-  K=p[x[+-]]G=(+-)C=(-)h=(e)h=Q[C]T=-+ I=p[x[--(-)]]P=p[x[-+]]N=(G,T)C=I[N]K=h[C]C= h=(C)K=p[x[-]]h=(e)K=-(-) f=p[x[--(-)]]t=(-)t=f[t]y=(+-)M=+ A=p[x[+-]]K=-(-)Y=p[x[--(-)]]a=(y,M)m=A[a]t=(f,m)X=t   h={}e= K=Q[(--(-))]      K<-(-)  K<+   K<-(-)  K<-   K<-  h=p[x[--(-)]]e=r[+-]K= h K=K  -  -  C=()K= P=()e=r I=(-)p[C]=K N=()T=(+-)h=Q[I]X=(-,{N})I=(--(-))K=h[I]I=()p[I]=K K=(+,{})p[P]=K K= p[N]=K G=Q[T]T=(X)h=T K=T  +  -(-)   K<+  K=(-,{P})u={()}K=Q[(--(-))]h={(u)} K=p[x[-+]]h=()e=h K=e  +  -     K<+   K<-  E=(--(-))K=Q[E]E=(-+)Q[E]=K K=-(-) E=#Y y=+- a=(y,E)y=(Y,a)K=-(-)a= E=p[A]U=+- v=y-U w=(v)E[y]=w y=    K<-  K=h  - -+  m=(--(-))G=p[x[-+]]T=p[x[-+]]t=-+ f=(-)X=(f,t)t=+ N=G[X]f=(-)P=C[N]G=p[x[+-]]T=p[x[+-]]X=(f,t)N=G[X]h=P[N]P=-+ K=h*P G=p[x[+-]]T=p[x[-]]Y=- P=K f=(-)t=+ X=(f,t)N=G[X]h=C[N]A=-+ f=-+ K=h+P h=p[x[-+]]G=p[x[--(-)]]X=(+-)N=K T=(X,f)K=h[T]T=(-+)G=Q[T]X=p[x[--(-)]]f=p[x[-+]]t=(m,A)T=X[t]h=G[T]f=p[x[-]]A=(-+)t=p[x[+-]]m=(A,Y)P= X=f[m]T=C[X]G=(N,T)N= I[K]=G K=-      K<-+   K<-(-)  K<+  f=p[x[-]]K=f  -  -(-)X=f  G=- K=p[x[-]]X=-(-)N=-(-)e=p[x[-]]P=(+-)C=p[x[-]]I=(P,N)h=e[I]f=- N=(+-)C=p[x[-]]I=p[x[+-]]P=(N,G)e=C[P]K[h]=e K=p[x[-]]T=(-)e=p[x[-+]]N=+ P=(-+)C=p[x[-]]I=(P,N)h=e[I]I=(--(-))C=Q[I]P=p[x[-+]]N=p[x[-+]]G=(T,X)I=P[G]N=+- P=+- G=- e=C[I]I=+- C=(I,P,N,G)K[h]=C P=(-)K=p[x[-]]e=p[x[--(-)]]I=Q[P]X=(+-)Y=-+ A=(--(-))N=p[x[-]]G=p[x[--(-)]]T=(X,f)X=(+-)P=N[T]C=I[P]P=- T=Q[X]f=p[x[+-]]t=p[x[-+]]m=(A,Y)X=f[m]G=T[X]A=- X=p[x[--(-)]]m=(--(-))f=p[x[+-]]t=(m,A)A=-+ f=-(-)T=X[t]X=(+-)N=G[T]m=(-+)I=(P,N)N=p[x[-+]]G=p[x[-]]T=(X,f)P=N[T]T=(-)G=Q[T]X=p[x[-+]]f=p[x[+-]]t=(m,A)T=X[t]f= N=G[T]h=(-)h=K[h]A=+ T=- X=- t=- G=(T,X,f,t)C={[P]=G}G=-(-)h=(K,e,I,C)e=h K=(--(-))N=(+-)K=e[K]K=(e)C=p[x[-]]I=p[x[-+]]P=(N,G)G=(--(-))h=C[P]K=e[h]T=-+ h=(+-)h=K[h]C=(-)h=(K)h=Q[C]t=-+ f=(+-)I=p[x[-]]P=p[x[-+]]N=(G,T)C=I[N]N=(-+)K=h[C]C=+- h=(C)K=p[x[--(-)]]C=p[x[--(-)]]P=Q[N]G=p[x[+-]]T=p[x[-]]X=(f,t)N=G[X]I=P[N]t=- N=- f=(+-)P=(N)G=p[x[-]]T=p[x[-+]]h=(-+)X=(f,t)N=G[X]G=--(-)h=K[h]I={[N]=G}N=(+-)h=(K,C,P,I)f=(-+)t=-(-)K=(+-)K=h[K]K=(h)K=p[x[-]]C=p[x[-+]]P=Q[N]G=p[x[-]]T=p[x[-]]X=(f,t)N=G[X]f=(-+)I=P[N]N=--(-)P=(N)t=-+ h=(-)G=p[x[-]]T=p[x[--(-)]]X=(f,t)N=G[X]G=+- m=(-)X=p[x[--(-)]]f=p[x[-]]t=(m,A)T=X[t]X=-+ I={[N]=G,[T]=X}h=K[h]h=(K,C,P,I)K=(-)t=- K=h[K]K=(h)K=p[x[-+]]N=(+-)C=p[x[-+]]f=(-)e= h=(-)P=Q[N]G=p[x[-]]T=p[x[-]]X=(f,t)N=G[X]I=P[N]N=+- h=K[h]f=(--(-))P=(N)G=p[x[+-]]t=-(-)T=p[x[+-]]X=(f,t)N=G[X]G=--(-)I={[N]=G}h=(K,C,P,I)T=-(-)K=(-)G=(-)K=h[K]C=(-)K=(h)h=Q[C]I=p[x[-+]]P=p[x[-+]]N=(G,T)C=I[N]G=-+ K=h[C]C=--(-)h=(C)h=(-+)K=p[x[-+]]h=K[h]h=(K)K=p[x[--(-)]]C=p[x[+-]]N=(-+)I=p[x[--(-)]]P=(N,G)h=C[P]C= K[h]=C K=Q[(-)]h={}   K<-+  m= N=(N)A= f=(f)G= P=(P)a= t=(t)X= T=(T)G=(-+)C=(C)P=()T=(-)I=(I)y=(y)Y= C= I= p[P]=C y=+- C=()E=y p[C]=I N=Q[G]G=(-+)f=(-)I=N[G]X=(--(-))N=()p[N]=I G=Q[T]A=()a=- y=-+ T=(-)I=G[T]T=Q[X]X=(--(-))G=T[X]X=Q[f]f=(+-)T=X[f]f=()w=y t=()X=--(-)m={}p[f]=X X=--(-)p[t]=X X={}p[A]=m Y={}K=--(-)m=-+ y=- v=w<y y=a-w  K=-(-)    K<-+   K<-(-) K=-  p[C]=M K=p[C]K=K -+  +-    K<-(-) u=m==A K=- M=u  K=Q[(-)]h={}      K<-(-)  K<+   K<-+   K<-(-) M=-(-)J=(-+)A=p[x[+-]]E=-+ y=(-)Y=p[x[-]]a=(y,M)m=A[a]t=X[m]y=p[x[-+]]M=p[x[-+]]u=(J,E)J=(+-)a=y[u]Y=T[a]y=p[x[-+]]E=-(-)M=p[x[--(-)]]u=(J,E)a=y[u]A=Y[a]a=p[x[-]]J=+ u=(+-)y=p[x[-]]M=(u,J)Y=a[M]y=- m=A[Y]f=t-m m=p[x[+-]]a=(--(-))A=p[x[--(-)]]Y=(a,y)t=m[Y]K=f[t]f=K K=f<C K=K  -  -(-) f=(+,{})h=(+-)P=(--(-))K=Q[h]X=(--(-))e=p[x[-+]]I=Q[P]T=Q[X]X={(f)}G={(X)}T=- N=G[T]P=(N)I=(--(-))C=(P,I)e={()}h=((e))e=h C=p[x[+-]]h=C K=C  -(-) -    K<-(-) J=(-+)w=(--(-))K=Q[J]E=Q[w]J=(E)K=(-+)Q[K]=J K=+  a=y U=a K=- Y[a]=U a=     K<-(-)  K<-(-) K=Q[(+-)]h={} u=-+ Y=p[x[+-]]a=p[x[+-]]M=(-+)y=(M,u)u=(-+)A=Y[y]m=T[A]a=p[x[--(-)]]y=p[x[-+]]A=(--(-))J=-(-)A=m[A]K=- M=(u,J)Y=a[M]A=(m,Y)f=A    K<-(-) K=-(-) K={}T=+- p[x[-+]]=K N=- h=p[x[--(-)]]t=- P=h h=C%N p[x[-+]]=h G=C%T T=--(-)K=-+ N=G+T p[x[--(-)]]=N X=(--(-))T=Q[X]X=(-+)G=T[X]m=t T=(e)G=(-)t=--(-)X=-+ I[C]=G G=-+ f=T A=m<t t=X-m      K<-+   K<+   K<-(-) h=p[x[--(-)]]K=h  -(-) -  h={C}K=Q[(--(-))]   K<+  K=- H=+- n=k[H]D=n  J=(-)X=t u=Q[J]J=(--(-))M=u[J]u=(e,X)M=p[x[-+]]J=()K=-(-)X= y=u+J a=y+G J=--(-)y=--(-)Y=a%y y=I[C]G=Y u=G+J M=P[u]a=y..M I[C]=a     K<+   K<+  I=-+ C=p[x[-+]]e=C*I C=-+ h=e+C C=+- e=-+ K=h%e p[x[--(-)]]=K K=-+ e=p[x[-]]h=e~=C  f=- I=p[x[-]]N=p[x[-+]]K=+ G=p[x[-+]]X=(-)T=(X,f)P=N[T]h=I[P]I=()p[I]=h f=(--(-))P=p[x[-]]G=p[x[-]]T=p[x[-]]t=-+ X=(f,t)N=G[X]h=P[N]P=(-)P=h[P]N=(-,{x[-],x[+-];x[--(-)];I;x[+-],x[-+]})I=(I)P=(h,N)  f= K=-(-)       K<+   K<+   K<-+   K<-+   K<-   K<-  I=p[x[-]]C=--(-)K={}e=K P=I I=+- N=I I=--(-)K=- G=N<I I=C-N  h={}K= p[x[-]]=K K=Q[(+-)]   K<-+  I= K=Q[(--(-))]C= h={}e=  h={}e= K=Q[(-)]    K<-(-)  K<-+  h=(--(-))K=Q[h]C=p[x[-+]]N=(-+)G=+ I=p[x[+-]]P=(N,G)e=C[P]h=(e)K=Q[(-)]h={} N=--(-)C=p[x[-]]P=--(-)I=(P,N)C=-+ e=I==C K=e  -(-)-+ h=e    K<-(-) h=I K=-+  N=(--(-))h=p[x[-+]]C=p[x[-]]I=p[x[+-]]G=- P=(N,G)T=+ e=C[P]I=p[x[+-]]P=p[x[-+]]G=(-+)N=(G,T)C=I[N]h[e]=C h=p[x[+-]]e=()K=-+      K<-+   K<-(-)  K<-(-) K=f C=K t=T e=t K=-  X=- K=p[x[-+]]C=h P=p[x[+-]]h=(-)T=(+-)N=p[x[--(-)]]G=(T,X)h=K[h]I=P[G]h=(K,I)I=h K=C  -(-) - h=C    K<-  p[C]=D d=--(-)j=p[b]s=j+d H=k[s]n=m+H H=-+ K=n%H s=p[U]m=K H=A+s s=- K=- n=H%s A=n  D=p[C]K=D  -  - h=D     K<-+   K<-  C=p[x[-]]I=p[x[-]]K=--(-)e=C==I h=e  e=(-+)h=(-+)K=Q[h]h=Q[e]e=(-)Q[e]=K e=(+-)K=-+ Q[e]=h e=p[x[-]]C=()   K<-(-) C=r[-+]e=r[-+]K=p[x[-]]I=K K=I[C]K=K  -(-) -(-) K=p[x[-+]]h=(e)K=-       K<+   K<-+   K<-+   K<-+  T=(-)X=(-)G=h h=Q[T]T=(--(-))A=(-+)K=h[T]T=()p[T]=K h=Q[X]X=(-+)K=h[X]t=K m=Q[A]f=m X=K K=m  +  -(-) P=p[x[+-]]T=(+-)X=- N=p[x[--(-)]]G=(T,X)I=P[G]C=e[I]h=C K=C -+  +    K<+  K=Q[(-+)]h={} K= K=K -+ -+     K<-(-)  K<-  Y=(--(-))A=Q[Y]Y=(-)K=+ m=A[Y]f=m  T=-+ e=p[x[--(-)]]I=p[x[-]]P=p[x[--(-)]]G=(+-)N=(G,T)C=I[N]h=e[C]e=p[x[-]]K=h<e K=K -+  -    K<-+  K=+  P,T=(I,P)K=P  -(-) -(-)     K<+   K<-   K<-  K=X  -  -(-) X= K=-(-)   K<-  K=+ p[x[-+]]=h e=  G=P t=p[x[-+]]f=T~=t K=f -+  -(-)X=f     K<-(-)  K<-+  C=p[x[-+]]I=--(-)e=C~=I K=e  - -+  K=t K=+ X=f   e=r[-]T=(+-)X=+ C=(+-)K=e p[x[+-]]=K h=p[x[-]]C=h[C]P=p[x[-+]]N=p[x[--(-)]]G=(T,X)I=P[G]P=--(-)C=(h,I,P)p[x[--(-)]]=C h=p[x[-+]]K=h  +  +       K<+   K<-(-)  K<+   K<-(-)  K<-+  K=Q[(-+)]h={} K=t h=f K=f -+  -    K<-  E=--(-)y=#Y K=+ a=y==E  Y= A t=t+m X=t<=f X=Y  X Y=t>=f Y=A  Y X=Y  X Y=+ K=X  Y X=-+ K=K  X     K<-(-)  K<-+  E=--(-)y=#Y a=y==E K=a  +  -(-) h=p[x[--(-)]]N=(+-)G=-(-)C=p[x[-+]]I=p[x[-]]P=(N,G)e=C[P]K=h[e]e=(+,{x[+-],x[+-]})h=(--(-))h=K[h]h=(K,e)p[x[+-]]=h K=Q[(--(-))]h={}   K<-(-) K=p[x[-+]]K=K -+  -  h=p[x[--(-)]]G=(--(-))I=p[x[+-]]P=p[x[-]]T=-+ N=(G,T)e= C=I[N]K=h[C]p[x[-]]=K K=+      K<-(-)  K<-   K<-(-) K=p[x[--(-)]]K=K  -  -  T=(+-)X=-(-)P=p[x[-]]f=-+ N=p[x[-]]G=(T,X)X=(-+)I=P[G]C=e[I]N=p[x[-+]]I=(-+)G=p[x[-+]]I=C[I]T=(X,f)P=N[T]K=+ I=(C,P)h=I    K<-(-) K=p[x[--(-)]]C=I f=--(-)X=- T=(X,f)e[C]=T K=-+ C=  K=-(-)    K<-(-)  K<-(-) y=()X= a={}w=()S=(-)T= U={}E=(-,{y,f,t;N})p[y]=a a=()v=(-+)I= p[a]=E E={}m= k=(-)N=(N)H= N=(-)p[w]=E G= E=Q[v]Z=p[w]b={[S]=Z,[k]=H}m=-(-)v=(U,b)Y= E=(-(-),{w;y;A;f;t;a})f=(f)p[C]=v p[P]=E y=(y)a=(a)w=(w)A=(A)A=-(-)j=(-)t=(t)t=(-+)I=Q[N]T=p[C]X=p[P]U=-+ f=(t,m)d=- N=(--(-))G=T[f]S=-(-)N=I[N]N=(I,G)m=(+-)G=(--(-))I=Q[G]a=(-+)X=p[C]f=p[P]G=(-)t=(m,A)w=(-+)T=X[t]A=(-)G=I[G]G=(I,T)T=(--(-))I=Q[T]Y=-+ y=-(-)f=p[C]lG=-+ t=p[P]T=(-)m=(A,Y)X=f[m]T=I[T]f=(-)T=(I,X)X=Q[f]m=p[C]A=p[P]f=(-)Y=(a,y)t=m[Y]a=-(-)f=X[f]f=(X,t)Y=(-+)t=p[C]m=p[P]A=(Y,a)X=t[A]I=f[X]X=()p[X]=N t=(-+)N=()y=- p[N]=G G=()p[G]=T T=()a=(--(-))p[T]=I f=Q[t]m=p[C]A=p[P]Y=(a,y)t=m[Y]I=f[t]m=p[C]A=p[P]a=(-+)y=- Y=(a,y)t=m[Y]m=p[T]a=p[C]y=p[P]E=(w,U)Y=a[E]a=(+-)a=m[a]y=+ A={(m,Y)}a=(-)f=(t,(A))I=()p[I]=f f=p[I]U=(+-)m=p[C]A=p[P]Y=(a,y)a=(-+)t=m[Y]m= f[t]=m f=p[I]m=p[C]y=-+ A=p[P]Y=(a,y)t=m[Y]m= f[t]=m m=(+-)E=-(-)t=Q[m]b=- A=p[C]y=(--(-))Y=p[P]a=(y,E)m=A[a]f=t[m]A=p[C]E=- Y=p[P]y=(--(-))a=(y,E)m=A[a]y=(-+)A=p[I]t=(m,A)f=()p[f]=t t=p[f]A=p[C]E=-+ Y=p[P]a=(y,E)m=A[a]a=(-+)Y=Q[a]y=p[C]E=p[P]w=(U,b)a=y[w]U=(-+)F=- y=-+ w=--(-)E=--(-)A=Y[a]a=--(-)Y=(a,y,E,w)t[m]=Y t=p[f]y=(-)A=p[C]Y=p[P]b=-+ E=- a=(y,E)m=A[a]a=(--(-))Y=Q[a]y=p[C]E=p[P]w=(U,b)a=y[w]H=-(-)A=Y[a]a=+- y=--(-)E=-+ Y=(a,y,E)t[m]=Y A=(--(-))m=Q[A]Y=p[C]w=-(-)a=p[P]E=(--(-))y=(E,w)A=Y[y]t=m[A]Y=p[C]E=(-+)w=+ a=p[P]y=(E,w)w=-(-)A=Y[y]Y=p[f]m=(A,Y)t=()E=(-)p[t]=m m=p[t]k=(-+)Y=p[C]a=p[P]y=(E,w)A=Y[y]y=(-+)b=(--(-))a=Q[y]E=p[C]w=p[P]U=(b,S)y=E[U]E=+- S=+ w= U=-+ Y=a[y]y=--(-)a=(y,E,w,U)m[A]=a E=(--(-))m=p[t]w=+ b=(-)QG=(--(-))Y=p[C]a=p[P]y=(E,w)A=Y[y]y=(+-)a=Q[y]E=p[C]w=p[P]U=(b,S)y=E[U]E=-+ b=(-+)Y=a[y]U=+- y=+- w= a=(y,E,w,U)m[A]=a E=(-)m=p[t]Y=p[C]w=-(-)a=p[P]y=(E,w)A=Y[y]w=(--(-))U=- a=p[C]y=p[P]E=(w,U)Y=a[E]m[A]=Y m=p[t]E=(+-)Y=p[C]S=- w=+ a=p[P]y=(E,w)A=Y[y]y=(-+)a=Q[y]E=p[C]w=p[P]U=(b,S)y=E[U]Y=a[y]w=--(-)E=-+ y=- a=(y,E,w)E=(+-)m[A]=a m=p[t]Y=p[C]a=p[P]Z=- w=- y=(E,w)A=Y[y]Y=--(-)m[A]=Y m=p[t]E=(--(-))Y=p[C]w=+ a=p[P]y=(E,w)A=Y[y]S=(--(-))E=(--(-))y=Q[E]w=p[C]U=p[P]b=(S,Z)E=w[b]a=y[E]b=(-)S=-+ E=p[C]w=p[P]U=(b,S)y=E[U]Y=a[y]m[A]=Y m=p[t]E=(-)Y=p[C]w=-+ a=p[P]y=(E,w)w=+ A=Y[y]b=(-)Y= m[A]=Y m=p[t]Y=p[C]a=p[P]E=(--(-))U=+ y=(E,w)A=Y[y]Y=- m[A]=Y w=(-)Y=(-)S=-(-)A=Q[Y]a=p[C]y=p[P]E=(w,U)Y=a[E]U=+ m=A[Y]a=p[C]y=p[P]w=(+-)E=(w,U)w=+ Y=a[E]a=p[t]A=(Y,a)Y=p[C]a=p[P]E=(--(-))y=(E,w)m=Y[y]y=(-)a=Q[y]E=p[C]w=p[P]U=(b,S)y=E[U]Y=a[y]U=(+-)w=Q[U]b=p[C]S=p[P]Z=(k,H)U=b[Z]E=w[U]U=--(-)Z=(--(-))S=Q[Z]k=p[C]H=p[P]s=(j,d)Z=k[s]H=- k=- s=+ b=S[Z]Z=+- S={(Z,k,H)}w=(U,(S))b=(-+)U=Q[b]d=(-+)S=p[C]Z=p[P]H=(-)k=(H,s)b=S[k]E=U[b]k=(-)b=- Z=Q[k]H=p[C]s=p[P]j=(d,F)s=+- k=H[j]S=Z[k]k=-+ H=--(-)Z={(k,H,s)}U={(b,(Z))}y={w;(U)}w=(+-)a=(y)Y=(+-)A[m]=a A=Q[Y]U=-+ a=p[C]y=p[P]E=(w,U)U=-(-)w=(-)Y=a[E]m=A[Y]S=(-)a=p[C]y=p[P]E=(w,U)Y=a[E]a=p[f]A=(Y,a)Z=-+ m=()k=-(-)p[m]=A A=p[m]a=p[C]y=p[P]U=- w=(-+)E=(w,U)Y=a[E]E=(-+)y=Q[E]w=p[C]U=p[P]b=(S,Z)U= E=w[b]a=y[E]w=--(-)b=--(-)E=- y=(E,w,U,b)w=(-)A[Y]=y S=(+-)A=p[m]a=p[C]Z=-(-)y=p[P]U=-(-)E=(w,U)Y=a[E]E=(+-)y=Q[E]w=p[C]U=p[P]b=(S,Z)U= E=w[b]a=y[E]b=-+ E=- w=- y=(E,w,U,b)Z=-(-)b=- S=(-+)w=(+-)A[Y]=y A=p[m]a=p[C]U=-+ y=p[P]E=(w,U)Y=a[E]U=(-)y=p[C]E=p[P]w=(U,b)a=y[w]A[Y]=a w=(-)A=p[m]a=p[C]U=+ y=p[P]E=(w,U)Y=a[E]E=(--(-))y=Q[E]w=p[C]U=p[P]b=(S,Z)E=w[b]a=y[E]U=- w=+- E=+- y=(E,w,U)w=(-)A[Y]=y A=p[m]U=-+ Z=(+-)a=p[C]y=p[P]E=(w,U)w=(+-)Y=a[E]E=Q[w]U=p[C]b=p[P]S=(Z,k)w=U[S]y=E[w]w=p[C]U=p[P]S=(+-)Z=+ b=(S,Z)U=- E=w[b]a=y[E]A[Y]=a w=(+-)A=p[m]a=p[C]y=p[P]b=-(-)E=(w,U)Y=a[E]a= A[Y]=a U=- w=(+-)A=p[m]a=p[C]y=p[P]E=(w,U)Y=a[E]U=(+-)a=+- A[Y]=a Y=(-+)A=Q[Y]k=+ a=(-(-),{C,P})Y=(a)a=(+-)Y=Q[a]y=p[C]E=p[P]w=(U,b)a=y[w]b=-(-)A=Y[a]y=p[C]E=p[P]Z=(+-)U=(-+)w=(U,b)a=y[w]y=p[T]U=p[C]b=p[P]S=(Z,k)w=U[S]U=(-)b=-+ U=y[U]E={(y,w)}Y=(a,(E))w=(+-)U=-(-)a=p[C]y=p[P]E=(w,U)A=a[E]y=p[C]U=(-)E=p[P]w=(U,b)a=y[w]S=+ w=(-+)U=-(-)Y[A]=a a=p[C]y=p[P]E=(w,U)A=a[E]a= Y[A]=a y=(-+)a=Q[y]E=p[C]w=p[P]b=(--(-))U=(b,S)y=E[U]A=a[y]b=(-+)E=p[C]w=p[P]k=(-+)S=+ U=(b,S)y=E[U]a=(y,Y)A=()H=+ p[A]=a a=p[A]E=p[C]S=-(-)b=(+-)w=p[P]U=(b,S)y=E[U]U=(-+)s=+ w=Q[U]b=p[C]S=p[P]Z=(k,H)S=+- U=b[Z]Z=--(-)b=+- E=w[U]U=--(-)w=(U,b,S,Z)a[y]=w a=p[A]b=(-+)E=p[C]S=-+ H=-(-)w=p[P]U=(b,S)y=E[U]k=(--(-))U=(-)w=Q[U]b=p[C]S=p[P]Z=(k,H)S=--(-)U=b[Z]b=- E=w[U]U=+- k=(-+)Z=-+ H=-(-)w=(U,b,S,Z)a[y]=w a=p[A]S=-+ E=p[C]w=p[P]b=(-+)U=(b,S)y=E[U]U=(-)w=Q[U]b=p[C]S=p[P]Z=(k,H)U=b[Z]b=-+ E=w[U]U=- w=(U,b)b=(--(-))a[y]=w S=+ a=p[A]E=p[C]w=p[P]k=(-)U=(b,S)S=(--(-))Z=+ H=+ y=E[U]w=p[C]U=p[P]b=(S,Z)E=w[b]b=(--(-))a[y]=E a=p[A]E=p[C]S=- w=p[P]U=(b,S)y=E[U]U=(-)w=Q[U]b=p[C]S=p[P]Z=(k,H)U=b[Z]S=--(-)E=w[U]b=--(-)U=-+ w=(U,b,S)k=(+-)S=-+ a[y]=w a=p[A]H=-(-)E=p[C]b=(+-)w=p[P]U=(b,S)y=E[U]U=(+-)w=Q[U]b=p[C]S=p[P]Z=(k,H)U=b[Z]H=(-+)b=+- S=- E=w[U]U=--(-)w=(U,b,S)a[y]=w a=p[A]S=+ b=(-+)E=p[C]w=p[P]U=(b,S)y=E[U]b=(+-)U=Q[b]S=p[C]Z=p[P]k=(H,s)b=S[k]w=U[b]H=- k=(--(-))b=p[C]S=p[P]Z=(k,H)U=b[Z]E=w[U]a[y]=E S=-+ a=p[A]E=p[C]w=p[P]b=(-+)U=(b,S)y=E[U]E=- a[y]=E b=(+-)a=p[A]E=p[C]w=p[P]S=- U=(b,S)S=+ y=E[U]E=- Z=-+ b=(+-)a[y]=E a=p[A]E=p[C]w=p[P]U=(b,S)y=E[U]E= a[y]=E a=p[A]b=(-+)E=p[C]w=p[P]S=- U=(b,S)y=E[U]E= b=(-)a[y]=E a=p[A]S=-+ E=p[C]w=p[P]U=(b,S)y=E[U]E= a[y]=E S=(--(-))E=(+-)y=Q[E]w=p[C]U=p[P]b=(S,Z)E=w[b]a=y[E]w=(-(-),{t,C;P,G,f,m;I;A})E=- y=(E,w)U=()E= a= p[U]=a a=()b=(-,{C,P;X,T,U})w= y= p[a]=y y=()p[y]=E E=()p[E]=w w=()S=(-(-),{U,C;P})p[w]=b b=()Z=(-+,{E;N;C,P;w;b})p[b]=S S=()p[S]=Z Z=()k=(-,{E})p[Z]=k k=(-(-),{U,C,P;a,w,b;y,S})s=p[T]d=p[C]F=p[P]KG=(QG,lG)QG=(-+)j=d[KG]H=s[j]lG=- s=(-+)s=H[s]s=(H,k)s=p[T]d=p[C]F=p[P]KG=(QG,lG)j=d[KG]H=s[j]K=H  -(-) -  I=p[x[+-]]C=I==e h=C K=-+    K<-  h=p[x[--(-)]]K= h p[x[--(-)]]=K h=p[x[+-]]K=h  -(-)--(-) K=n K=+ h=D       K<-(-)  K<-(-)  K<+   K<-(-) K=p[x[--(-)]]K=K -+ -+  K=p[T]E=-+ J=+- u=(J,E)K=(--(-))E=(+-)Q[K]=u J=Q[E]E=--(-)K=J>E K=K  -  +    K<-  K=X  +  +  I=I+N C=I<=P T= G C=T  C T=I>=P T=G  T C=T  C T=-(-)K=C  T C=+ K=K  C     K<-(-)  K<-  u=p[C]K=u  -(-) - M=u  e=p[x[-]]h=#e e=+- K=h==e K=K  +  -(-)   K<-+  t=K M=(-)Y=p[x[-]]a=p[x[-+]]u=-+ y=(M,u)A=Y[y]m=T[A]K=m  +  + f=m  U=(U)s=p[A]h={}E=(E)a=(a)I=(I)lG=+ N=(N)T=(T)d=p[C]X=(X)Y= F=p[P]f=(f)QG=(-+)KG=(QG,lG)j=d[KG]H=s[j]m=(m)K=Q[(--(-))]G=(G)w=(w)j=(-(-),{y,A;C,P;S;Z})t=(t)P=(P)s=(+-)s=H[s]s=(H,j)A=(A)S=(S)y=(y)C=(C)k= b=(b)Z=(Z)     K<-   K<+   K<-(-) C=p[x[-]]I=-+ e=C*I C=- K=-+ h=e%C p[x[+-]]=h  p[C]=h K=-    K<-(-) j=- n=K s=k[j]j= H=s==j K=H  -(-) - D=H  j=+- s=k[j]j=p[Z]H=s==j D=H K=-     K<+   K<+  G=p[N]h=G K=-  m=--(-)f=()p[f]=h t=+- K=p[T]h=(t,m)K=--(-)a=(-(-),{})t=()m=K K=+- Y=(-)A=K p[t]=h h=Q[Y]Y={(a)}K={(Y)}h=- Y=K K=Y[h]a=K h=(--)K=Q[h]y=p[I]J=(-)u=Q[J]J=(a)u=(--(-))M=(J,u)y={()}h=((y))y=()p[y]=h h=+- M=p[t]u=M M=-+ J=M M=--(-)E=J<M K=- M=h-J   e=(-+)h=(--(-))K=Q[h]h=(e)h={}K=Q[(--(-))]       K=#O  (h),(Q,l) V=(l) r=(r,x,O,i,h,p) (Q,{r;x;O;i,h,p},l,V)  r ,(Q,l) V=(l) r=(r,x) (Q,{r,x},l,V)  r ,(Q,l) V=(l) r=() (Q,{},l,V)  r ,{},{},(Q) l,K=--(-),Q[-+] K  e[K],l=e[K]-(-),l+(+-)--(-)==e[K] e[K],p[K]=,  K=Q[l] ,(Q,l) V=(l) r=(r) (Q,{r},l,V)  r  ((-,{}))((h)))(getfenv  () _ENV,  [(+-)],newproxy,,,,{...}))(...)