diff --git a/src/Diagrams/Angle.hs b/src/Diagrams/Angle.hs index fa3fb42f..b345c852 100644 --- a/src/Diagrams/Angle.hs +++ b/src/Diagrams/Angle.hs @@ -1,6 +1,7 @@ -{-# LANGUAGE DeriveFunctor #-} -{-# LANGUAGE RankNTypes #-} -{-# LANGUAGE TypeFamilies #-} +{-# LANGUAGE DeriveFunctor #-} +{-# LANGUAGE RankNTypes #-} +{-# LANGUAGE TypeFamilies #-} +{-# LANGUAGE GeneralizedNewtypeDeriving #-} ----------------------------------------------------------------------------- -- | -- Module : Diagrams.Angle @@ -48,7 +49,7 @@ import Linear.Vector -- | Angles can be expressed in a variety of units. Internally, -- they are represented in radians. newtype Angle n = Radians n - deriving (Read, Show, Eq, Ord, Functor) + deriving (Read, Show, Eq, Ord, Enum, Functor) type instance N (Angle n) = n