norm2 :: Point -> Double
norm2 p = sqrt (fromIntegral (dx^2 + dy^2))
  where (dx, dy) = p

-- Other norms. Eg. l1 is the "Manhattan" or "taxicab" norm.
-- Defined only for n >= 1.
norm2 :: Point -> Double
norm2 p = sqrt (fromIntegral (dx^2 + dy^2))
  where (dx, dy) = p

-- Other norms. Eg. l1 is the "Manhattan" or "taxicab" norm.
-- Defined only for n >= 1.
norm2 p = sqrt (fromIntegral (dx^2 + dy^2))
  where (dx, dy) = p

-- Other norms. Eg. l1 is the "Manhattan" or "taxicab" norm.
-- Defined only for n >= 1.