From d7c423fa0c9d4e7775b84afede81cdfd4b42df70 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Mon, 4 Mar 2019 20:07:28 -0500 Subject: [PATCH] src/Point.hs: add a type annotation to avoid a monomorphism warning. --- src/Point.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Point.hs b/src/Point.hs index 8b720cf..54c4f72 100644 --- a/src/Point.hs +++ b/src/Point.hs @@ -32,7 +32,7 @@ instance Num Point where fromInteger n = Point coord coord coord where - coord = fromInteger n + coord = fromInteger n :: Double -- | Scale a point by a constant. -- 2.43.2