RIFGUI V15

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