-- | Play a move as White.
white :: Int -> Int -> Go R.DIM2 StandardPlayer (Either Illegal ())
white x y = playMoveM White (Z :. x :. y)
white :: Int -> Int -> Go R.DIM2 StandardPlayer (Either Illegal ())
white x y = playMoveM White (Z :. x :. y)
white x y = playMoveM White (Z :. x :. y)