-:: Memory :== Void\r
-\r
-mind :: !(!BrainInput, !Memory) -> (!BrainOutput, !Memory)\r
-mind ({football, others, me}, memory) = (Move zero zero)\r
+mind :: !FootballField !(!BrainInput, !Void) -> (!BrainOutput, !Void)\r
+mind field (i=:{me}, mm)\r
+| y >= (t -o) && x > (~r+o) = (fix {px= ~r,py= t} c) (i, mm)\r
+| x <= (~r+o) && y > (~t+o) = (fix {px= ~r,py= ~t} c) (i, mm)\r
+| y <= (~t+o) && x < (r -o) = (fix {px= r, py= ~t} c) (i, mm)\r
+| x >= (r -o) && y < (t -o) = (fix {px= r, py= t} c) (i, mm)\r
+ where\r
+ (x, y, o, c) = (me.pos.px, me.pos.py, m 4.0, m 1.5)\r
+ t = scale 0.5 field.fwidth\r
+ r = scale 0.5 field.flength
\ No newline at end of file