Boren hub op script

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