Ai_debugval way :
?color:Playground.color ->
?dot:Playground.number ->
at:((int * int) -> Playground.number * Playground.number) ->
(int * int) list ->
Playground.shape listval field :
?color:Playground.color ->
?arrow:Playground.number ->
at:((int * int) -> Playground.number * Playground.number) ->
Ai.flow ->
(int * int) list ->
Playground.shape listval thoughts :
?color:Playground.color ->
?best:Playground.color ->
?size:Playground.number ->
?width:Playground.number ->
naming:('move -> string) ->
('move * Playground.number) list ->
Playground.shape listval machine :
?color:Playground.color ->
?radius:Playground.number ->
naming:('mode -> string) ->
('mode, 'context) Ai.change list ->
'mode Ai.mind ->
Playground.shape list