Unlimited Money

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