-- | RGB colour data type
{-# LANGUAGE DeriveFunctor #-}
module RGB(module RGB,module Byte) where
import Byte

-- | RGB colour values
data RGB c = RGB !c !c !c deriving (Eq,Ord,Show,Functor)

type RGB8 = RGB Byte
type RGB16 = RGB Short