farm wins

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