VEC: fix "defaulting... constraint to type Integer" warning

This commit is contained in:
hasufell 2014-10-13 19:15:09 +02:00
parent 0dff1174f2
commit 67ef9fa223
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 1 additions and 1 deletions

View File

@ -27,7 +27,7 @@ getAngle a b =
-- |Get the length of a vector.
vecLength :: Vec -> Double
vecLength v = sqrt (x^2 + y^2)
vecLength v = sqrt (x^(2 :: Int) + y^(2 :: Int))
where
(x, y) = unr2 v