Skip to content

Commit

Permalink
Remove restriction on SRB being NonLinear for Pixel
Browse files Browse the repository at this point in the history
  • Loading branch information
lehins committed Aug 23, 2022
1 parent 8d4f197 commit 73d32b3
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions Color/src/Graphics/Pixel/ColorSpace.hs
Original file line number Diff line number Diff line change
Expand Up @@ -84,14 +84,14 @@ convertPixel = liftPixel convert
-- | Constructor for a pixel in @sRGB@ color space
--
-- @since 0.1.0
pattern PixelSRGB :: e -> e -> e -> Pixel (SRGB 'NonLinear) e
pattern PixelSRGB :: e -> e -> e -> Pixel (SRGB l) e
pattern PixelSRGB r g b = Pixel (SRGB (CM.ColorRGB r g b))
{-# COMPLETE PixelSRGB #-}

-- | Constructor for a pixel in @sRGB@ color space with Alpha channel
--
-- @since 0.1.0
pattern PixelSRGBA :: e -> e -> e -> e -> Pixel (Alpha (SRGB 'NonLinear)) e
pattern PixelSRGBA :: e -> e -> e -> e -> Pixel (Alpha (SRGB l)) e
pattern PixelSRGBA r g b a = Pixel (Alpha (SRGB (CM.ColorRGB r g b)) a)
{-# COMPLETE PixelSRGBA #-}

Expand Down

0 comments on commit 73d32b3

Please sign in to comment.