-- This header file was generated by ./256colres.pl
module Graphics.Vty.Attributes.Color240
  ( rgbColorToColor240
  , color240CodeToRGB
  )
where

import Data.Word (Word8)
import Text.Printf

-- Note: rgbColor's mapping from RGB to 240 colors was generated from
-- 256colres.pl which is forked from xterm 256colres.pl.

-- | Create a value in the Color240 set from an RGB triple
rgbColorToColor240 :: Integral i => i -> i -> i -> Word8
rgbColorToColor240 :: i -> i -> i -> Word8
rgbColorToColor240 r :: i
r g :: i
g b :: i
b
    | i
r i -> i -> Bool
forall a. Ord a => a -> a -> Bool
< 0 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Ord a => a -> a -> Bool
< 0 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Ord a => a -> a -> Bool
< 0 = [Char] -> Word8
forall a. HasCallStack => [Char] -> a
error "rgbColor with negative color component intensity"
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 8 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 8 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 8 = 216
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 18 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 18 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 18 = 217
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 28 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 28 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 28 = 218
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 38 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 38 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 38 = 219
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 48 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 48 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 48 = 220
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 58 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 58 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 58 = 221
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 68 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 68 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 68 = 222
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 78 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 78 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 78 = 223
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 88 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 88 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 88 = 224
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 98 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 98 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 98 = 225
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 108 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 108 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 108 = 226
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 118 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 118 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 118 = 227
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 128 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 128 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 128 = 228
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 138 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 138 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 138 = 229
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 148 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 148 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 148 = 230
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 158 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 158 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 158 = 231
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 168 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 168 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 168 = 232
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 178 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 178 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 178 = 233
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 188 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 188 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 188 = 234
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 198 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 198 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 198 = 235
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 208 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 208 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 208 = 236
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 218 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 218 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 218 = 237
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 228 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 228 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 228 = 238
    | i
r i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 238 Bool -> Bool -> Bool
&& i
g i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 238 Bool -> Bool -> Bool
&& i
b i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== 238 = 239
    | Bool
otherwise = 36 Word8 -> Word8 -> Word8
forall a. Num a => a -> a -> a
* i -> Word8
go i
r Word8 -> Word8 -> Word8
forall a. Num a => a -> a -> a
+ 6 Word8 -> Word8 -> Word8
forall a. Num a => a -> a -> a
* i -> Word8
go i
g Word8 -> Word8 -> Word8
forall a. Num a => a -> a -> a
+ i -> Word8
go i
b
    where go :: i -> Word8
go = Word8 -> i -> Word8
forall i. Integral i => Word8 -> i -> Word8
simpleColor_ ([Char] -> Word8
forall a. HasCallStack => [Char] -> a
error ([Char] -> Int -> Int -> Int -> [Char]
forall r. PrintfType r => [Char] -> r
printf "RGB color %d %d %d does not map to 240 palette."
                                (i -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral i
r :: Int)
                                (i -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral i
g :: Int)
                                (i -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral i
b :: Int)))

simpleColor_ :: Integral i => Word8 -> i -> Word8
simpleColor_ :: Word8 -> i -> Word8
simpleColor_ e :: Word8
e c :: i
c
    | i
c i -> i -> Bool
forall a. Ord a => a -> a -> Bool
<= 0 = 0
    | i
c i -> i -> Bool
forall a. Ord a => a -> a -> Bool
<= 95 = 1
    | i
c i -> i -> Bool
forall a. Ord a => a -> a -> Bool
<= 255 = i -> Word8
forall a b. (Integral a, Num b) => a -> b
fromIntegral ((i
ci -> i -> i
forall a. Num a => a -> a -> a
-16) i -> i -> i
forall a. Integral a => a -> a -> a
`div` 40)
    | Bool
otherwise = Word8
e

