Skip to content

Commit a87ea5a

Browse files
committed
Typos.
1 parent 8ef7b05 commit a87ea5a

File tree

2 files changed

+1
-4
lines changed

2 files changed

+1
-4
lines changed

src/Diagrams/LinearMap.hs

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@
99
{-# LANGUAGE UndecidableInstances #-}
1010
-----------------------------------------------------------------------------
1111
-- |
12-
-- Module : Diagrams.ThreeD.Projection
12+
-- Module : Diagrams.LinearMap
1313
-- Copyright : (c) 2014 diagrams team (see LICENSE)
1414
-- License : BSD-style (see LICENSE)
1515
-- Maintainer : [email protected]
@@ -120,7 +120,6 @@ mkAffineMap f = AffineMap (LinearMap f)
120120

121121
toAffineMap :: (HasBasis v, Num n)
122122
=> Transformation v n -> AffineMap v v n
123-
-- toAffineMap t = AffineMap (toLinearMap t id) (transl t)
124123
toAffineMap t = AffineMap (toLinearMap t) (transl t)
125124

126125
class (LinearMappable a b, N a ~ N b) => AffineMappable a b where

src/Diagrams/ThreeD/Projection.hs

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -163,5 +163,3 @@ m44Deformation :: Fractional n => M44 n -> Deformation V3 V2 n
163163
m44Deformation m =
164164
Deformation (P . view _xy . normalizePoint . (m !*) . point . view _Point)
165165

166-
167-

0 commit comments

Comments
 (0)