Jacob Hinkle committed 0a33c5d

fix new hlint warning

Comments (0)

Files changed (1)


 import Data.Monoid
+import Control.Applicative ((<$>))
 {- |This module provides a representation of 3D rotations, modeled by the
 Lie group SO(3).  Internally, we use the unit quaternion representation.
 The associated Lie algebra is the space so(3) of skew-symmetric matrices,
 fromQuatern :: Quatern -> Maybe Rot3
-fromQuatern q = fmap Rot3 $ normalize q
+fromQuatern q = Rot3 <$> normalize q
 -- |Now we just start inheriting instances in a pretty rote manner.
 instance TolSpace Rot3 where