harken script r6

 ((...) g={;,;,;,;,;,;;;,,;;,;,,,,;;,,;,,,;;;,,;,,,,,,;,;,;;,,;;;;;;;,,,,,;,,,,,,;,;;;;,,;,;;;,;;;,,,,,;,,;;,;;;,,,,;;;,,;;,;,;,,,;;;;,,,,;,;;;,;;;;;,;;;;,,,;,;,,,;;;;,;;,;,;;,;,;,;;,,,,;;,,,,,;;,,;,;,,,;,,;;;;,,,,;;,;,,;;,;;,,;,,;;;,,;;,;,;,}  (v) g[v+(+-)]  v,w  ({{-,-};{-+;+-},{+-,+-}})  w[-]<w[-+] g[w[+-]],g[w[+-]],w[-],w[-]=g[w[-+]],g[w[-]],w[+-]+(-),w[+-]-(+-)    v=.insert  w={u=+-,l=+-;k=--(-);T=-+,D=+-;B=-+;z=-;[]=+-,H=+-,X=-+;M=-;g=--(-);A=-+,w=-+,a=--(-);v=-;I=+-;c=--(-);b=-+,G=--(-),y=+-;[]=-;p=--(-),n=-,d=+-;o=-+;P=-+;J=-+;[]=-;e=+-;[]=+-;E=+-,S=--(-),s=-;[]=+-,L=+-,[]=--(-);W=-+,t=--(-),Z=--(-);r=+-;[]=--(-);K=--(-);j=+-;i=+-,V=-+;Q=-;O=-;x=-,[]=+-;N=-,h=-+,q=-+;[]=--(-);R=-+,[]=-,Y=--(-);f=-,[]=-+,C=--(-),m=-;F=-+,[]=--(-);U=-+} F=.concat  H=.sub  C=.char  x=.floor  y=.len  r=  t=g  g=-,#t,+-   S=t[g] (S)==  r=(S) B={} G=--(-) u=+-  q=--(-) G<=r   g=(S,G,G) F=w[g] F  u=u+F*(-)^((+-)-q)q=q+(+-) q==-+  q=-+  g=(u/(--(-))) w=((u%(+-))/(+-)) F=u%(+-)(B,(g,w,F))u=-+   g== (B,((u/(--(-))))) G>=r  (S,G+(-+),G+(--(-)))~= (B,(((u%(+-))/(--(-)))))   G=G+(-) t[g]=(B)   ((g,F,H,C,x,y,r,E,w,e,L,G,V,B,R,P,S,q,O,t,u,I)P,V,S,B,t,u,R,e,L,q,O,G,w,I,E=(g,v) F=(v) H=() (g,{},v,F)  H ,(g,v) F=(v) H=(...) (g,{...},v,F)  H ,{},()G=G+(--(-))S[G]=--(-) G ,{},(g) v=-,#g,-+  S[g[v]]=S[g[v]]+(-)  H   w=() F=(w)F[(--(-))],F[(-+)],F[(+-)]=g,q,() -   w   ({},{[(-)]=q;[(+-)]=g,[(-)]=() - }) ,(g,v) F=(v) H=(H,C,x,y,r) (g,{H,C;x;y,r},v,F)  H ,(g)S[g]=S[g]-(-) S[g]==--(-) S[g],t[g]=,  ,(g,v) F=(v) H=(H,C,x,y) (g,{H;C;x;y},v,F)  H ,(g) v,w=-,g[-] w  S[w],v=S[w]-(--(-)),v+(-) S[w]==-+  S[w],t[w]=,  w=g[v] ,(g,v) F=(v) H=(H,C) (g,{H;C},v,F)  H ,-,(w,H,C,x) l0,G,P0,v0,Y0,K,x0,k,Z0,N,Y,e0,i,S,B0,M,z,T0,u0,m,z0,H0,C0,r0,d,f,G0,M0,r,j0,Q,W0,W,w0,p0,N0,a,b0,q0,I0,V,O0,D0,X,t0,J0,p,D,l,c0,V0,S0,j,b,L0,n0,R0,k0,c,J,g0,u,h,d0,U,q,s,F0,T,Z,n,y0,E0,A,o  w   w<-(-)  w<-   w<-(-)  w<-   w<-   w<-+   w<-+   w<-  V=t[C[--(-)]]p=t[C[--(-)]]k=(-+)d=-(-)w=+ M=(k,d)q=V[M]G=q  D=-+ d=(-)p=t[C[-+]]M=t[C[-+]]k=(d,D)N=+ V=p[k]q=S[V]k=(--(-))T=(-)M=g[k]d=t[C[--(-)]]D=t[C[+-]]Z=(T,N)k=d[Z]p=M[k]k=t[C[-]]T=-+ d=t[C[--(-)]]Z=(-)D=(Z,T)M=k[D]V=p[M]u=q==V r=u w=u  -  +   z=-+ w=t[M]j=- W=(z,j)w=(-+)j=(-+)g[w]=W z=g[j]j=- w=z>j w=w  -(-)-+    w<+-  r={}w=g[(+-)] u=t[C[-+]]G=u==S w=+ r=G     w<-+   w<-   w<-(-) Q=(+-)o=(-+)N=g[o]s=g[Q]H0=+ F0=(--(-))a=t[G]g0=t[q]w0=(F0,H0)g0=(-+)v0=a[w0]a=(--(-))w=+ w0=+ a=s[a]Q={(s,v0)}s=(-+)o=((Q))N=()o=g[s]s=()Q=t[G]v0=t[q]a=(g0,w0)o=Q[a]N=s[o] C0=()y0=(+,{C0;h;b;J})x0=(-(-),{K;V,Z;G,q,j})t[C0]=x0 x0=()t[x0]=y0 S0=(-,{f;U;c,G,q})E0=- M0=-+ L0=-+ y0=()t[y0]=S0 I0=(+-)w=- r0=(-,{h;x0})S0=()t[S0]=r0 q0=t[G]O0=t[q]R0=(I0,E0)V0=q0[R0]q0=(-,{G;q;S0;h})r0=k[V0]V0=(--(-))V0=r0[V0]P0=(-+)I0=(-)V0=(r0,q0)r0=t[Z]q0=t[G]O0=t[q]E0=-+ R0=(I0,E0)V0=q0[R0]q0=t[J]r0[V0]=q0 q0=(-)V0=g[q0]O0=t[G]E0=(-)R0=t[q]I0=(E0,L0)L0=+ q0=O0[I0]r0=V0[q0]E0=(+-)O0=t[G]R0=t[q]I0=(E0,L0)q0=O0[I0]I0=t[G]E0=t[q]L0=(P0,M0)R0=I0[L0]O0=D[R0]V0=(q0,O0)E0=+ I0=(--(-))L0=-(-)P0=+ q0=t[G]O0=t[q]R0=(I0,E0)r0=q0[R0]O0=t[G]R0=t[q]M0=(--(-))E0=(+-)I0=(E0,L0)q0=O0[I0]V0[r0]=q0 O0=(--(-))q0=g[O0]R0=t[G]I0=t[q]L0=(+-)E0=(L0,P0)O0=R0[E0]r0=q0[O0]P0=-(-)R0=t[G]L0=(-)I0=t[q]E0=(L0,P0)O0=R0[E0]L0=- q0=(O0,V0)E0=(+-)O0=t[G]R0=t[q]I0=(E0,L0)r0=O0[I0]I0=(--(-))R0=g[I0]E0=t[G]p0=+ L0=t[q]P0=(M0,p0)I0=E0[P0]p0=+ O0=R0[I0]I0= L0=+ E0= R0=(I0,E0)q0[r0]=R0 D0=-(-)O0=t[G]E0=(--(-))R0=t[q]I0=(E0,L0)r0=O0[I0]I0=(-)R0=g[I0]Z0=- M0=(+-)E0=t[G]L0=t[q]P0=(M0,p0)I0=E0[P0]O0=R0[I0]L0=+ I0= E0= R0=(I0,E0)E0=(-)q0[r0]=R0 O0=t[G]R0=t[q]p0=-(-)I0=(E0,L0)M0=(+-)r0=O0[I0]I0=(+-)R0=g[I0]E0=t[G]L0=t[q]P0=(M0,p0)I0=E0[P0]O0=R0[I0]p0=(-)L0=- I0=-+ M0=- E0=-+ R0=(I0,E0,L0)P0=(--(-))q0[r0]=R0 O0=t[G]L0=+ R0=t[q]E0=(-)I0=(E0,L0)L0=-+ r0=O0[I0]O0= q0[r0]=O0 O0=t[G]k0=-(-)R0=t[q]E0=(-)I0=(E0,L0)E0=(-)r0=O0[I0]O0=- L0=-+ q0[r0]=O0 O0=t[G]R0=t[q]I0=(E0,L0)r0=O0[I0]O0= E0=(-+)q0[r0]=O0 O0=t[G]R0=t[q]L0=+ I0=(E0,L0)r0=O0[I0]O0= R0=(+-)q0[r0]=O0 O0=g[R0]I0=t[G]E0=t[q]L0=(P0,M0)R0=I0[L0]P0=(+-)r0=O0[R0]I0=t[G]E0=t[q]M0=-+ L0=(P0,M0)R0=I0[L0]O0=(R0,q0)L0=(-+)P0=+ R0=t[G]I0=t[q]E0=(L0,P0)r0=R0[E0]E0=(+-)I0=g[E0]L0=t[G]P0=t[q]M0=(p0,k0)E0=L0[M0]L0=-+ R0=I0[E0]E0=--(-)p0=- I0=(E0,L0)M0=(+-)O0[r0]=I0 I0=(+-)R0=g[I0]E0=t[G]L0=t[q]P0=(M0,p0)N0=-(-)I0=E0[P0]T0=(+-)r0=R0[I0]p0=- E0=t[G]L0=t[q]M0=(-)P0=(M0,p0)I0=E0[P0]R0=(I0,q0)I0=t[G]E0=t[q]M0=-(-)P0=(+-)L0=(P0,M0)r0=I0[L0]L0=(-+)E0=g[L0]P0=t[G]M0=t[q]k0=(-+)p0=(k0,D0)L0=P0[p0]I0=E0[L0]L0=-+ P0=--(-)E0=(L0,P0)p0=(-+-)R0[r0]=E0 E0=(-)I0=g[E0]L0=t[G]k0=-(-)P0=t[q]M0=(p0,k0)p0=(--(-))E0=L0[M0]k0=-(-)r0=I0[E0]L0=t[G]P0=t[q]M0=(p0,k0)E0=L0[M0]I0=(E0,q0)k0=-(-)r0=()p0=(--(-))t[r0]=I0 I0=t[r0]L0=t[G]P0=t[q]M0=(p0,k0)E0=L0[M0]M0=(--(-))P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)M0=p0[D0]D0=--(-)Z0=-+ k0=-+ p0=--(-)L0=P0[M0]M0=+- T0=(--(-))P0=(M0,p0,k0,D0)p0=(+-)D0=-+ I0[E0]=P0 I0=t[r0]k0=-+ L0=t[G]P0=t[q]M0=(p0,k0)E0=L0[M0]P0=t[G]k0=(-+)M0=t[q]p0=(k0,D0)L0=P0[p0]I0[E0]=L0 p0=(-+)I0=t[r0]L0=t[G]P0=t[q]k0=+ M0=(p0,k0)E0=L0[M0]M0=(-+)P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)k0=+- M0=p0[D0]p0=--(-)L0=P0[M0]M0=+- P0=(M0,p0,k0)I0[E0]=P0 I0=t[r0]T0=(+-)L0=t[G]p0=(-)k0=-(-)P0=t[q]M0=(p0,k0)E0=L0[M0]Z0=+ M0=(-+)P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)M0=p0[D0]L0=P0[M0]M0=- p0=+- k0=+- P0=(M0,p0,k0)I0[E0]=P0 p0=(-)I0=t[r0]k0=+ L0=t[G]P0=t[q]M0=(p0,k0)Z0=-+ E0=L0[M0]D0=-+ L0=--(-)k0=(--(-))I0[E0]=L0 L0=(+-)E0=g[L0]P0=t[G]M0=t[q]p0=(k0,D0)L0=P0[p0]I0=E0[L0]D0=-(-)k0=(+-)J0=-(-)P0=t[G]M0=t[q]p0=(k0,D0)D0=- k0=(+-)L0=P0[p0]P0=t[r0]E0=(L0,P0)E0=t[r0]P0=t[G]M0=t[q]p0=(k0,D0)L0=P0[p0]I0=E0[L0]k0=(--(-))E0=(+-)E0=I0[E0]L0=(-+,{h;x0;r0;G;q})D0=-+ E0=(I0,L0)L0=(-)E0=g[L0]P0=t[G]M0=t[q]p0=(k0,D0)D0=-+ L0=P0[p0]k0=(-+)I0=E0[L0]P0=t[G]d0=(-+)M0=t[q]p0=(k0,D0)L0=P0[p0]E0=(L0,q0)p0=(--(-))L0=t[G]T0=(--(-))k0=+ P0=t[q]M0=(p0,k0)I0=L0[M0]M0=(-+)P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)M0=p0[D0]L0=P0[M0]D0=- M0=--(-)p0=+- k0=+- P0=(M0,p0,k0,D0)k0=-(-)E0[I0]=P0 L0=t[G]p0=(-+)P0=t[q]D0=+ M0=(p0,k0)I0=L0[M0]k0=-(-)L0=--(-)E0[I0]=L0 p0=(-)L0=t[G]P0=t[q]M0=(p0,k0)k0=(+-)I0=L0[M0]P0=t[G]M0=t[q]T0=(-)p0=(k0,D0)Z0=+ L0=P0[p0]p0=(+-)E0[I0]=L0 L0=t[G]k0=-(-)P0=t[q]M0=(p0,k0)I0=L0[M0]M0=(-)P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)M0=p0[D0]L0=P0[M0]p0=- M0=-+ k0=+- T0=-+ P0=(M0,p0,k0)E0[I0]=P0 P0=(--(-))L0=g[P0]D0=(-)M0=t[G]p0=t[q]k0=(D0,T0)T0=-+ P0=M0[k0]D0=(+-)I0=L0[P0]M0=t[G]p0=t[q]k0=(D0,T0)T0=- P0=M0[k0]L0=(P0,q0)I0=()t[I0]=L0 L0=t[I0]M0=t[G]D0=(--(-))p0=t[q]k0=(D0,T0)P0=M0[k0]k0=(--(-))p0=g[k0]D0=t[G]T0=t[q]Z0=(d0,N0)k0=D0[Z0]D0=- M0=p0[k0]k0=-+ T0=- Z0=--(-)N0=- p0=(k0,D0,T0,Z0)L0[P0]=p0 L0=t[I0]M0=t[G]D0=(--(-))T0=-(-)p0=t[q]k0=(D0,T0)P0=M0[k0]k0=(-)p0=g[k0]D0=t[G]d0=(-)T0=t[q]Z0=(d0,N0)k0=D0[Z0]T0=- Z0=--(-)D0=+- M0=p0[k0]k0=--(-)p0=(k0,D0,T0,Z0)D0=(-+)L0[P0]=p0 L0=t[I0]T0=+ M0=t[G]p0=t[q]k0=(D0,T0)T0=+ D0=(+-)P0=M0[k0]M0= L0[P0]=M0 L0=t[I0]M0=t[G]p0=t[q]k0=(D0,T0)P0=M0[k0]D0=(-+)M0=+- L0[P0]=M0 L0=t[I0]M0=t[G]T0=-(-)p0=t[q]k0=(D0,T0)P0=M0[k0]T0=(-)N0=(--(-))M0=+- Z0=-+ L0[P0]=M0 M0=(+-)P0=g[M0]p0=t[G]k0=t[q]D0=(T0,Z0)M0=p0[D0]L0=P0[M0]T0=(-+)p0=t[G]Z0=- k0=t[q]D0=(T0,Z0)M0=p0[D0]p0=t[I0]P0=(M0,p0)L0=()Z0=- t[L0]=P0 P0=t[L0]p0=t[G]k0=t[q]T0=(--(-))D0=(T0,Z0)M0=p0[D0]D0=(-)k0=g[D0]T0=t[G]Z0=t[q]d0=(N0,J0)D0=T0[d0]p0=k0[D0]D0=+- T0=-+ k0=(D0,T0)P0[M0]=k0 Z0=(-)P0=t[L0]d0=- k0=t[G]D0=t[q]T0=(Z0,d0)M0=(+-)p0=k0[T0]M0=P0[M0]M0=(P0,p0)p0=(+,{I0;G;q,L0})P0=(+-)P0=M0[P0]P0=(M0,p0)M0=(+-)P0=g[M0]D0=t[s]T0={(D0)}k0=T0[-]M0=T0[-+]p0=T0[+-]  w=t[C[-]]G=t[C[--(-)]]S[w]=G w=t[C[-]]G={(S)}w=g[(--(-))]r={(G)}   w<-+  w= w=-  G=t[C[+-]]V=+- q=- u=(q,V)G=-+ S=u==G w=S -+  + r=S      w<+   w<-(-)  w<-   w<-(-) G=(-)p=(+-)r=g[G]u=t[C[-+]]q=t[C[-+]]M=-(-)V=(p,M)G=u[V]w=r[G]G=t[C[-]]r=(G,S)w=-  c=- j=#N b=-+ J=(b,j)b=(N,J)w=-+ j=t[T]n=b-c J= l=(n)j[b]=l b=   w=-(-)t0=r0 t[F0]=t0    w<-+  G=(-+-)u=+ S=G^u r=-(-)w=r-S S=w r=(-)w=r/S r={w}w=g[(-+)] C0=S0 q0=-(-)B0=t[G]G0=t[q]u0=(+-)e0=(u0,q0)V0=B0[e0]t0=r0[V0]q0=(--(-))V0=(+-)V0=t0[V0]V0=(t0)O0=-(-)G0=t[G]t0=(--)e0=t[q]u0=(q0,O0)t0=V0[t0]B0=G0[u0]t0=(V0,B0)w=t0 -+  -(-)    w<-(-)  w<-   w<+  N= T D=D+Z k=D<=d k=N  k N=D>=d N=T  N k=N  k N=- w=k  N k=-+ w=w  k  u=t[C[+-]]V=t[C[--(-)]]k=(--(-))d=+ p=t[C[+-]]M=(k,d)D=-+ d=(+-)q=V[M]M=(--(-))k=-+ G=u[q]q=t[C[+-]]V=t[C[-]]p=(M,k)u=q[p]S=G[u]G=--(-)r=S>G S=r G=w q=t[C[+-]]p=t[C[-]]M=t[C[+-]]k=(d,D)V=p[k]u=q[V]r=u w=u  -  +   r=t[C[--(-)]]u=t[C[--(-)]]w=g[(-)]q= G=(u,q)r={}   w<-  j=(-+)w=g[j]j=(+-)g[j]=w w=-(-) w=-+ b=#N j=+- J=b==j       w<-   w<-   w<+   w<-(-)  w<+  w=u w=r  -(-) +  w=r -+  +   S=H[-+]w=S p=(-)t[C[-]]=w M=-+ u=t[C[+-]]q=t[C[--(-)]]V=(p,M)r=(-+)M=(--(-))G=u[V]k=-(-)r=S[r]r=(S,G)t[C[+-]]=r G=t[C[-+]]q=t[C[+-]]V=t[C[-]]p=(M,k)r={}w=g[(-)]u=q[p]q=t[C[-+]]S= G[u]=q    w<-(-) d=(-)D=-+ p=t[C[--(-)]]N=-+ M=t[C[-]]w=-(-)k=(d,D)T=(+-)V=p[k]q=S[V]k=(+-)M=g[k]d=t[C[--(-)]]D=t[C[-+]]Z=(T,N)T=-(-)k=d[Z]p=M[k]k=t[C[-+]]d=t[C[-+]]Z=(-)D=(Z,T)M=k[D]V=p[M]u=q==V r=u  n=(+-)l=()t[l]=Y r=g[n]U=- n=(-)w=r[n]f=-+ n=+- c=- r=(n,c)h=-+ c=-+ n=()t[n]=r m=(-)s=- w=t[M]r=(c,h)c=()h=- t[c]=r w=t[M]X=t[n]r=(h,X)h=()Q=+- t[h]=r r=t[M]X=(f,U)r=- w=X==r r=(-+)X=()U=(-)t[X]=w i=g[m]K=t[M]o={(s,Q)}m=((o))i=(-)w=(--(-))w=J[w]A=m..i f=U..A U=(--(-))w=(J,r,f)f=()t[f]=w r=g[U]A=(-,{M;l,D;u,G;b;X;f,n,h,c;d})U={(A)}w={(U)}U=w w=t[X]w=w  -(-) -(-)    w<-   w<-(-)  w<-  r=(--(-))w=g[r]V=(+-)V=S[V]q={(S)}V={((q))}r=V[-+]u=V[-+]w=+ q=r G=V[+-] w=g[(+-)]G= r={}S=   w=t[C[+-]]q=t[C[+-]]u= q r=(u)w=-    w<+  w=G w=r  -  +  w=-+      w<-   w<-+   w<-(-)  w<-(-) w= w=w  -  -(-) w=S  -(-) -   o=- K=U[o]o=t[f]m=K==o w=+ A=m    w<-(-) w=-(-) w=G r=(S)w=g[(-+)]r={}    w<-+   w<-(-)  w<-(-) r[S]=G w=u r={}w=g[(--(-))] e0=r0 w=- t[a]=e0   c={}X=(--(-))b=()M= p= Z= N= J={}m= U=(--(-))t[b]=J p=(-)N=- j=(-(-),{b,d;D;V})u= k= l=()J=()u=- t[J]=j V=(V)n=(+-)j={}t[l]=j j=g[n]f=t[l]h={[X]=f,[U]=m}n=(c,h)t[G]=n j=(+,{l,b,T;d,D;J})t[q]=j V=g[p]T=(T)T=+ l=(l)J=(J)b=(b)J=+ Z=(+-)k=t[G]D=(D)p=(-)d=(d)d=t[q]D=(Z,T)M=k[D]p=V[p]T=(-)p=(V,M)b=- M=(-)V=g[M]M=(+-)M=V[M]d=t[G]D=t[q]Z=(T,N)k=d[Z]M=(V,k)N=(-)k=(--(-))V=g[k]k=(--(-))D=t[G]k=V[k]Z=t[q]T=(N,J)d=D[T]k=(V,d)d=(+-)V=g[d]J=(--)Z=t[G]d=(-+)T=t[q]N=(J,b)D=Z[N]b=(-)d=V[d]d=(V,D)D=(-+)V=g[D]j=-(-)T=t[G]N=t[q]J=(b,j)Z=T[J]j=+ D=(--(-))D=V[D]h=-+ D=(V,Z)V=()b=(--(-))t[V]=D T=t[G]N=t[q]J=(b,j)Z=T[J]D=p[Z]T=w b=t[G]j=t[q]c=(-+)l=(c,h)J=b[l]N=D[J]w=N  - -+ Z=N    w<-+  e0=w u0=(+-)O0=t[G]L0=- E0=(--(-))u0=V0[u0]R0=t[q]I0=(E0,L0)q0=O0[I0]u0=(V0,q0)G0=u0 w=u0  -(-)-+  G=t[C[-+]]w=- u=t[C[-+]]S=G==u r=S        w<-(-)  w<+   w<-+   w<-   w<+   w<-+  V=(-+)q=g[V]V=()q=t[C[-+]]u=V-q q=t[C[-+]]r=u>=q w=r -+  +  s=(--(-))o=g[s]a=t[G]H0=- F0=(-+)g0=t[q]w0=(F0,H0)C0=--(-)s=(--(-))F0=+ v0=a[w0]Q=v0 ..u s=o[s]s=(o,Q)o=- N=s[o]x0=- s=(--(-))o=g[s]v0=t[G]a=t[q]w0=(-+)g0=(w0,F0)Q=v0[g0]s=(N,Q)o={}s=()t[s]=o o=()Q=(+,{G;q,s;o})t[o]=Q F0=()Q=t[o]v0=(N)w0= a= g0= v0= Q= t[F0]=Q Q=()t[Q]=v0 v0=()t[v0]=a a=()t[a]=g0 g0=()t[g0]=w0 w=-(-)H0=t[s]w0=H0[C0]t[F0]=w0 C0=t[s]H0=C0[x0]x0=(-+)t[Q]=H0 C0=g[x0]r0=t[s]t0={(r0)}x0=t0[+-]y0=t0[-]S0=t0[+-]  m=+- i=U[m]A=i w=+    w<-(-) r=t[C[+-]]V= q=t[C[+-]]w=- u=(q,V) w0=-+ s=(-+)g0=(+-)o=g[s]Q=t[G]v0=t[q]a=(g0,w0)w=+ s=Q[a]N=o[s]o=()    w<+   w<-   w<+  z=(--(-))k=D W=g[z]z=(+-)Y=W[z]W=(S,k)Y=t[C[--(-)]]z=()b=W+z z=-+ J=b+p k= b=--(-)N=J%b b=u[G]p=N w=-+ W=p+z Y=q[W]J=b..Y u[G]=J  r={}w=g[(+-)]  t[G]=Y w=t[G]w=w  - -+    w<+  G=t[C[+-]]u=+- r=G==u w=r  -  -(-) S0,r0=(y0,S0)w=S0  -(-) -(-)     w<-   w<-   w<-(-)  w<-(-) w=-(-)q= M= p=  u=+- G=t[C[-]]S=G~=u w=S  -  +   r=t[C[+-]]S=H[+-]w=r==S G=H[-+]w=w -+  +    w<-(-) k0,D0=(p0,k0)w=k0 -+  -(-) u=t[C[+-]]w={}G=-+ q=u u=--(-)S=w w=+ V=u u=--(-)p=V<u u=G-V     w<+   w<-(-)  w<+  R0=-(-)e0=t[G]O0=(+-)u0=t[q]B0=(--(-))B0=V0[B0]q0=(O0,R0)G0=e0[q0]B0=(V0,G0)w=B0  -  -(-) u=u+V G=u<=q M= p G=M  G M=u>=q M=p  M G=M  G M=- w=G  M G=-+ w=w  G   i=w o=--(-)K=U[o]o= m=K==o A=m w=m -+  -(-)   w<-+  w=D w=d -+ -+ r=d  N=(-+)w=+ T=g[N]N=(-+)Z=T[N]d=Z       w<-   w<-(-)  w<+   w<+   w<-  w=g[(-+)]r={} w=-+ u=t[C[+-]]S=u   S=t[C[+-]]r=#S S=+- w=r==S w=w  -  -(-)   w<-(-) h=(h)c=(c)l=(l)n=(n)X=(X)U= w=+ f=(f) i=t[G]A=i w=i  +  -     w<-   w<-(-)  w<-(-) N=(-+)m=()w=T g0=+ T=()t[T]=Z Z=t[T]N=Z[N]h=+ c=(+-)b=t[G]U=()j=t[q]l=(c,h)c=()J=b[l]x0=+ N=(Z,J)j=()Z=()t[Z]=N N=--(-)J=()b=()t[J]=N f=()l=()N=+- t[b]=N N=-+ t[j]=N N= t[l]=N N= t[c]=N C0=- h=()K=()N= y0=-+ t[h]=N N= H0=-(-)X=()t[X]=N F0=+ N= t[f]=N N=+- t[U]=N w0=(-)N=- t[m]=N N= t[K]=N a=(+-)s=t[G]Q=t[q]v0=(a,g0)o=s[v0]v0=t[G]a=t[q]g0=(w0,F0)Q=v0[g0]a=t[G]g0=t[q]F0=(--(-))w0=(F0,H0)v0=a[w0]H0=(-)g0=t[G]N=(-)w0=t[q]F0=(H0,C0)a=g0[F0]w0=t[G]C0=(-)F0=t[q]N=d[N]H0=(C0,x0)g0=w0[H0]F0=t[G]H0=t[q]x0=(-)C0=(x0,y0)w0=F0[C0]F0=-+ s={[Q]=v0,[a]=g0,[w0]=F0}N=(d,o,s)Q=(+-)s=g[Q]w0=(--(-))Q=()v0=t[G]F0=-(-)a=t[q]g0=(w0,F0)s=v0[g0]o=Q[s]N= o w=N -+  -(-) w=-+ G0=r0 t[v0]=G0   w=+    w<-(-) w=-+ J=b c=J N[J]=c J=  r=t[C[-]]V= w=- q=t[C[-]]u=(q,V)     w<+   w<-(-)  w<-   w<-+  u=(u)V=(V)u= q=(q)M=(M)D=(D)b=(b)N= q=()Z= w=-(-)d=(d)J= G=(G)k= D=()T= G= p= t[q]=G p=(+-)G=()k=(+-)t[G]=u V=g[p]p=(+-)u=V[p]J=+- V=()b=+- t[V]=u N={}M=(+-)p=g[M]d=(--(-))M=(-)u=p[M]M=g[k]k=(--(-))p=M[k]k=g[d]d=(-)M=k[d]j=b b=+- k=-+ l=b b=--(-)d=()T=()t[d]=k k=--(-)t[D]=k n=l<b k={}b=J-l Z={}t[T]=Z Z=--(-) A=t[G]r=A w=A -+ -+   w=t[C[+-]]V=t[C[-+]]q=w G=w u=V w=V  +  +    w<-+  G=t[C[+-]]w=- u=+- S=G*u G=- r=S%G t[C[+-]]=r  w=-(-)t[G]=r     w<-   w<-+  r={G}w=g[(-+)] G=w T=(-+)D=(+-)V=t[C[--(-)]]M=t[C[-+]]Z=-+ k=t[C[-+]]d=(D,Z)N=-+ p=M[d]k=(-)q=V[p]M=g[k]d=t[C[-+]]D=t[C[-]]Z=(T,N)k=d[Z]p=M[k]T=-(-)Z=(-)k=t[C[-+]]d=t[C[--(-)]]D=(Z,T)M=k[D]V=p[M]u=q==V r=u w=u  -(-) -(-)   w<-  q=()u=(--(-))w= G=()t[G]=w S=H V=()r=g[u]u=(+-)w=r[u]u=()M=(+-)k=(-(-),{V})t[u]=w w=(-(-),{})t[q]=w w= t[V]=w p=g[M]M=(k)r=M w=M  -  -(-) w= t[C[--(-)]]=w w=-+         w<-(-)  w<-   w<-+   w<-(-)  w<-+   w<+   w<-  w= t[C[+-]]=w w=g[(+-)]r={} b=#N j=+- J=b==j w=J -+  +   u,p=(G,u)w=u  -(-) -    w<+  M=t[C[--(-)]]Z=-+ k=t[C[-+]]w=-+ D=(+-)d=(D,Z)p=M[d]q=p  T0=(-)p0=t[G]r={}f=(f)k= Z0=-(-)p= k0=t[q]D0=(T0,Z0)M0=p0[D0]U=(U)c=(c)P0=M[M0]b=(b)M0=(-)p0=(-(-),{X;Z;G,q,g0,y0,a;m,l,h;v0,Q,F0})Z0=+ M0=P0[M0]M0=(P0,p0)F0=(F0)p0=t[G]k0=t[q]x0=(x0)m=(m)w=g[(-+)]s=(s)L0=(L0)h=(h)T0=(-+)D0=(T0,Z0)l=(l)R0= M0=p0[D0]v0=(v0)V0= N= Q=(Q)a=(a)o=(o)X=(X)K=(K)S0=(S0)u= p0=(-+,{T;G;q,Z,J})P0=D[M0]D= r0=(r0)G=(G)g0=(g0)q0= O0= M0=(-)T=(T)M= d= Z=(Z)I0=(I0)E0= M0=P0[M0]q=(q)C0=(C0)V=(V)J=(J)j=(j)y0=(y0)M0=(P0,p0)    w<-(-)  w<-   w<-(-) u=t[C[-]]w=-+ r=u  l0=(-+)P0=k0 T0=()d0=(--(-))b0=(-+)t[T0]=D0 Z0=g[d0]N0=t[G]j0=-+ J0=t[q]z0=-+ Y0=(--(-))W0=(b0,z0)z0=- D0=T0 d0=N0[W0]T0=Z0[d0]N0=t[G]b0=(--(-))J0=t[q]W0=(b0,z0)d0=N0[W0]N0=t[I0]Z0=(d0,N0)W0=(-+)b0=-(-)d0=t[G]N0=t[q]J0=(W0,b0)T0=d0[J0]J0=(-+)N0=g[J0]W0=t[G]b0=t[q]z0=(Y0,j0)J0=W0[z0]W0=+- d0=N0[J0]b0=-+ J0=-+ z0=- N0=(J0,W0,b0,z0)W0=(-+)b0=-(-)Z0[T0]=N0 d0=t[G]N0=t[q]J0=(W0,b0)n0=+ j0=- T0=d0[J0]W0=t[G]b0=t[q]Y0=(--(-))z0=(Y0,j0)J0=W0[z0]b0=t[D0]Y0=t[G]j0=t[q]c0=(l0,n0)z0=Y0[c0]W0=b0[z0]N0=J0 ..W0 W0=(--(-))d0=P0 ..N0 Z0[T0]=d0 d0=t[G]N0=t[q]b0=- J0=(W0,b0)b0=-(-)T0=d0[J0]w=-(-)d0= Y0=(--(-))Z0[T0]=d0 d0=t[G]W0=(-+)N0=t[q]J0=(W0,b0)T0=d0[J0]J0=(-)N0=g[J0]W0=t[G]b0=t[q]j0=+ z0=(Y0,j0)Y0=(-+)J0=W0[z0]b0=-+ W0=- d0=N0[J0]J0=-+ N0=(J0,W0,b0)Z0[T0]=N0 b0=-+ d0=t[G]N0=t[q]W0=(--(-))J0=(W0,b0)j0=+ T0=d0[J0]J0=(+-)N0=g[J0]W0=t[G]b0=t[q]z0=(Y0,j0)J0=W0[z0]W0=- b0=- d0=N0[J0]J0=- N0=(J0,W0,b0)P0= b0=-+ Z0[T0]=N0 Y0=- d0=t[G]W0=(+-)N0=t[q]J0=(W0,b0)T0=d0[J0]N0=(-+)d0=-+ Z0[T0]=d0 d0=g[N0]J0=t[G]z0=(-+)W0=t[q]b0=(z0,Y0)N0=J0[b0]T0=d0[N0]z0=(-)Y0=- J0=t[G]W0=t[q]b0=(z0,Y0)N0=J0[b0]z0=-+ b0=(+-)d0=(N0,Z0)N0=t[G]J0=t[q]W0=(b0,z0)d0=N0[W0]T0=Z0[d0]N0=(-+,{X;y0;D0})d0=(-)d0=T0[d0]Z0= d0=(T0,N0)D0=(D0)  V=+ w=t[C[--(-)]]k=-+ q=(--(-))S=t[C[--(-)]]G=t[C[+-]]u=(q,V)M=(+-)r=S[u]b=- u=(-+)G=g[u]q=t[C[--(-)]]V=t[C[+-]]p=(M,k)u=q[p]q=- J=(+-)S=G[u]d=t[C[-+]]Z=t[C[-]]V=-+ T=t[C[-+]]N=(J,b)u=+- D=Z[N]J=-(-)k=d[D]N=(-+)D=t[C[+-]]Z=t[C[-]]T=(N,J)d=D[T]M=k[d]k=-+ p=M+k G=(u,q,V,p)w[r]=G r={}w=g[(-+)]   w<-(-) G=t[C[--(-)]]u=+- Z=--(-)S=G%u q=t[C[-]]d=--(-)M=t[C[--(-)]]J=t[C[--(-)]]N=J-S J=+- T=N/J D=Z-T k=d^D p=M/k V=(p)q=-+ u=V%q V=- k=+- q=V^S G=u/q q=t[C[--(-)]]M=G%k k=-(-)p=M*k V=(p)q=t[C[-]]p=(G)u=V+p G= V=--(-)q=u%V M=- p=u-q V=p/M M=- d=+- p=q%M k=q-p Z=--(-)q= M=k/d d=--(-)w=-+ k=V%d D=V-k S= d=D/Z D={p,M,k,d}V= t[C[--(-)]]=D u= k= M= d= p=  w=g[(--(-))]q= r=t[C[--(-)]]u=t[C[+-]]G=(u,q)r={}     w<-+   w<-(-)  w<-+   w<-(-) w=t[C[+-]]M=(p)V=u p= V= w=+  r={}w=g[(-)]S=   M=(-+-)p=r r=g[M]M=(--(-))w=r[M]M=()k=(-+)t[M]=w r=g[k]k=(-+)w=r[k]T=(-+)k=w Z=g[T]D=w w=Z  -  - d=Z    w<-+  w=- u=t[C[-+]]r=u  r=--(-)t[C[-+]]=r u=t[C[+-]]V=t[C[--(-)]]p= w=-(-)q=(V,p)    w<+   w<-+   w<+  S=u w=q w=u  -(-)-+  S=(-+)u=-+ w=g[S]G=t[C[+-]]S=(G,u)w=-(-)  b=b+l J=b<=j c= n J=c  J c=b>=j c=n  c J=c  J c=-(-)w=J  c J=-+ w=w  J    w<-(-) b=+ D=+ d=(--(-))V=(+-)w=t[C[-]]G=t[C[-]]q=g[V]p=t[C[--(-)]]M=t[C[--(-)]]N=(-+)k=(d,D)V=p[k]d=(-)u=q[V]V=t[C[--(-)]]k=g[d]D=t[C[-]]J=+ Z=t[C[-+]]T=(N,J)d=D[T]T=(--(-))M=k[d]N=-+ J=(-)d=t[C[+-]]D=t[C[+-]]Z=(T,N)D=(-+)k=d[Z]r=(--(-))p=M[k]d=g[D]Z=t[C[-]]T=t[C[--(-)]]N=(J,b)D=Z[N]N=(+-)J=-+ k=d[D]D=t[C[-]]Z=t[C[+-]]T=(N,J)d=D[T]M=k[d]q=(V,p,M)D=- p=t[C[+-]]M=t[C[--(-)]]d=(-)k=(d,D)V=p[k]r=w[r]u={[V]=S}r=(w,G,q,u)G=(-+)t[C[-]]=r r={}w=t[C[-+]]G=w[G]G=(w)w=g[(-+)]S=  r={}w=g[(--(-))]      w<+   w<-(-)  w<-(-)  w<+   w<+  g0=(--(-))s=(-)o=g[s]s=()Q=t[G]v0=t[q]w0=-(-)a=(g0,w0)o=Q[a]N=s[o]w=N  -(-) -  u=w q=t[C[-+]]w=q  -(-) + r=q   w=r -+  +    w<+  r=(--(-))S=(--(-))w=g[r]r=(S)w=g[(-+)]r={} w=+ r0= C0= V0=     w<-   w<-+   w<-(-) w=G w=r  -  +  w=t[C[+-]]w=w  -  -(-)  t[G]=A o=t[h]s=+- K=o+s m=U[K]i=Z+m m=- w=i%m K=t[c]m=T+K Z=w K=- i=m%K w=- T=i    w<-  w=+ u0=r0 t[g0]=u0  w=- p=t[V]r=p      w<-   w<-+   w<-   w<+  w=e0 w=G0 -+  -  O0=t[G]L0=-+ u0=(-)w=-+ u0=V0[u0]R0=t[q]E0=(-+)I0=(E0,L0)q0=O0[I0]u0=(V0,q0)G0=u0   S=H[-+]w=S t[C[-+]]=w S= r=t[C[-+]]w=g[(--(-))]G=()r={}   w<-  u= w= t[C[-]]=w r=t[C[-]]w=g[(--(-))]G=t[C[+-]]S=(G,u)r={} S=H[-+]G=H[-+]w=t[C[-+]]u=w w=u[G]w=w  -  -(-)    w<-(-)  w<-(-)  w<-  w=+ t[C[--(-)]]=r S=  w=(-+,{q})W={()}r={(W)}w=g[(+-)]  W=Z==T Y=W w=-+    w<-  G=H[-+]S=H[+-]w=G  +  -  E0=+ I0=(-+)q0=t[G]e0=(-+)O0=t[q]e0=V0[e0]R0=(I0,E0)u0=q0[R0]e0=(V0,u0)w=e0  -  -        w<-   w<-   w<+   w<+   w<-+   w<-  G=t[C[--(-)]]M=(-+)q=t[C[-+]]k=-+ V=t[C[-+]]p=(M,k)u=q[p]S=G[u]u=t[C[-+]]p=(-+)M=- q=t[C[+-]]V=(p,M)G=u[V]r=S[G]S=- w=r>S w=w -+  -  w= w=w  +-  +-   z=(+-)l=(-+)w=g[z]j=g[l]z=(j)w=(+-)g[w]=z w=-+    w<-(-) r=(--(-))w=g[r]S=(-+)r=g[S]S=(--(-))g[S]=w S=(-)g[S]=r w=- S=t[C[--(-)]]G=() G=t[C[-]]u=t[C[-+]]p=-+ S=H[--(-)]V=(-)q=(V,p)w=(--(-))w=S[w]r=G[q]w=(S,r)w=w -+ -+     w<-+   w<-+   w<+  q=(-+)u=g[q]q=()u=t[C[+-]]r=q-u u=t[C[--(-)]]w=r<u w=w  -  +  b=t[G]j=t[q]h=-(-)c=(+-)l=(c,h)J=b[l]w=+ N=D[J]J=(--(-))J=N[J]J=(N)Z=J   G=u w=t[C[-+]]k=--(-)d=- M=(k,d)S[G]=M w=-(-)G=    w<-  w=+  r=(+-)w=g[r]k=(-+)q=(+-)S=t[C[--(-)]]u=g[q]d=(-(-),{})M=g[k]k={(d)}p={(k)}M=- V=p[M]q=(V)u=(+-)G=(q,u)S={()}r=((S))G=t[C[--(-)]]S=r r=G w=G  - -+      w<-+   w<-   w<-   w<-(-) G=t[C[-+]]u=- S=G*u G=-+ r=S+G G=+- S=+ w=r%S t[C[-]]=w S=t[C[+-]]w=-(-)r=S~=G  r=t[C[-+]]w= r t[C[+-]]=w r=t[C[-]]p=-+ S=()r=t[C[-+]]G=t[C[+-]]u=t[C[--(-)]]V=(--(-))q=(V,p)S=G[q]u=w p=t[C[-+]]V=w q=p w=p  -  -   r=A w=i w=-+    w<+  w=-  r={}w=g[(-)]    w<-+   w<-   w<-+  u=+- G=(--(-))r=-+ S=G^u w=r-S r=(-)S=w w=r/S r={w}w=g[(+-)] r=(+-)w=t[C[-+]]r=w[r]r=(w)w=-   D=(+-)d=g[D]r=d w=+    w<-+  M=+- w={}t[C[-]]=w V=-+ r=t[C[+-]]q=r r=G%V t[C[+-]]=r p=G%M M=--(-)V=p+M D=-+ t[C[+-]]=V k=(-+)M=g[k]k=(-)p=M[k]Z=D M=(S)p=(-+)u[G]=p p=+- k=- w=- D=-+ T=Z<D d=M D=k-Z  Y=Y+z r=Y<=W l= j r=l  r l=Y>=W l=j  l r=l  r l=-(-)w=r  l r=+ w=w  r       w<+   w<+   w<-   w<-   w<-+  r={}w=g[(-+)] w=V G=q w=q  -(-)-+   w=-    w<-  w=- q=t[C[-+]]r=q  W=t[G]w=W  - -+ Y=W     w<-   w<-(-)  w<-(-) w=t[C[-+]]S=H[-]w=w -+  +  w=t[C[--(-)]]w=w  -  -(-)  G=(-+)r=g[G]G=()w=+ t[C[-]]=G    w<+  w=-(-) d=()D=- t[d]=r Z=-+ w=t[M]r=(D,Z)w=--(-)z=(-)D=()J=(-+,{})Z=w t[D]=r w=+- N=(--(-))r=g[N]N={(J)}T=w r=- w={(N)}N=w w=N[r]r=(--(-))J=w w=g[r]b=t[u]W=g[z]z=(J)W=(-+)Y=(z,W)b={()}r=((b))b=()t[b]=r r=--(-)Y=t[D]W=Y Y=--(-)z=Y Y=-+ j=z<Y Y=r-z w=+      w<-+   w<-(-)  w<-+   w<-(-) w=g[(-)]r={}S=  B0=r0 w=-+ t[Q]=B0   w= w=w  -(-) +    w<-(-) w=-  r=(-+)w=g[r]r=()q=(-+)t[C[+-]]=r u=g[q]d=-+ q=()V=t[C[-+]]k=(-+)p=t[C[-]]M=(k,d)d=-(-)u=V[M]k=(-)w=q[u]u=()q=(-+)u=g[q]V=t[C[-]]p=t[C[+-]]M=(k,d)q=V[M]w=u[q]q= u=(q)q=(--(-))k=(-)u=g[q]q=()V=t[C[+-]]p=t[C[-]]d=+ M=(k,d)u=V[M]r={}w=q[u]q=-+ p= V=G~=p u=(S,q,V)w=S t[C[--(-)]]=w S= w=g[(+-)]G=     w<+   w<+  w=-  V=t[C[--(-)]]w=+ u=V    w<-(-) E0=(-)O0=t[G]R0=t[q]u0=(+-)u0=V0[u0]L0=-+ I0=(E0,L0)q0=O0[I0]u0=(V0,q0)w=u0  +  -  u=(--(-))G=g[u]w=g[(-)]u=(-)S=G[u]u=t[C[-+]]G={(u)}r={(G)}        w=#x  (r),(g,v) F=(v) H=(H) (g,{H},v,F)  H ,(g,v) F=(v) H=(H,C,x) (g,{H;C;x},v,F)  H  ((+,{}))((r)))(getfenv  () _ENV,  [(--(-))],newproxy,,,,{...}))(...)