colour-space 0.1.5.0 → 0.1.5.1
raw patch · 2 files changed
+3/−1 lines, 2 filesdep ~linearmap-category
Dependency ranges changed: linearmap-category
Files
- colour-space.cabal +1/−1
- src/Data/Colour/Manifold.hs +2/−0
colour-space.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: colour-space-version: 0.1.5.0+version: 0.1.5.1 synopsis: Instances of the manifold-classes for colour types -- description: homepage: https://github.com/leftaroundabout/colour-space
src/Data/Colour/Manifold.hs view
@@ -92,6 +92,8 @@ fromFlatTensor = LinearFunction $ \(Tensor (RGB r g b)) -> ColourNeedle (RGB r g b) addTensors (Tensor (RGB r g b)) (Tensor (RGB r' g' b')) = Tensor $ RGB (r^+^r') (g^+^g') (b^+^b')+ subtractTensors (Tensor (RGB r g b)) (Tensor (RGB r' g' b'))+ = Tensor $ RGB (r^-^r') (g^-^g') (b^-^b') negateTensor = LinearFunction $ \(Tensor (RGB r g b)) -> Tensor (RGB (negateV r) (negateV g) (negateV b)) scaleTensor = bilinearFunction $ \μ (Tensor (RGB r g b))