- Rotate point 180° clockwise about the origin
rotatePoint180c :: (Num a) => Point a -> Point a
rotatePoint180c (P x y) =
    P (-x) (-y)


rotatePoint180c :: (Num a) => Point a -> Point a
rotatePoint180c (P x y) =
    P (-x) (-y)
rotatePoint180c (P x y) =
    P (-x) (-y)