Jeremy hub

  :()   

 t=.byte; r=.char; c=.sub; u=.concat; s=.ldexp; S=getfenv  () _ENV ; l=; h=; d=; i=;  (t) e,o,d=,,{} n=; a={} l=,n-  a[l]=(l); l=;  () e=((t,l,l),)l=l+; o=((t,l,l+e-),)l=l+e; o ;e=(())d[]=e; l<#t   l=() a[l] o=a[l] o=e..(e,,);a[n]=e..(o,,)d[#d+],e,n=o,o,n+ ; .(d); a=(); n=bit  bit.bxor  (l,e) o,n=,  l>  e>   c,a=l%,e%  c~=a  n=n+o  l,e,o=(l-c)/,(e-a)/,o*   l<e  l=e   l>   e=l%  e>  n=n+o  l,o=(l-e)/,o*   n    (o,l,e) e   l=(o/^(l-))%^((e-)-(l-)+); l-l%;  l=^(l-);(o%(l+l)>=l)   ;;; e=;  () c,a,o,l=(a,e,e+);c=(c,)a=(a,)o=(o,)l=(l,)e=e+;(l*)+(o*)+(a*)+c;;  () l=((a,e,e),);e=e+; l;;  () e=(); o=(); c=; n=((o,,)*(^))+e; e=(o,,); l=((-)^(o,));(e==) (n==)  l*; e=;c=;;(e==) (n==)(l*(/))(l*(/));; (l,e-)*(c+(n/(^)));; i=o;  (l) o;( l) l=();(l==) ;;;o=(a,e,e+l-);e=e+l; e={} l=,#o  e[l]=((((o,l,l)),))  (e);; e=o;  (...){...},(,...)   () t={,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,}; d={}; e={}; a={t,,d,,e}; a=,()  c=((),); o=((),); n=(c,,); e=(o,,); e={e,(c,,),,,o};(n==) e[]=(c,,);e[]=(c,,);(n==) e[]=(o,,);(n==) e[]=(o,,)-;(n==) e[]=(o,,)-;e[]=(c,,);;t[a]=e;; l=,() d[l-]=();; l=() o={,,,,,,,,,}; n=,l   e=(); l;(e==) l=(()~=);(e==) l=();(e==) l=();;o[n]=l;;a[]=o a[]=(); a;;  (l,e,i) n=l[]; o=l[]; e=l[]; l=l[]; (...) r=n; a=o; L=e; n=l; u=u  o=; c=-; E={}; f={...}; t=(,...)-; l={}; e={}; l=,t  (l>=n) E[l-n]=f[l+]; e[l]=f[l+];;; B=t-n+  l; n;   l=r[o];n=l[]; n<=   n<=   n<=   n<=   n==  e[l[]]=(L[l[]],,i); e[l[]]();c=A;; n<=   n=l[]; o=e[l[]];e[n+]=o;e[n]=o[a[l[]]]; n==   l=l[]; o={}; n=c; l=l+,n  o[#o+]=e[l];;  e[l]((o,,n-l));  n; s,n; f; t; h; D; n;i[a[l[]]]=e[l[]];o=o+;l=r[o];e[l[]]=i[a[l[]]];o=o+;l=r[o];e[l[]]=i[a[l[]]];o=o+;l=r[o];n=l[];D=e[l[]];e[n+]=D;e[n]=D[a[l[]]];o=o+;l=r[o];e[l[]]=a[l[]];o=o+;l=r[o];n=l[];h={};t=;f=n+l[]-; l=n+,f  t=t+;h[t]=e[l];;s,f=(e[n]((h,,f-n)));f=f+n-;t=; l=n,f  t=t+;e[l]=s[t];;c=f;o=o+;l=r[o];n=l[];h={};t=;f=c; l=n+,f  t=t+;h[t]=e[l];;s={e[n]((h,,f-n))};f=n+l[]-;t=; l=n,f  t=t+;e[l]=s[t];;c=f;o=o+;l=r[o];e[l[]]();c=n;o=o+;l=r[o];  ;; n<=   n<=   l=l[]; n=e[l]; o=c-l; o=,o  n[o]=e[l+o]; n==   n=l[]; c=n+l[]-; o={}; l=; n=n,c  l=l+;o[l]=e[n];;  (o,,l);   ;; n<=  e[l[]]=e[l[]][a[l[]]]; n>   l=l[];c=l+B-; o=l,c   l=E[o-l];e[o]=l;;  o=l[]; n=(l[]-)*; a=e[o]; l=c-o; l=,l  a[n+l]=e[o+l];; n<=   n<=   n<=   o=l[]; a={}; n=; l=o+l[]-; l=o+,l  n=n+;a[n]=e[l];;e[o]((a,,l-o));c=o; n==  e[l[]]=(L[l[]],,i);  s; f; n; h; t;e[l[]]=e[l[]][a[l[]]];o=o+;l=r[o];t=l[];h={};n=;f=t+l[]-; l=t+,f  n=n+;h[n]=e[l];;s={e[t]((h,,f-t))};f=t+l[]-;n=; l=t,f  n=n+;e[l]=s[n];;c=f;o=o+;l=r[o];e[l[]]=i[a[l[]]];o=o+;l=r[o];e[l[]]=e[l[]];o=o+;l=r[o];t=l[];h={};n=;f=t+l[]-; l=t+,f  n=n+;h[n]=e[l];;s={e[t]((h,,f-t))};f=t+l[]-;n=; l=t,f  n=n+;e[l]=s[n];;c=f;o=o+;l=r[o];(e[l[]]==a[l[]]) o=o+; o=o+l[];;; n<=   n=l[]; a={}; o=; t=n+l[]-; l=n+,t  o=o+;a[o]=e[l];; a={e[n]((a,,t-n))}; l=n+l[]-;o=; l=n,l  o=o+;e[l]=a[o];;c=l; n>   o=l[]; a={}; n=; l=o+l[]-; l=o+,l  n=n+;a[n]=e[l];;e[o]((a,,l-o));c=o; e[l[]]=e[l[]];; n<=   n<=   l=l[]; n=e[l]; o=c-l; o=,o  n[o]=e[l+o]; n>   n=l[]; a={}; o=; l=n+l[]-; l=n+,l  o=o+;a[o]=e[l];; a,l=(e[n]((a,,l-n)));l=l+n-;o=; l=n,l  o=o+;e[l]=a[o];;c=l; o=o+l[];; n<=  e[l[]]=#e[l[]]; n>   o=l[]; n=e[l[]];e[o+]=n;e[o]=n[a[l[]]]; e[l[]]=#e[l[]];; n<=   n<=   n<=   n<=   n=l[]; t={}; o=; a=c; l=n+,a  o=o+;t[o]=e[l];; a={e[n]((t,,a-n))}; l=n+l[]-;o=; l=n,l  o=o+;e[l]=a[o];;c=l; n==   n=l[]; a={}; o=; t=c; l=n+,t  o=o+;a[o]=e[l];; a={e[n]((a,,t-n))}; l=n+l[]-;o=; l=n,l  o=o+;e[l]=a[o];;c=l; e[l[]]=e[l[]];; n<=  e[l[]]={}; n>  e[l[]]=a[l[]];  o=l[]; c=o+l[]-; n={}; l=; o=o,c  l=l+;n[l]=e[o];;  (n,,l);; n<=   n<=   l=l[]; o={}; n=c; l=l+,n  o[#o+]=e[l];;  e[l]((o,,n-l)); n>  i[a[l[]]]=e[l[]];  n=l[]; c=c; o={}; l=; n=n,c  l=l+;o[l]=e[n];;  (o,,l);; n<=    ; n==  e[l[]]=a[l[]];  n=l[]; c=c; o={}; l=; n=n,c  l=l+;o[l]=e[n];;  (o,,l);; n<=   n<=   n<=  o=o+l[]; n>  e[l[]]();c=A;  n=l[]; a={}; o=; l=n+l[]-; l=n+,l  o=o+;a[o]=e[l];; a,l=(e[n]((a,,l-n)));l=l+n-;o=; l=n,l  o=o+;e[l]=a[o];;c=l;; n<=  i[a[l[]]]=e[l[]]; n>  (e[l[]]==a[l[]]) o=o+; o=o+l[];; e[l[]]=i[a[l[]]];; n<=   n<=  e[l[]]=e[l[]][a[l[]]]; n==  e[l[]]={};  l=l[];c=l+B-; o=l,c   l=E[o-l];e[o]=l;;; n<=  e[l[]]=i[a[l[]]]; n==   n=l[]; t={}; o=; a=n+l[]-; l=n+,a  o=o+;t[o]=e[l];; a={e[n]((t,,a-n))}; l=n+l[]-;o=; l=n,l  o=o+;e[l]=a[o];;c=l; (e[l[]]==a[l[]]) o=o+; o=o+l[];;;o=o+;;;; ((),{},())();