-- | Create a RGB triple from a value in the Color240 set.
color240CodeToRGB :: Word8 -> Maybe (Int, Int, Int)
color240CodeToRGB :: Word8 -> Maybe (Int, Int, Int)
color240CodeToRGB n :: Word8
n = case Word8
n of
    0 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 0)
    1 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 95)
    2 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 135)
    3 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 175)
    4 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 215)
    5 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 0, 255)
    6 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 0)
    7 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 95)
    8 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 135)
    9 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 175)
    10 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 215)
    11 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 95, 255)
    12 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 0)
    13 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 95)
    14 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 135)
    15 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 175)
    16 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 215)
    17 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 135, 255)
    18 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 0)
    19 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 95)
    20 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 135)
    21 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 175)
    22 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 215)
    23 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 175, 255)
    24 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 0)
    25 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 95)
    26 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 135)
    27 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 175)
    28 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 215)
    29 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 215, 255)
    30 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 0)
    31 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 95)
    32 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 135)
    33 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 175)
    34 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 215)
    35 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (0, 255, 255)
    36 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 0)
    37 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 95)
    38 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 135)
    39 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 175)
    40 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 215)
    41 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 0, 255)
    42 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 0)
    43 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 95)
    44 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 135)
    45 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 175)
    46 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 215)
    47 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 95, 255)
    48 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 0)
    49 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 95)
    50 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 135)
    51 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 175)
    52 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 215)
    53 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 135, 255)
    54 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 0)
    55 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 95)
    56 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 135)
    57 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 175)
    58 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 215)
    59 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 175, 255)
    60 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 0)
    61 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 95)
    62 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 135)
    63 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 175)
    64 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 215)
    65 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 215, 255)
    66 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 0)
    67 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 95)
    68 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 135)
    69 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 175)
    70 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 215)
    71 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (95, 255, 255)
    72 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 0)
    73 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 95)
    74 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 135)
    75 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 175)
    76 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 215)
    77 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 0, 255)
    78 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 0)
    79 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 95)
    80 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 135)
    81 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 175)
    82 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 215)
    83 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 95, 255)
    84 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 0)
    85 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 95)
    86 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 135)
    87 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 175)
    88 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 215)
    89 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 135, 255)
    90 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 0)
    91 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 95)
    92 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 135)
    93 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 175)
    94 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 215)
    95 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 175, 255)
    96 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 0)
    97 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 95)
    98 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 135)
    99 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 175)
    100 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 215)
    101 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 215, 255)
    102 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 0)
    103 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 95)
    104 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 135)
    105 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 175)
    106 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 215)
    107 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (135, 255, 255)
    108 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 0)
    109 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 95)
    110 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 135)
    111 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 175)
    112 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 215)
    113 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 0, 255)
    114 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 0)
    115 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 95)
    116 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 135)
    117 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 175)
    118 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 215)
    119 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 95, 255)
    120 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 0)
    121 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 95)
    122 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 135)
    123 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 175)
    124 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 215)
    125 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 135, 255)
    126 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 0)
    127 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 95)
    128 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 135)
    129 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 175)
    130 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 215)
    131 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 175, 255)
    132 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 0)
    133 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 95)
    134 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 135)
    135 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 175)
    136 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 215)
    137 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 215, 255)
    138 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 0)
    139 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 95)
    140 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 135)
    141 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 175)
    142 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 215)
    143 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (175, 255, 255)
    144 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 0)
    145 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 95)
    146 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 135)
    147 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 175)
    148 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 215)
    149 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 0, 255)
    150 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 0)
    151 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 95)
    152 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 135)
    153 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 175)
    154 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 215)
    155 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 95, 255)
    156 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 0)
    157 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 95)
    158 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 135)
    159 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 175)
    160 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 215)
    161 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 135, 255)
    162 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 0)
    163 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 95)
    164 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 135)
    165 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 175)
    166 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 215)
    167 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 175, 255)
    168 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 0)
    169 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 95)
    170 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 135)
    171 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 175)
    172 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 215)
    173 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 215, 255)
    174 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 0)
    175 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 95)
    176 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 135)
    177 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 175)
    178 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 215)
    179 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (215, 255, 255)
    180 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 0)
    181 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 95)
    182 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 135)
    183 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 175)
    184 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 215)
    185 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 0, 255)
    186 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 0)
    187 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 95)
    188 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 135)
    189 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 175)
    190 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 215)
    191 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 95, 255)
    192 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 0)
    193 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 95)
    194 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 135)
    195 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 175)
    196 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 215)
    197 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 135, 255)
    198 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 0)
    199 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 95)
    200 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 135)
    201 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 175)
    202 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 215)
    203 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 175, 255)
    204 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 0)
    205 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 95)
    206 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 135)
    207 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 175)
    208 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 215)
    209 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 215, 255)
    210 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 0)
    211 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 95)
    212 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 135)
    213 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 175)
    214 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 215)
    215 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (255, 255, 255)
    216 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (8, 8, 8)
    217 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (18, 18, 18)
    218 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (28, 28, 28)
    219 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (38, 38, 38)
    220 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (48, 48, 48)
    221 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (58, 58, 58)
    222 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (68, 68, 68)
    223 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (78, 78, 78)
    224 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (88, 88, 88)
    225 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (98, 98, 98)
    226 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (108, 108, 108)
    227 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (118, 118, 118)
    228 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (128, 128, 128)
    229 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (138, 138, 138)
    230 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (148, 148, 148)
    231 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (158, 158, 158)
    232 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (168, 168, 168)
    233 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (178, 178, 178)
    234 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (188, 188, 188)
    235 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (198, 198, 198)
    236 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (208, 208, 208)
    237 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (218, 218, 218)
    238 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (228, 228, 228)
    239 -> (Int, Int, Int) -> Maybe (Int, Int, Int)
forall a. a -> Maybe a
Just (238, 238, 238)
    _   -> Maybe (Int, Int, Int)
forall a. Maybe a
Nothing