positionDiff :: Position -> Position -> Int
positionDiff (Position a) (Position b) =
  a - b
positionDiff :: Position -> Position -> Int
positionDiff (Position a) (Position b) =
  a - b
positionDiff (Position a) (Position b) =
  a - b