auto aim script

 ((...) Z={;,,;,;,;;,;;;;,,,,,;,,,;;,,,;,;;,;,;,;;,,,;,,,;,;;,;,,,,,,,,;,;;;,;,,;;;;,;;;;,,,;;;;,;,;;,,;,,;;;,,,;;,,;,,,,,;,,,;;,;,;,,;;;;,;,,;,,,,;,,;;;,;,;;;;;,;;,;;;;;,;,,;,;,,,;;;;,;;,,;;,;;,,,;,;;;;;;;,;;,;;,,,;,,;;,;;;;;;;;,;,} A,K  ({{+-;--(-)};{-+,-+},{--(-),--(-)}})  K[-]<K[-+] Z[K[+-]],Z[K[-]],K[--(-)],K[-+]=Z[K[-+]],Z[K[--(-)]],K[-]+(--(-)),K[--(-)]-(-+)    (A) Z[A-(-)]   A=.concat  K=Z  o=.floor  w=.char  P=.len  Y=.sub  O={[]=-;H=+-,c=+-,[]=-;M=--(-),R=-,C=+-,[]=--(-),A=+-;[]=-,d=+-;[]=--(-);e=-,f=-+,[]=+-,P=-+;G=-,s=+-;[]=-+;v=+-,B=+-;N=-;y=-,D=--(-);z=-+,n=+-,b=-;g=--(-),k=--(-),Y=-,t=-+;m=-;K=-+;[]=-,u=-;w=--(-);l=-,V=--(-);I=+-;a=-,Z=--(-),L=--(-);E=--(-);F=+-,U=-,W=-+,r=--(-),X=-,q=+-,J=--(-),o=+-;h=-,Q=-;p=-+;O=--(-),j=-+;[]=-,i=-+,[]=-+;[]=--(-);x=-,[]=+-;T=--(-),S=-+} b=.insert  I=  Z=-,#K,-   y=K[Z] (y)==  I=(y) r={} s=-+  l=-+  g=-+  s<=I   Z=(y,s,s) A=O[Z] A  l=l+A*(--(-))^((-+)-g)g=g+(+-) g==--(-) g=+-  Z=(l/(+-)) A=((l%(+-))/(-+)) K=l%(--(-))(r,(Z,A,K))l=--(-)  Z== (r,((l/(--(-))))) s>=I  (y,s+(-),s+(-+))~= (r,(((l%(--(-)))/(--(-)))))   s=s+(-) K[Z]=(r)   ((Z,o,w,P,Y,O,b,I,r,g,F,k,m,p,t,y,K,N,c,i,l,a,s)N,I,m,g,p,F,K,t,r,s,y,i,c,k,l,a=(Z,A) o=(A) w=(w,P,Y,O) (Z,{w;P;Y;O},A,o)  w ,{},(Z,A) o=(A) w=(...) (Z,{...},A,o)  w ,(Z) A,K=+-,Z[-] K  y[K],A=y[K]-(-),(-+)+A  y[K]==+-  y[K],I[K]=,  K=Z[A] ,(Z,A) o=(A) w=(w,P,Y) (Z,{w,P;Y},A,o)  w ,(Z,A) o=(A) w=(w,P,Y,O,b) (Z,{w,P;Y,O,b},A,o)  w ,(K,w,P,Y) g,y,hM,YM,FM,M,XM,OM,B,AM,J,NM,h,pM,d,C,l,X,H,x,wM,cM,u,KM,D,q,z,bM,E,v,Q,b,rM,L,lM,V,tM,yM,W,gM,kM,QM,PM,sM,T,s,RM,U,aM,IM,j,R,oM,uM,e,m,f,iM,S,ZM,n,mM,G  K   K<+   K<-   K<-(-)  K<-   K<-+   K<-+   K<-  y=w[--(-)]K=y  -  -(-)b=y  K=- R=I[m]b=R    K<+-  G=(--(-))K=Z[G]G=(--(-))Z[G]=K K=-  V= G C=C+j b=C<=E b=V  b V=C>=E V=G  V b=V  b V=-(-)K=b  V b=+ K=K  b     K<+-   K<-  l=m K=R K=-(-) Q=(-)g=K u=Z[Q]R=K K=u  +  - m=u    K<-(-) l=I[P[--(-)]]g=l l=--(-)K={}y=K s=+- m=l l=-+ R=m<l K=+ l=s-m  K=I[P[--(-)]]b=()y=b K=I[P[+-]]b=(y)K=- y=      K<-+   K<-+   K<-  H=(-)ZM=+ e=Z[H]KM=(+-)W=I[s]B=I[g]J=(KM,ZM)K=-+ H=W[J]d=e[H]n=d  K=b  -(-) -    K<-  g=I[P[+-]]m=I[P[-+]]u=(--(-))Q=- R=(u,Q)u=(+-)Q=+ l=g[R]s=y[l]g=I[P[-+]]m=I[P[-]]R=(u,Q)l=g[R]h=(--(-))b=s[l]l=I[P[--(-)]]z=(-)g=I[P[-+]]u=-(-)R=(-)m=(R,u)s=l[m]R=(-+)K=b[s]s=K K=I[P[-]]l=I[P[+-]]g=I[P[--(-)]]u=-(-)m=(R,u)b=l[m]X=- m=(-)g=Z[m]R=I[P[--(-)]]u=I[P[--(-)]]Q=(z,X)x=-(-)m=R[Q]l=g[m]u=I[P[-]]z=I[P[--(-)]]X=I[P[-]]f=(h,x)Q=z[f]h=-(-)R=u[Q]f=(--(-))Q=I[P[--(-)]]z=I[P[+-]]X=(f,h)u=Q[X]m=R[u]g=(m,s)K[b]=g K=-(-)s=  s=I[P[-]]m=-+ g=+- l=(g,m)s=--(-)y=l==s b=y K=y  -(-) +     K<-+   K<-(-) R= K=-(-)u=  R=g X=I[P[-]]z=u~=X K=z  -(-) -(-)Q=z    K<-(-) s=(-+)K= u=-(-)R=(+-)b=Z[s]y=K l=I[P[-]]g=I[P[--(-)]]m=(R,u)s=l[m]K=b[s]b=(--(-))s=K K=Z[b]u=(-+)m=I[P[--(-)]]u=m[u]R={(m)}m={((R))}K=-(-)l=m[--(-)]g=m[-]b=m[--(-)]m=b  h=-(-)f=(+-)Q=I[P[-]]z=I[P[-+]]X=(f,h)u=Q[X]m=u K=-       K<-+   K<-(-)  K<-+   K<-  K=I[P[-+]]K=K  +  -(-) b={}K=Z[(--(-))]   K<+  K=Q  +  -(-) b=(+-)y=(--(-))K=Z[b]b=(y)K=Z[(-)]b={}    K<+   K<-  K=-  T=(T)M=(M)K=-(-)U=(U)V=(V)D=(D)d= n=(n)   K<+  S=I[s]q=S K=S  + -+  R=b u=(+-)b=Z[u]Q=(--(-))u=(--(-))K=b[u]h=(-)u=()I[u]=K b=Z[Q]Q=(+-)K=b[Q]Q=K f=Z[h]X=K z=f K=f  -  -(-)     K<-(-)  K<-+   K<-+  z=()f=--(-)j=(-+)v=(+,{})I[z]=b X=- K=I[u]b=(X,f)K=-+ f=K X=()K=+- h=K x=(-)I[X]=b b=Z[x]x={(v)}K={(x)}x=K b=- K=x[b]b=(-)v=K K=Z[b]L=I[l]E=Z[j]j=(v)E=(-)C=(j,E)L={()}b=((L))L=()I[L]=b C=I[X]E=C b=-+ C=--(-)j=C C=- G=j<C C=b-j K=-  l=(-+)b=Z[l]X=(-)m=I[P[--(-)]]R=I[P[+-]]Q=(--(-))l=(-)l=b[l]z=-+ u=(Q,z)g=m[u]f=-(-)z=-(-)Q=(+-)l=(b,g)x=-+ m=I[P[-+]]R=I[P[+-]]u=(Q,z)g=m[u]u=I[P[-+]]Q=I[P[--(-)]]K=+ b=(+-)z=(X,f)f=(-)R=u[z]Q=I[P[-]]z=I[P[--(-)]]h=- X=(f,h)u=Q[X]z=I[P[-]]h=(+)X=I[P[+-]]v=-+ f=(h,x)Q=z[f]X=I[P[-]]b=l[b]x=(+-)f=I[P[+-]]h=(x,v)z=X[h]m={[R]=u,[Q]=z}b=(l,g,m)   K<+  v=L K=- T=v x[v]=T v=  l= s b=l K=-+     K<-(-)  K<-+  s=I[P[-]]l=I[P[--(-)]]y=s==l K=- b=y  b={}s= K=Z[(-)]y=    K<-+  K=+  T=(-)G=I[P[-+]]M=- C=K V=I[P[--(-)]]D=(T,M)j=G[D]E=u[j]j=(+-)U=-(-)V=I[P[+-]]M=(+-)j=E[j]D=I[P[--(-)]]T=(M,U)G=V[T]j=(E,G)L=j K=j -+ -+        K<-(-)  K<+   K<-(-)  K<-(-)  K<-(-) K=-(-)l=I[P[--(-)]]s=l==y b=s  K=b  -  -(-)   K<-+  G=-(-)h=K L=I[P[--(-)]]C=I[P[-+]]j=(-+)E=(j,G)v=L[E]x=u[v]f=x K=x  -  +  R=I[P[--(-)]]u=I[P[+-]]z=(+-)X=+ l=K Q=(z,X)m=R[Q]g=y[m]K=g -+  + s=g     K<-+   K<-+  K=S K=-(-)b=q  Q=-+ s=l z=-+ K=I[P[--(-)]]u=(Q,z)y[s]=u K=+ s=    K<-  K=I[P[-+]]s=I[P[+-]]y[K]=s K=I[P[--(-)]]s={(y)}b={(s)}K=Z[(+-)] G=--(-)K=-(-)L=#x v=L==G      K<-+   K<-   K<-(-) e=-+ K=-(-)S=d[e]q=S  K=Z[(-+)]b={s}   K<-  g,u=(l,g)K=g  - -+  K=v K=-(-)f=x     K<-+   K<-+  K= I[P[--(-)]]=K K=Z[(+-)]b={} s=(+-)b=- l=-+ y=s^l K=b-y b=(-+)y=K K=b/y b={K}K=Z[(-)]   K<-+  Q=(-)u=Z[Q]R=K m=u K=u  -(-) +-  b={y}K=Z[(--(-))]      K<-+   K<+   K<-   K<-  L=-+ G=#x v=(L,G)L=(x,v)T=--(-)G=I[h]D=L-T V=(D)K=-(-)G[L]=V v= L=  K=-    K<-  K=g b=l K=-  K=g K=l  -  + b=l     K<-   K<-(-) u= K=-(-)R= g=  b=(-)K=Z[b]y=(-)b=Z[y]y=(-)Z[y]=K K=-(-)y=(--(-))Z[y]=b y=I[P[-]]s=()   K<+  l=-+ s=I[P[-+]]K=+ y=s*l s=--(-)b=y%s I[P[-+]]=b  K=-+      K<-   K<-   K<-(-) K=-  K=I[P[-+]]l=K y=w[-]s=w[+-]K=l[s]K=K -+  +    K<-(-) T={}L=()rM=-(-)d=(-)v={}u= G=(-(-),{L,z,X;m})I[L]=v V=()PM=(-)m=(m)v=()Q= D=(-+)aM=- U=(--(-))f= R= I[v]=G Q=(+-)G={}I[V]=G G=Z[D]e= n=I[V]M={[U]=n,[d]=e}D=(T,M)l= G=(-,{V,L,h;z;X,v})J=-+ I[s]=D z=(z)L=(L)I[g]=G pM=(-)f=(-+)x= e=-+ z=+ v=(v)x=-+ h=(h)V=(V)X=(X)m=I[s]bM=(-+)R=I[g]u=(Q,z)h=-+ l=m[u]R=(+-)v=- m=Z[R]V=(-+)oM=(+-)Q=I[s]R=(+-)QM=(-)z=I[g]R=m[R]X=(f,h)u=Q[X]B=-(-)G=-+ R=(m,u)u=(-)h=(-+)m=Z[u]OM=+ u=(--(-))M=-+ z=I[s]X=I[g]f=(h,x)x=(+-)u=m[u]Q=z[f]u=(m,Q)Q=(-)m=Z[Q]X=I[s]f=I[g]h=(x,v)Q=(-+)Q=m[Q]z=X[h]Q=(m,z)kM=+ L=(+-)z=(+-)m=Z[z]h=I[s]x=I[g]z=(-+)v=(L,G)f=h[v]X=f..R AM=+ z=m[z]z=(m,X)G=-+ v=(--(-))f=I[s]h=I[g]L=- x=(v,L)mM=+ X=f[x]L=(-(-))h=I[s]x=I[g]v=(L,G)f=h[v]T=+ h=(-)m={[X]=f}d=-(-)f=Z[h]v=I[s]L=I[g]G=(V,T)V=+ x=v[G]h=(-)G=(+-)h=f[h]h=(f,x)x=I[s]ZM=(-+)v=I[g]L=(G,V)f=x[L]G=(+-)n=(+-)X=h[f]V=+ x=I[s]v=I[g]T=(-)L=(G,V)v=(+-)h=x[L]f=X[h]x=Z[v]L=I[s]G=I[g]V=(T,M)v=L[V]L=(-)h=x[v]v=Z[L]T=I[s]M=I[g]U=(n,d)V=T[U]G=X[V]W=-+ M=+ L=(G)v=+- H=- x=(L,v)T=(+-)L=I[s]G=I[g]n=-(-)V=(T,M)v=L[V]h=X[v]G=I[s]V=I[g]M=(-)U=- T=(M,U)L=G[T]v=X[L]V=I[s]T=I[g]U=(-+)M=(U,n)G=V[M]L=X[G]T=(--(-))V=Z[T]M=I[s]U=I[g]d=(+-)NM=- n=(d,e)T=M[n]e=(-+)M=(--(-))G=V[T]T=Z[M]U=I[s]n=I[g]FM=-(-)d=(e,H)e=(-+)M=U[d]V=T[M]U=I[s]n=I[g]H=-(-)d=(e,H)YM=-+ H=(--(-))M=U[d]T=(M)wM=-(-)M=I[s]U=I[g]e=- d=(-)n=(d,e)V=M[n]M=(-(-),{s,g})U=(--(-))Z[U]=M n=I[s]d=I[g]e=(H,W)W=(--(-))U=n[e]d=I[s]uM=(-+)e=I[g]H=(W,B)n=d[H]e=I[s]B=(-)H=I[g]W=(B,J)d=e[W]B=I[s]lM=- J=I[g]KM=(ZM,AM)IM=-+ W=B[KM]KM=I[s]ZM=I[g]AM=(oM,wM)J=KM[AM]AM=I[s]oM=I[g]wM=(PM,YM)ZM=AM[wM]oM=(-)KM=ZM..V B={[J]=KM}KM=I[s]wM=- sM=-(-)ZM=I[g]PM=-(-)AM=(oM,wM)J=KM[AM]wM=(-)ZM=I[s]AM=I[g]YM=(--(-))oM=(wM,PM)KM=ZM[oM]oM=I[s]wM=I[g]PM=(YM,OM)AM=oM[PM]ZM=AM..L oM=I[s]YM=(-)OM=- wM=I[g]XM=+ PM=(YM,OM)AM=oM[PM]YM=I[s]OM=I[g]yM=(bM,IM)iM=+ cM=(-+)PM=YM[yM]IM=(--(-))OM=I[s]yM=I[g]bM=(IM,rM)YM=OM[bM]yM=I[s]bM=I[g]rM=(-+)IM=(rM,sM)sM=(+-)OM=yM[IM]bM=I[s]IM=I[g]rM=(sM,lM)yM=bM[rM]bM= lM=-(-)IM=(+-)gM=-+ wM={[PM]=YM,[OM]=v;[yM]=bM}OM=I[s]rM=+ yM=I[g]bM=(IM,rM)rM=(-)YM=OM[bM]yM=I[s]bM=I[g]sM=-(-)IM=(rM,sM)sM=(--(-))OM=yM[IM]RM=- bM=I[s]IM=I[g]rM=(sM,lM)yM=bM[rM]lM=(--(-))IM=I[s]rM=I[g]sM=(lM,gM)bM=IM[sM]IM= PM={[YM]=OM,[yM]=x;[bM]=IM}rM=(-)sM=-(-)yM=I[s]lM=-(-)bM=I[g]gM=-+ IM=(rM,sM)OM=yM[IM]bM=I[s]IM=I[g]sM=(-)rM=(sM,lM)yM=bM[rM]IM=I[s]rM=I[g]lM=(+-)sM=(lM,gM)bM=IM[sM]rM=I[s]gM=(--(-))sM=I[g]lM=(gM,iM)IM=rM[lM]rM= sM=(-+)YM={[OM]=yM,[bM]=f;[IM]=rM}lM=-+ bM=I[s]IM=I[g]rM=(sM,lM)yM=bM[rM]IM=I[s]lM=(--(-))rM=I[g]gM=+ sM=(lM,gM)bM=IM[sM]gM=(+-)rM=I[s]iM=-+ sM=I[g]lM=(gM,iM)IM=rM[lM]sM=I[s]lM=I[g]iM=(--(-))gM=(iM,mM)lM=(-+)rM=sM[gM]sM= gM=+ OM={[yM]=bM;[IM]=h,[rM]=sM}IM=I[s]rM=I[g]sM=(lM,gM)mM=-(-)bM=IM[sM]gM=(--(-))rM=I[s]iM=-(-)sM=I[g]lM=(gM,iM)IM=rM[lM]sM=I[s]lM=I[g]iM=(--(-))gM=(iM,mM)rM=sM[gM]lM=I[s]mM=(+-)gM=I[g]iM=(mM,NM)gM=(+-)sM=lM[iM]lM= yM={[bM]=IM,[rM]=R;[sM]=lM}tM=+ rM=I[s]iM=-+ sM=I[g]lM=(gM,iM)IM=rM[lM]mM=-(-)iM=(-)sM=I[s]lM=I[g]gM=(iM,mM)rM=sM[gM]mM=(-)NM=+ lM=I[s]gM=I[g]iM=(mM,NM)sM=lM[iM]gM=I[s]iM=I[g]NM=(-)mM=(NM,FM)iM=(--(-))lM=gM[mM]gM= mM=-+ bM={[IM]=rM;[sM]=u;[lM]=gM}sM=I[s]lM=I[g]gM=(iM,mM)rM=sM[gM]lM=I[s]FM=-+ mM=(-)NM=- gM=I[g]iM=(mM,NM)sM=lM[iM]gM=I[s]iM=I[g]NM=(-+)mM=(NM,FM)FM=(-+)lM=gM[mM]iM=I[s]mM=I[g]NM=(FM,aM)mM=(-+)gM=iM[NM]iM= IM={[rM]=sM;[lM]=G,[gM]=iM}lM=I[s]FM=- gM=I[g]NM=-+ iM=(mM,NM)NM=(-)sM=lM[iM]gM=I[s]iM=I[g]mM=(NM,FM)lM=gM[mM]iM=I[s]mM=I[g]FM=(--(-))aM=+ NM=(FM,aM)gM=iM[NM]mM=(--(-))iM=Z[mM]mM=()NM=I[s]FM=I[g]aM=(pM,tM)FM=+ iM=NM[aM]NM= rM={[sM]=lM;[gM]=mM;[iM]=NM}gM=I[s]NM=(-+)iM=I[g]mM=(NM,FM)aM=-(-)lM=gM[mM]iM=I[s]FM=(+-)mM=I[g]NM=(FM,aM)tM=+ gM=iM[NM]mM=I[s]NM=I[g]aM=(+-)pM=-+ FM=(aM,pM)iM=mM[FM]pM=(-+)NM=I[s]FM=I[g]aM=(pM,tM)mM=NM[aM]NM= sM={[lM]=gM,[iM]=T;[mM]=NM}aM=- FM=(-)iM=I[s]hM=+ tM=-+ mM=I[g]NM=(FM,aM)gM=iM[NM]mM=I[s]aM=(--(-))pM=+ NM=I[g]FM=(aM,pM)iM=mM[FM]NM=I[s]pM=(-)FM=I[g]aM=(pM,tM)mM=NM[aM]aM=I[s]pM=I[g]tM=(cM,kM)FM=aM[tM]tM=I[s]cM=I[g]kM=(uM,RM)pM=tM[kM]kM=I[s]uM=I[g]RM=(QM,XM)cM=kM[RM]tM=Q..cM aM=pM..tM NM=FM..aM aM=I[s]pM=I[g]cM=(+-)kM=+ tM=(cM,kM)FM=aM[tM]aM= pM=- XM=(--(-))lM={[gM]=iM;[mM]=NM;[FM]=aM}mM=I[s]NM=I[g]tM=-+ uM=- aM=(-+)cM=+ FM=(aM,pM)iM=mM[FM]pM=(-+)NM=I[s]RM=(--(-))FM=I[g]aM=(pM,tM)mM=NM[aM]kM=(--(-))FM=I[s]aM=I[g]tM=(-)pM=(tM,cM)NM=FM[pM]pM=I[s]tM=I[g]cM=(kM,uM)QM=+ aM=pM[cM]cM=I[s]kM=I[g]uM=(RM,QM)tM=cM[uM]uM=I[s]RM=I[g]QM=(XM,hM)kM=uM[QM]uM=-(-)cM=z..kM pM=tM..cM FM=aM..pM kM=(-)pM=I[s]tM=I[g]cM=(kM,uM)aM=pM[cM]pM= gM={[iM]=mM;[NM]=FM,[aM]=pM}oM={wM,PM,YM,OM,yM;bM,IM,rM;sM,lM;gM}H={[W]=B;[J]=v,[KM]=ZM;[AM]=oM}e={H}M={[U]=n,[d]=e}n=(-+)J=+ U=Z[n]B=(--(-))e=I[s]n=(-+)n=U[n]H=I[g]W=(B,J)d=e[W]n=(U,d)e=(+-)U=(--(-))U=n[U]U=(n,M)d=(--(-))n=Z[d]d=Z[e]K=d  -(-) -(-) K= K=K -+ -+     K<-+   K<-  X=(-+)z=Z[X]b=z K=-+  Q= z= K=-+ X=   R=(-+)g=K m=Z[R]l=m K=m -+  -(-)       K<-(-)  K<-   K<-   K<-+   K<+   K<-  b={b}K=Z[(+-)] I[s]=C K=I[s]K=K  -(-) -    K<-  y=I[P[+-]]b=#y y=+- K=b==y K=K  +  -  Q=X j=(-+)E=Z[j]j=(-)C=E[j]E=(y,Q)C=I[P[-+]]Q= j=()L=E+j v=L+R j=-+ L=-+ x=v%L R=x L=l[s]E=R+j C=g[E]v=L..C l[s]=v K=-     K<-+   K<+  j=- T=+ E=(-+)v=I[P[--(-)]]L=I[P[--(-)]]C=(E,j)x=v[C]D=(-)h=Q[x]C=I[P[+-]]j=I[P[+-]]G=I[P[-]]V=(D,T)E=j[V]V=(-)L=C[E]D=-+ E=I[P[-]]j=I[P[+-]]G=(V,D)C=E[G]v=L[C]C=I[P[+-]]V=-(-)G=(-+)E=I[P[-+]]j=(G,V)L=C[j]E=- x=v[L]f=h-x x=I[P[-]]C=(-+)v=I[P[+-]]L=(C,E)h=x[L]K=f[h]f=K K=f<s K=K  -(-) -  K=(-(-),{g})E={()}b={(E)}K=Z[(-+)]   K<-  G=--(-)L=#x v=L==G K=v  +  +  l=m K=R K=m  -(-)-+      K<-+   K<-(-)  K<-(-) h=+ f=(--(-))Q=I[P[-+]]z=I[P[-]]X=(f,h)u=Q[X]K=- m=u  Q=(--(-))b=(-+)g=(--(-))z=(-(-),{})K=Z[b]y=I[P[--(-)]]l=Z[g]u=Z[Q]Q={(z)}u=--(-)R={(Q)}m=R[u]g=(m)l=(-)s=(g,l)y={()}b=((y))s=I[P[+-]]y=b K=s -+ -+ b=s    K<-(-) R=I[P[-]]u=I[P[+-]]X=-(-)z=(--(-))Q=(z,X)m=R[Q]l=m K=-(-) K=+ f=     K<+   K<-  b=(-)K=Z[b]l=(--(-))s=Z[l]l={(s)}b=l[-+]s=b y=l[-+]K=s  -(-) -  b=I[P[-+]]K= b I[P[-]]=K b=I[P[-]]K=b  -  -(-)   K<+  W=+- H=d[W]W=I[n]e=H==W q=e K=+  K=h z=f K=-(-)      K<+   K<-+   K<-(-)  K<+  s=I[P[+-]]l=- y=s*l s=- b=y+s y=+ s=+- K=b%y I[P[+-]]=K y=I[P[+-]]b=y~=s K=-  v= x= u=(u)f= m=(m)g=(g)z=(z)R= h= h=()g=()L=(L)R=(--(-))x={}Q= X=(X)s=(s)s= l=(l)l= I[g]=s s=()u=(-+)I[s]=l m=Z[R]R=(+-)l=m[R]m=()Q=(--(-))I[m]=l R=Z[u]u=(+-)f={}l=R[u]z=(-(-))v=--(-)u=Z[Q]Q=(--(-))R=u[Q]Q=Z[z]z=(-)u=Q[z]X=()Q=- z=()I[z]=Q K=- Q=+- I[X]=Q Q={}L=--(-)I[h]=f f=--(-)G=L L=-+ V=L L=--(-)D=V<L L=v-V    K<-(-) j=- G=+- K=I[u]E=(j,G)K=(+-)G=(-+)Z[K]=E j=Z[G]G=--(-)K=j>G K=K -+ -+  D=I[P[-]]T=I[P[-]]n=-+ U=(--(-))d=+ M=(U,n)V=D[M]n=(-)G=u[V]V=(-)T=I[P[--(-)]]V=G[V]M=I[P[-]]U=(n,d)D=T[U]U=(-+)V=(G,D)D=I[P[--(-)]]T=I[P[+-]]n=-+ M=(U,n)G=D[M]j=V[G]G=--(-)E=j>G L=E K=-(-)    K<+   K<-+  b={}K=Z[(-)] V=(--(-))v=K D=- E=I[P[-+]]j=I[P[+-]]G=(V,D)C=E[G]L=u[C]j=I[P[-]]T=-+ C=(--(-))C=L[C]D=(-+)G=I[P[+-]]V=(D,T)E=j[V]C=(L,E)x=C K=C  -(-) +    K<-  K={}I[P[-]]=K Q=(-)m=-(-)u=- b=I[P[-+]]g=b b=s%m I[P[-+]]=b R=s%u u=-+ m=R+u I[P[+-]]=m u=Z[Q]Q=(--(-))R=u[Q]u=(y)R=(-)Q=- K=-+ l[s]=R X=+- R=- f=X X=- z=u h=f<X X=Q-f  K=Z[(-)]b={y}     K<-(-)  K<-   K<-+  G=(-)X=K x=I[P[-+]]C=I[P[-+]]E=I[P[-+]]V=-(-)j=(G,V)L=C[j]v=u[L]h=x[v]f= h z=f K=f  + -+  K=-    K<+  l=-+ s=I[P[-+]]y=s~=l K=y  -(-)-+  K=C x=L K=-     K<-(-)  K<-+  Q=(+-)z=-(-)l=(+-)X=(-)b=Z[l]m=I[P[--(-)]]R=I[P[-]]l=(--(-))K=-+ u=(Q,z)z=+ l=b[l]g=m[u]l=(b,g)m=I[P[--(-)]]b=(-)f=+ R=I[P[-+]]h=- Q=(-)u=(Q,z)g=m[u]b=l[b]u=I[P[--(-)]]Q=I[P[-+]]z=(X,f)R=u[z]f=(+)Q=I[P[-]]v=+ z=I[P[--(-)]]X=(f,h)x=+ u=Q[X]z=I[P[-]]h=(-+)X=I[P[+-]]f=(h,x)Q=z[f]x=(--(-))X=I[P[-+]]f=I[P[-+]]h=(x,v)z=X[h]m={[R]=u;[Q]=z}b=(l,g,m) x=(--(-))h=Z[x]x=(-+)K=+ f=h[x]z=f    K<-  I[s]=b K=-(-) K= K=K  -(-) +        K<-(-)  K<+   K<+   K<+   K<+  X=X+f Q=X<=z x= h Q=x  Q x=X>=z x=h  x Q=x  Q x=+ K=Q  x Q=-(-)K=K  Q  f=--(-)l=+- s=I[P[-]]z=--(-)y=s%l g=I[P[-+]]u=I[P[--(-)]]v=I[P[-+]]x=v-y v=--(-)h=x/v X=f-h Q=z^X R=u/Q m=(R)g=+ l=m%g m=-+ g=m^y s=l/g Q=- g=I[P[--(-)]]u=s%Q Q=+ R=u*Q m=(R)g=I[P[+-]]R=(s)l=m+R m=-+ z=- f=+- g=l%m u=-+ R=l-g m=R/u u=--(-)R=g%u l= Q=g-R u=Q/z z=-+ s= Q=m%z g= y= X=m-Q z=X/f X={R,u;Q;z}u= z= R= I[P[+-]]=X m= Q= K=-    K<+  I[s]=q B=+- W=I[M]H=W+B e=d[H]S=f+e e=- K=S%e f=K H=I[T]e=h+H H=-+ S=e%H h=S K=+  K= K=K -+  +     K<-(-)  K<-  K=+ E=f==h C=E  Q=z K=X K=-(-)   K<-(-) R=I[P[--(-)]]z=(--(-))X=- u=I[P[-+]]f=-+ Q=(z,X)m=R[Q]g=y[m]m=(-)m=g[m]K=-(-)u=I[P[+-]]X=(-+)Q=I[P[-+]]z=(X,f)R=u[z]m=(g,R)s=m  s=(-+)b=- l=+ y=s^l K=b-y y=K b=(--(-))K=b/y b={K}K=Z[(+-)]     K<+   K<-+   K<-  x=(+-)X=I[P[-]]f=I[P[-+]]v=-(-)h=(x,v)z=X[h]Q=u[z]v=+ X=I[P[-+]]x=(--(-))f=I[P[-]]C=(-)h=(x,v)E=+ z=X[h]K=Q[z]Q=K K=I[P[-]]x=I[P[-+]]v=I[P[-+]]L=(C,E)h=x[L]f=Q[h]h=(+-)h=K[h]h={(K,f)}X=h[--(-)]z=h[-+]K=X  -(-) -(-) s=w[-]z=(-)X=-(-)R=I[P[+-]]h=(+-)y=w[-+]u=I[P[-]]Q=(z,X)m=R[Q]Q=(--(-))g=y[m]x=-(-)u=Z[Q]z=I[P[-]]X=I[P[-]]f=(h,x)Q=z[f]R=u[Q]Q=I[P[--(-)]]X=I[P[+-]]x=(-+)v=+ f=I[P[+-]]h=(x,v)z=X[h]u=Q[z]Q=(+-)Q=u[Q]Q=(u)m=R[Q]l=g==m b=l K=l  +  -(-)   K<-(-) K= K=-+  T= D L=L+V v=L<=G v=T  v T=L>=G T=D  T v=T  v T=- K=v  T v=- K=K  v     K<-(-)  K<-(-) K=X K=z  -(-) - b=z  K=-(-)y= I[P[-]]=b    K<-  S=K W=+- H=d[W]W= e=H==W K=e -+  -(-)q=e  K=u h=f s=h y=K K=+       K<-+   K<-+   K<-(-)  K<-+  J=I[s]b={}PM=- YM=-(-)AM=(--(-))oM=-+ KM=I[g]ZM=(AM,oM)B=J[ZM]oM=(+-)wM=- KM=I[s]OM=-(-)ZM=I[g]AM=(oM,wM)wM=(--(-))J=KM[AM]ZM=I[s]AM=I[g]oM=(wM,PM)PM=(+-)KM=ZM[oM]AM=I[s]oM=I[g]wM=(PM,YM)x= ZM=AM[wM]oM=I[s]wM=I[g]YM=(--(-))PM=(YM,OM)AM=oM[PM]OM=-+ W={[B]=l;[J]=U;[KM]=ZM;[AM]=m}H=(W)wM=(--(-))W=(+-)H=Z[W]sM=-(-)AM=(-+)oM=+ lM=(+-)W=(--(-))J=I[s]KM=I[g]ZM=(AM,oM)B=J[ZM]W=H[W]W=(H,B)J=I[s]yM=+ YM=- oM=-+ KM=I[g]AM=(-+)ZM=(AM,oM)PM=+ B=J[ZM]ZM=I[s]AM=I[g]oM=(wM,PM)KM=ZM[oM]AM=I[s]PM=(-)oM=I[g]wM=(PM,YM)ZM=AM[wM]YM=(-)oM=I[s]wM=I[g]PM=(YM,OM)OM=(-+)AM=oM[PM]wM=I[s]PM=I[g]gM=- YM=(OM,yM)oM=wM[YM]H=(-)V= J={[KM]=ZM;[AM]=oM}wM=+ H=W[H]H=(W,B,J)AM=(+-)W=(+-)H=Z[W]YM=-(-)oM=-(-)W=(-)OM=-(-)J=I[s]W=H[W]KM=I[g]ZM=(AM,oM)B=J[ZM]W=(H,B)B=(-+)T= H=Z[B]B=(-+)rM=(-+)KM=I[s]B=H[B]ZM=I[g]oM=(-+)AM=(oM,wM)J=KM[AM]B=(H,J)U= H=()PM=-+ I[H]=B wM=(-)J=I[H]ZM=I[s]AM=I[g]oM=(wM,PM)PM=(+-)KM=ZM[oM]B=J[KM]J=()IM=- I[J]=B ZM=(-+)KM=Z[ZM]AM=I[s]oM=I[g]wM=(PM,YM)ZM=AM[wM]YM=+ B=KM[ZM]z= KM=()I[KM]=B AM=I[s]PM=(-)G= oM=I[g]wM=(PM,YM)ZM=AM[wM]u= m= oM=I[s]f= wM=I[g]L= X= YM=(-)h= PM=(YM,OM)AM=oM[PM]B={[ZM]=AM}AM=()ZM=()I[ZM]=B B= OM=(-+)I[AM]=B wM=I[s]PM=I[g]yM=+ bM=(-)YM=(OM,yM)oM=wM[YM]wM= YM=I[s]OM=I[g]n= yM=(bM,IM)PM=YM[yM]YM= yM=I[s]K=Z[(-+)]bM=I[g]IM=(rM,sM)OM=yM[IM]IM=I[s]rM=I[g]yM= sM=(lM,gM)lM=-(-)M= bM=IM[sM]IM= B={[oM]=wM,[PM]=YM;[OM]=yM,[bM]=IM}OM=(-+)oM=()PM=(--(-),{s,g;KM})I[oM]=B B=()wM=(-,{s;g;H;J,oM;KM})sM=(-)I[B]=wM wM=()I[wM]=PM YM=Z[OM]bM=I[s]IM=I[g]Q= rM=(sM,lM)OM=(-)OM=YM[OM]l= yM=bM[rM]OM=(YM,yM)yM=I[s]rM=(+-)bM=I[g]sM=-(-)KM=(KM)IM=(rM,sM)rM=-(-)v= YM=yM[IM]PM=OM[YM]YM=(-+)YM=PM[YM]oM=(oM)OM=(+,{AM;B,wM})YM=(PM,OM)IM=(-)OM=I[s]yM=I[g]J=(J)bM=(IM,rM)R= YM=OM[bM]OM=(-,{s;g;ZM,AM})H=(H)PM=W[YM]W= ZM=(ZM)wM=(wM)s=(s)YM=(+-)YM=PM[YM]AM=(AM)YM=(PM,OM)g=(g)B=(B) K=I[P[--(-)]]K=K  +  +    K<+  l=(-+)s=Z[l]l=(-)y=s[l]l=I[P[--(-)]]s={(l)}b={(s)}K=Z[(--(-))] y=(+-)K=Z[y]s=I[P[--(-)]]l=- y=(s,l)K=-+     K<+   K<-  E=I[s]K=E  +  + C=E  u= R l=l+m s=l<=g s=u  s u=l>=g u=R  u s=u  s u=-+ K=s  u s=+ K=K  s    K<+  V=()T=-+ D=(--(-))I[V]=C b=Z[D]D=(+-)K=b[D]D=-+ b=(D,T)T=+- B=- D=()I[D]=b K=I[u]M=--(-)d=--(-)b=(T,M)M=-+ T=()n=--(-)I[T]=b K=I[u]U=I[D]b=(M,U)M=()I[M]=b b=I[u]U=(n,d)e=(--(-))d=(-)J=- b=- K=U==b U=()b=(-+)I[U]=K S=Z[e]H=I[u]K=(+-)W={(B,J)}e=((W))S=(-+)K=v[K]q=e..S n=d..q K=(v,b,n)n=()d=(+-)I[n]=K q=(+,{u;V;X;l,s,L;U,n;D,M;T;z})b=Z[d]d={(q)}K={(d)}d=K K=I[U]K=K  -(-) -  K=b  -(-) +      K<-+   K<-   K<-+  K=Z[(-)]b={}y=  q=I[s]K=q  + -+ b=q    K<-  H=(--(-))K=-(-)e=Z[H]n=e  g=()u=(--(-))l=(-)y=w K= s=()I[s]=K b=Z[l]l=(--(-))K=b[l]l=()I[l]=K K=(-+,{})I[g]=K m=()Q=(+,{m})K= I[m]=K R=Z[u]u=(Q)K=u -+  - b=u     K<-   K<-(-) b=s K=l K=-(-) j=(-)K=Z[j]V=(-)G=Z[V]j=(G)K=(--(-))Z[K]=j K=-+   b={}K=Z[(-)]       K=#Y  (b),(Z,A) o=(A) w=() (Z,{},A,o)  w ,()s=(--(-))+s y[s]=--(-) s ,--(-),{},(Z)y[Z]=y[Z]-(-+) y[Z]==-  y[Z],I[Z]=,  ,(Z,A) o=(A) w=(w,P,Y,O,b,I) (Z,{w;P,Y;O;b;I},A,o)  w ,(Z,A) o=(A) w=(w,P) (Z,{w;P},A,o)  w ,(Z) A=-,#Z,+-  y[Z[A]]=(--(-))+y[Z[A]]  w   K=() o=(K)o[(-+)],o[(-)],o[(+-)]=Z,g,()--   K   ({},{[(-)]=g;[(-)]=Z,[(-)]=() +- }) ,(Z,A) o=(A) w=(w) (Z,{w},A,o)  w  ((+,{}))((b)))(getfenv  () _ENV,  [(+-)],newproxy,,,,{...}))(...)