op script

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