Op script

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