rainbow (empty) → 0.2.0.0

raw patch · 4 files changed

+3203/−0 lines, 4 filesdep +basedep +terminfodep +textsetup-changed

Dependencies added: base, terminfo, text

Files

• LICENSE +30/−0
• Setup.hs +2/−0
• System/Console/Rainbow.hs +3139/−0
• rainbow.cabal +32/−0

@@ -0,0 +1,30 @@+Copyright (c) 2013, Omari Norman++All rights reserved.++Redistribution and use in source and binary forms, with or without+modification, are permitted provided that the following conditions are met:++    * Redistributions of source code must retain the above copyright+      notice, this list of conditions and the following disclaimer.++    * Redistributions in binary form must reproduce the above+      copyright notice, this list of conditions and the following+      disclaimer in the documentation and/or other materials provided+      with the distribution.++    * Neither the name of Omari Norman nor the names of other+      contributors may be used to endorse or promote products derived+      from this software without specific prior written permission.++THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT+OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,+SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT+LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY+THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE+OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

@@ -0,0 +1,2 @@+import Distribution.Simple+main = defaultMain

@@ -0,0 +1,3139 @@+-- | Handles colors and special effects for text. Internally this+-- module uses the Haskell terminfo library, which links against the+-- UNIX library of the same name, so it should work with a wide+-- variety of UNIX terminals.+--+-- The building block of Rainbow is the 'Chunk'. Each Chunk comes with+-- a 'TextSpec', which specifies how the text should look on 8-color+-- and on 256-color terminals. The Chunk is a full specification; that+-- is, although Chunks are typically printed one after the other, the+-- appearance of one Chunk does not affect the appearance of the next+-- Chunk.+--+-- You have full freedom to specify different attributes and colors+-- for 8 and 256 color terminals; for instance, you can have text+-- appear red on an 8-color terminal but blue on a 256-color terminal.+--+-- Some useful combinators are provided to assist with the building of+-- Chunks. 'plain' builds a Chunk with a provided 'Text' that is+-- rendered using the terminal's default settings and colors. You then+-- use '+.+' to combine different modifiers to change how the Chunk is+-- rendered. Here's an example:+--+-- > {-# LANGUAGE OverloadedStrings #-}+-- >+-- > -- This chunk is blue and underlined, both on 8-color and 256-color+-- > -- terminals.+-- > blueHello :: Chunk+-- > blueHello = plain "Hello world!" +.+ f_blue +.+ underline+-- >+-- > -- This chunk is red on 8-color terminals but uses color 88 on+-- > -- 256-color terminals. Because +.+ is left-associative, the+-- > -- color256_f_88 supersedes the f_red, which sets the foreground+-- > -- on both 8 and 256 color terminals to red.+-- > redHello :: Chunk+-- > redHello = plain "Hello world!" +.+ f_red +.+ color256_f_88+-- >+-- > -- This chunk is underlined on 8-color terminals but is not+-- > -- underlined on 256-color terminals.+-- > underlinedOn8 :: Chunk+-- > underlinedOn8 = plain "Hello world!" +.+ underline8+-- >+-- > newline :: Chunk+-- > newline = plain "\n"+-- >+-- > -- How to print all these chunks+-- > main :: IO ()+-- > main = do+-- >   t <- termFromEnv+-- >   printChunks t [blueHello, nl, redHello, nl, underlinedOn8, nl]+++module System.Console.Rainbow (++  -- * Terminal definitions+    Term(..)+  , termFromEnv+  , smartTermFromEnv++  -- * Chunks+  , Chunk+  , plain++  -- * Printing chunks+  , printChunks+  , hPrintChunks++  -- * Mod+  , Mod(..)+  , ChangeText(..)+  , (.+.)+  , (+.+)++  -- * Effects for both 8 and 256 color terminals++  -- | These modifiers affect both 8 and 256 color terminals:+  --+  -- > {-# LANGUAGE OverloadedStrings #-}+  -- > underlinedOn8and256 :: Chunk+  -- > underlinedOn8and256 = plain "Underlined!" +.+ underline+  --+  -- There are also modifiers to turn an effect off, such as+  -- 'boldOff'. Ordinarily you will not need these because each chunk+  -- starts with no effects, so you only need to turn on the effects+  -- you want. However the @off@ modifiers are here if you need them.++  , bold, boldOff+  , underline, underlineOff+  , flash, flashOff+  , inverse, inverseOff++  -- * Effects for 8-color terminals only++  -- | These modifiers affect 8-color terminals only. For instance+  -- this appears bold only on an 8-color terminal:+  --+  -- > {-# LANGUAGE OverloadedStrings #-}+  -- > boldOn8 :: Chunk+  -- > boldOn8 = plain "Bold on 8 color terminal only" +.+ bold8++  , bold8, bold8off+  , underline8, underline8off+  , flash8, flash8off+  , inverse8, inverse8off++  -- * Effects for 256-color terminals only++  -- | These modifiers affect 256-color terminals only. For instance,+  -- this text is underlined on 256 color terminals but is bold on+  -- 8-color terminals:+  --+  -- > {-# LANGUAGE OverloadedStrings #-}+  -- > underlinedOn256 :: Chunk+  -- > underlinedOn256 = plain "Underlined on 256 color terminal"+  -- >                 +.+ underlined256 +.+ bold8++  , bold256, bold256off+  , underline256, underline256off+  , flash256, flash256off+  , inverse256, inverse256off++  -- * Colors for both 8 and 256 color terminals++  -- | These color modifiers affect both 8 and 256 color+  -- terminals. For example, to print something in red on blue on both+  -- an 8 and a 256 color terminal:+  --+  -- > {-# LANGUAGE OverloadedStrings #-}+  -- > redHello :: Chunk+  -- > redHello = plain "Hello world!" +.+ f_red +.+ b_blue++  -- ** Foreground colors++  , f_default+  , f_black+  , f_red+  , f_green+  , f_yellow+  , f_blue+  , f_magenta+  , f_cyan+  , f_white++  -- ** Background colors++  , b_default+  , b_black+  , b_red+  , b_green+  , b_yellow+  , b_blue+  , b_magenta+  , b_cyan+  , b_white++   -- * Specific colors+   -- ** 8 color foreground colors+  , color8_f_default+  , color8_f_black+  , color8_f_red+  , color8_f_green+  , color8_f_yellow+  , color8_f_blue+  , color8_f_magenta+  , color8_f_cyan+  , color8_f_white++   -- ** 8 color background colors+  , color8_b_default+  , color8_b_black+  , color8_b_red+  , color8_b_green+  , color8_b_yellow+  , color8_b_blue+  , color8_b_magenta+  , color8_b_cyan+  , color8_b_white++   -- ** 256 color foreground colors++   -- | The color names assume a palette similar to the default one+   -- that xterm uses.+  , color256_f_default+  , color256_f_0+  , color256_f_black+  , color256_f_1+  , color256_f_red+  , color256_f_2+  , color256_f_green+  , color256_f_3+  , color256_f_yellow+  , color256_f_4+  , color256_f_blue+  , color256_f_5+  , color256_f_magenta+  , color256_f_6+  , color256_f_cyan+  , color256_f_7+  , color256_f_white+  , color256_f_8+  , color256_f_grey+  , color256_f_9+  , color256_f_red_bright+  , color256_f_10+  , color256_f_green_bright+  , color256_f_11+  , color256_f_yellow_bright+  , color256_f_12+  , color256_f_blue_bright+  , color256_f_13+  , color256_f_magenta_bright+  , color256_f_14+  , color256_f_cyan_bright+  , color256_f_15+  , color256_f_white_bright+  , color256_f_16+  , color256_f_17+  , color256_f_18+  , color256_f_19+  , color256_f_20+  , color256_f_21+  , color256_f_22+  , color256_f_23+  , color256_f_24+  , color256_f_25+  , color256_f_26+  , color256_f_27+  , color256_f_28+  , color256_f_29+  , color256_f_30+  , color256_f_31+  , color256_f_32+  , color256_f_33+  , color256_f_34+  , color256_f_35+  , color256_f_36+  , color256_f_37+  , color256_f_38+  , color256_f_39+  , color256_f_40+  , color256_f_41+  , color256_f_42+  , color256_f_43+  , color256_f_44+  , color256_f_45+  , color256_f_46+  , color256_f_47+  , color256_f_48+  , color256_f_49+  , color256_f_50+  , color256_f_51+  , color256_f_52+  , color256_f_53+  , color256_f_54+  , color256_f_55+  , color256_f_56+  , color256_f_57+  , color256_f_58+  , color256_f_59+  , color256_f_60+  , color256_f_61+  , color256_f_62+  , color256_f_63+  , color256_f_64+  , color256_f_65+  , color256_f_66+  , color256_f_67+  , color256_f_68+  , color256_f_69+  , color256_f_70+  , color256_f_71+  , color256_f_72+  , color256_f_73+  , color256_f_74+  , color256_f_75+  , color256_f_76+  , color256_f_77+  , color256_f_78+  , color256_f_79+  , color256_f_80+  , color256_f_81+  , color256_f_82+  , color256_f_83+  , color256_f_84+  , color256_f_85+  , color256_f_86+  , color256_f_87+  , color256_f_88+  , color256_f_89+  , color256_f_90+  , color256_f_91+  , color256_f_92+  , color256_f_93+  , color256_f_94+  , color256_f_95+  , color256_f_96+  , color256_f_97+  , color256_f_98+  , color256_f_99+  , color256_f_100+  , color256_f_101+  , color256_f_102+  , color256_f_103+  , color256_f_104+  , color256_f_105+  , color256_f_106+  , color256_f_107+  , color256_f_108+  , color256_f_109+  , color256_f_110+  , color256_f_111+  , color256_f_112+  , color256_f_113+  , color256_f_114+  , color256_f_115+  , color256_f_116+  , color256_f_117+  , color256_f_118+  , color256_f_119+  , color256_f_120+  , color256_f_121+  , color256_f_122+  , color256_f_123+  , color256_f_124+  , color256_f_125+  , color256_f_126+  , color256_f_127+  , color256_f_128+  , color256_f_129+  , color256_f_130+  , color256_f_131+  , color256_f_132+  , color256_f_133+  , color256_f_134+  , color256_f_135+  , color256_f_136+  , color256_f_137+  , color256_f_138+  , color256_f_139+  , color256_f_140+  , color256_f_141+  , color256_f_142+  , color256_f_143+  , color256_f_144+  , color256_f_145+  , color256_f_146+  , color256_f_147+  , color256_f_148+  , color256_f_149+  , color256_f_150+  , color256_f_151+  , color256_f_152+  , color256_f_153+  , color256_f_154+  , color256_f_155+  , color256_f_156+  , color256_f_157+  , color256_f_158+  , color256_f_159+  , color256_f_160+  , color256_f_161+  , color256_f_162+  , color256_f_163+  , color256_f_164+  , color256_f_165+  , color256_f_166+  , color256_f_167+  , color256_f_168+  , color256_f_169+  , color256_f_170+  , color256_f_171+  , color256_f_172+  , color256_f_173+  , color256_f_174+  , color256_f_175+  , color256_f_176+  , color256_f_177+  , color256_f_178+  , color256_f_179+  , color256_f_180+  , color256_f_181+  , color256_f_182+  , color256_f_183+  , color256_f_184+  , color256_f_185+  , color256_f_186+  , color256_f_187+  , color256_f_188+  , color256_f_189+  , color256_f_190+  , color256_f_191+  , color256_f_192+  , color256_f_193+  , color256_f_194+  , color256_f_195+  , color256_f_196+  , color256_f_197+  , color256_f_198+  , color256_f_199+  , color256_f_200+  , color256_f_201+  , color256_f_202+  , color256_f_203+  , color256_f_204+  , color256_f_205+  , color256_f_206+  , color256_f_207+  , color256_f_208+  , color256_f_209+  , color256_f_210+  , color256_f_211+  , color256_f_212+  , color256_f_213+  , color256_f_214+  , color256_f_215+  , color256_f_216+  , color256_f_217+  , color256_f_218+  , color256_f_219+  , color256_f_220+  , color256_f_221+  , color256_f_222+  , color256_f_223+  , color256_f_224+  , color256_f_225+  , color256_f_226+  , color256_f_227+  , color256_f_228+  , color256_f_229+  , color256_f_230+  , color256_f_231+  , color256_f_232+  , color256_f_233+  , color256_f_234+  , color256_f_235+  , color256_f_236+  , color256_f_237+  , color256_f_238+  , color256_f_239+  , color256_f_240+  , color256_f_241+  , color256_f_242+  , color256_f_243+  , color256_f_244+  , color256_f_245+  , color256_f_246+  , color256_f_247+  , color256_f_248+  , color256_f_249+  , color256_f_250+  , color256_f_251+  , color256_f_252+  , color256_f_253+  , color256_f_254+  , color256_f_255++  -- ** 256 color background colors++   -- | The color names assume a palette similar to the default one+   -- that xterm uses.+  , color256_b_default+  , color256_b_0+  , color256_b_black+  , color256_b_1+  , color256_b_red+  , color256_b_2+  , color256_b_green+  , color256_b_3+  , color256_b_yellow+  , color256_b_4+  , color256_b_blue+  , color256_b_5+  , color256_b_magenta+  , color256_b_6+  , color256_b_cyan+  , color256_b_7+  , color256_b_white+  , color256_b_8+  , color256_b_grey+  , color256_b_9+  , color256_b_red_bright+  , color256_b_10+  , color256_b_green_bright+  , color256_b_11+  , color256_b_yellow_bright+  , color256_b_12+  , color256_b_blue_bright+  , color256_b_13+  , color256_b_magenta_bright+  , color256_b_14+  , color256_b_cyan_bright+  , color256_b_15+  , color256_b_white_bright+  , color256_b_16+  , color256_b_17+  , color256_b_18+  , color256_b_19+  , color256_b_20+  , color256_b_21+  , color256_b_22+  , color256_b_23+  , color256_b_24+  , color256_b_25+  , color256_b_26+  , color256_b_27+  , color256_b_28+  , color256_b_29+  , color256_b_30+  , color256_b_31+  , color256_b_32+  , color256_b_33+  , color256_b_34+  , color256_b_35+  , color256_b_36+  , color256_b_37+  , color256_b_38+  , color256_b_39+  , color256_b_40+  , color256_b_41+  , color256_b_42+  , color256_b_43+  , color256_b_44+  , color256_b_45+  , color256_b_46+  , color256_b_47+  , color256_b_48+  , color256_b_49+  , color256_b_50+  , color256_b_51+  , color256_b_52+  , color256_b_53+  , color256_b_54+  , color256_b_55+  , color256_b_56+  , color256_b_57+  , color256_b_58+  , color256_b_59+  , color256_b_60+  , color256_b_61+  , color256_b_62+  , color256_b_63+  , color256_b_64+  , color256_b_65+  , color256_b_66+  , color256_b_67+  , color256_b_68+  , color256_b_69+  , color256_b_70+  , color256_b_71+  , color256_b_72+  , color256_b_73+  , color256_b_74+  , color256_b_75+  , color256_b_76+  , color256_b_77+  , color256_b_78+  , color256_b_79+  , color256_b_80+  , color256_b_81+  , color256_b_82+  , color256_b_83+  , color256_b_84+  , color256_b_85+  , color256_b_86+  , color256_b_87+  , color256_b_88+  , color256_b_89+  , color256_b_90+  , color256_b_91+  , color256_b_92+  , color256_b_93+  , color256_b_94+  , color256_b_95+  , color256_b_96+  , color256_b_97+  , color256_b_98+  , color256_b_99+  , color256_b_100+  , color256_b_101+  , color256_b_102+  , color256_b_103+  , color256_b_104+  , color256_b_105+  , color256_b_106+  , color256_b_107+  , color256_b_108+  , color256_b_109+  , color256_b_110+  , color256_b_111+  , color256_b_112+  , color256_b_113+  , color256_b_114+  , color256_b_115+  , color256_b_116+  , color256_b_117+  , color256_b_118+  , color256_b_119+  , color256_b_120+  , color256_b_121+  , color256_b_122+  , color256_b_123+  , color256_b_124+  , color256_b_125+  , color256_b_126+  , color256_b_127+  , color256_b_128+  , color256_b_129+  , color256_b_130+  , color256_b_131+  , color256_b_132+  , color256_b_133+  , color256_b_134+  , color256_b_135+  , color256_b_136+  , color256_b_137+  , color256_b_138+  , color256_b_139+  , color256_b_140+  , color256_b_141+  , color256_b_142+  , color256_b_143+  , color256_b_144+  , color256_b_145+  , color256_b_146+  , color256_b_147+  , color256_b_148+  , color256_b_149+  , color256_b_150+  , color256_b_151+  , color256_b_152+  , color256_b_153+  , color256_b_154+  , color256_b_155+  , color256_b_156+  , color256_b_157+  , color256_b_158+  , color256_b_159+  , color256_b_160+  , color256_b_161+  , color256_b_162+  , color256_b_163+  , color256_b_164+  , color256_b_165+  , color256_b_166+  , color256_b_167+  , color256_b_168+  , color256_b_169+  , color256_b_170+  , color256_b_171+  , color256_b_172+  , color256_b_173+  , color256_b_174+  , color256_b_175+  , color256_b_176+  , color256_b_177+  , color256_b_178+  , color256_b_179+  , color256_b_180+  , color256_b_181+  , color256_b_182+  , color256_b_183+  , color256_b_184+  , color256_b_185+  , color256_b_186+  , color256_b_187+  , color256_b_188+  , color256_b_189+  , color256_b_190+  , color256_b_191+  , color256_b_192+  , color256_b_193+  , color256_b_194+  , color256_b_195+  , color256_b_196+  , color256_b_197+  , color256_b_198+  , color256_b_199+  , color256_b_200+  , color256_b_201+  , color256_b_202+  , color256_b_203+  , color256_b_204+  , color256_b_205+  , color256_b_206+  , color256_b_207+  , color256_b_208+  , color256_b_209+  , color256_b_210+  , color256_b_211+  , color256_b_212+  , color256_b_213+  , color256_b_214+  , color256_b_215+  , color256_b_216+  , color256_b_217+  , color256_b_218+  , color256_b_219+  , color256_b_220+  , color256_b_221+  , color256_b_222+  , color256_b_223+  , color256_b_224+  , color256_b_225+  , color256_b_226+  , color256_b_227+  , color256_b_228+  , color256_b_229+  , color256_b_230+  , color256_b_231+  , color256_b_232+  , color256_b_233+  , color256_b_234+  , color256_b_235+  , color256_b_236+  , color256_b_237+  , color256_b_238+  , color256_b_239+  , color256_b_240+  , color256_b_241+  , color256_b_242+  , color256_b_243+  , color256_b_244+  , color256_b_245+  , color256_b_246+  , color256_b_247+  , color256_b_248+  , color256_b_249+  , color256_b_250+  , color256_b_251+  , color256_b_252+  , color256_b_253+  , color256_b_254+  , color256_b_255++  -- * Create your own colors++  -- * Style, TextSpec, and Chunk innards++  -- | A style is a bundle of attributes that describes text+  -- attributes, such as its color and whether it is bold.+  --+  -- Ordinarily you shouldn't need to use these types but they are+  -- here in case they are useful; in particular, you can use them to+  -- examine a Chunk's TextSpec to see what its characteristics are.+  , StyleCommon (StyleCommon, scBold, scUnderline, scFlash, scInverse)+  , Style8 (Style8, foreground8, background8, common8)+  , Style256 (Style256, foreground256, background256, common256)+  , defaultStyleCommon+  , defaultStyle8+  , defaultStyle256++  , TextSpec (TextSpec, style8, style256)+  , defaultTextSpec++  , chunkTextSpec+  , chunkText++  -- * Basement++  -- | Ordinarily you will not need the things down here. Instead, the+  -- definitions above will give you an instance of Mod that will+  -- create the effect or color you need.++  -- ** Modifier newtype wrappers++  , Bold8 (Bold8, unBold8)+  , Underline8 (Underline8, unUnderline8)+  , Flash8 (Flash8, unFlash8)+  , Inverse8 (Inverse8, unInverse8)++  , Bold256 (Bold256, unBold256)+  , Underline256 (Underline256, unUnderline256)+  , Flash256 (Flash256, unFlash256)+  , Inverse256 (Inverse256, unInverse256)++  , BoldAll(..)+  , UnderlineAll(..)+  , FlashAll(..)+  , InverseAll(..)++  , ForegroundAll (..)+  , BackgroundAll (..)++  -- ** Wrappers for effects++  , Bold (Bold, unBold)+  , Underline (Underline, unUnderline)+  , Flash (Flash, unFlash)+  , Inverse (Inverse, unInverse)++  -- ** Wrappers for colors++  -- | Definitions are provided above that give you every possible+  -- color; however, these constructors are exported in case you want+  -- to make your own colors instead. Use at your own risk, as you can+  -- create non-sensical colors with this (such as 256-color colors in+  -- a 'Background8'.)+  , Background8 (..)+  , Background256 (..)+  , Foreground8 (..)+  , Foreground256 (..)++  ) where+++import Data.Monoid (Monoid, mempty, mconcat)+import Data.Text (Text)+import Data.Maybe (fromMaybe)+import qualified Data.Text as X+import qualified System.Console.Terminfo as T+import System.IO as IO+import System.Environment as Env++--+-- Terminal definitions+--++-- | Which terminal definition to use.+data Term+  = Dumb+  -- ^ Using this terminal should always succeed. This suppresses all+  -- colors. Uesful if output is not going to a TTY, or if you just do+  -- not like colors.++  | TermName String+  -- ^ Use the terminal with this given name. You might get this from+  -- the TERM environment variable, or set it explicitly. A runtime+  -- error will result if the terminfo database does not have a+  -- definition for this terminal. If this terminal supports 256+  -- colors, then 256 colors are used. If this terminal supports less+  -- than 256 colors, but at least 8 colors, then 8 colors are+  -- used. Otherwise, no colors are used.+  deriving (Eq, Show)++-- | Gets the terminal definition from the environment. If the+-- environment does not have a TERM veriable, use 'Dumb'.+termFromEnv :: IO Term+termFromEnv = do+  t <- Env.lookupEnv "TERM"+  return $ maybe Dumb TermName t++-- | Gets the terminal definition from the environment. If the first+-- argument is True, the terminal is always obtained from the+-- environment. If it is False, the terminal is only obtained from the+-- environment if the given handle is not a terminal; otherwise, Dumb+-- is returned.+smartTermFromEnv+  :: Bool+  -- ^ Use True if the user always wants to see colors, even if+  -- standard output is not a terminal. Otherwise, use False.++  -> IO.Handle+  -- ^ Check this handle to see if it is a terminal (typically you+  -- will use stdout).++  -> IO Term+smartTermFromEnv alwaysColor h =+  if alwaysColor+  then termFromEnv+  else do+        isTerm <- IO.hIsTerminalDevice h+        if isTerm+          then termFromEnv+          else return Dumb++--+-- Mod+--++-- | A Mod is anything capable of modifying a Chunk. Usually these+-- will modify the TextSpec, though a few Mod instead modify the Text+-- itself. Typically you will create a Chunk with 'plain' and then use+-- '+.+' repeatedly to modify the Chunk to suit your needs.+class Mod a where+  changeChunk :: Chunk -> a -> Chunk++-- | When used as a modifier, a Text will replace the text within a+-- Chunk with new text.+--+-- > {-# LANGUAGE OverloadedStrings #-}+-- > goodbyeWorld :: Chunk+-- > goodbyeWorld = plain "Hello world!" +.+ "Goodbye world!"+instance Mod Text where+  changeChunk (Chunk ts _) t' = Chunk ts t'++-- | Useful if you want to inspect the text in a Chunk and then build+-- a new Chunk with different text.+--+-- > {-# LANGUAGE OverloadedStrings #-}+-- > import Data.Text (append)+-- > helloDolly :: Chunk+-- > helloDolly = plain "Hello" +.+ ChangeText (`append` " Dolly")+newtype ChangeText = ChangeText { unChangeText :: Text -> Text }++instance Mod ChangeText where+  changeChunk (Chunk ts t) (ChangeText f) = Chunk ts (f t)++-- | Applies a modifier to a Chunk. Left associative.+(+.+) :: Mod a => Chunk -> a -> Chunk+(+.+) = changeChunk+infixl 6 .+.++-- | Composes modifiers. Useful to build up a single function that+-- modifies a Chunk. You might use this to build up several modifiers+-- and use them repeatedly, or you might write an API that expects+-- functions of type @Chunk -> Chunk@ and then you could use '.+.' to+-- build those functions. Left associative.+--+-- > redBoldUnderline :: Chunk -> Chunk+-- > redBoldUnderline = id .+. f_red .+. bold .+. underline++(.+.) :: Mod a => (Chunk -> Chunk) -> a -> Chunk -> Chunk+(.+.) f a c = changeChunk (f c) a+infixl 6 +.+++-- For Background8, Background256, Foreground8, Foreground256: the+-- newtype wraps a Terminfo Color. If Nothing, use the default color.++-- | Background color in an 8 color setting.+newtype Background8 = Background8 { unBackground8 :: Maybe T.Color }+  deriving (Eq, Show, Ord)++instance Mod Background8 where+  changeChunk (Chunk ts t) b8 =+    Chunk (ts { style8 = (style8 ts) { background8 = b8 } } ) t++-- | Background color in a 256 color setting.+newtype Background256 = Background256 { unBackground256 :: Maybe T.Color }+  deriving (Eq, Show, Ord)++instance Mod Background256 where+  changeChunk (Chunk ts t) b256 =+    Chunk (ts { style256 = (style256 ts) { background256 = b256 } } ) t++-- | Foreground color in an 8 color setting.+newtype Foreground8 = Foreground8 { unForeground8 :: Maybe T.Color }+  deriving (Eq, Show, Ord)++instance Mod Foreground8 where+  changeChunk (Chunk ts t) f8 =+    Chunk (ts { style8 = (style8 ts) { foreground8 = f8 } } ) t++-- | Foreground color in a 256 color setting.+newtype Foreground256 = Foreground256 { unForeground256 :: Maybe T.Color }+  deriving (Eq, Show, Ord)++instance Mod Foreground256 where+  changeChunk (Chunk ts t) f256 =+    Chunk (ts { style256 = (style256 ts) { foreground256 = f256 } } ) t+++--+-- Chunks+--++-- | A chunk is some textual data coupled with a description of what+-- color the text is, attributes like whether it is bold or+-- underlined, etc. The chunk knows what foreground and background+-- colors and what attributes to use for both an 8 color terminal and+-- a 256 color terminal. To change these attributes and colors, you+-- must make a new chunk.+--+-- There is no way to combine chunks. To print large numbers of+-- chunks, lazily build a list of them and then print them using+-- 'printChunks'.++data Chunk = Chunk+  { chunkTextSpec :: TextSpec+  , chunkText :: Text+  } deriving (Eq, Show, Ord)++-- | Makes a plain Chunk; that is, one that has no effects and is+-- printed in the default foreground and background color for the+-- terminal. Modify this chunk so that it has the colors and effects+-- that you want.+plain :: Text -> Chunk+plain = Chunk defaultTextSpec++-- | Sends a list of chunks to the given handle for printing. Sets up+-- the terminal (this only needs to be done once.) Lazily processes+-- the list of Chunk. See 'printChunks' for notes on how many colors+-- are used.+hPrintChunks :: IO.Handle -> Term -> [Chunk] -> IO ()+hPrintChunks h t cs = do+  let setup = case t of+        Dumb -> T.setupTerm "dumb"+        TermName s -> T.setupTerm s+  term <- setup+  mapM_ (hPrintChunk h term) cs+  T.hRunTermOutput h term (defaultColors term)+  T.hRunTermOutput h term+    $ case T.getCapability term T.allAttributesOff of+        Nothing -> error $ "System.Console.Rainbow.printChunks: error: "+                   ++ "allAttributesOff failed"+        Just s -> s++-- | Sends a list of chunks to standard output for printing. Sets up+-- the terminal (this only needs to be done once.) Lazily processes+-- the list of Chunk.+--+-- Which colors are used depends upon the 'Term'. If it is 'Dumb',+-- then no colors are used on output. If the 'Term' is specified with+-- 'TermName', the UNIX terminfo library is used to determine how many+-- colors the terminal supports. If it supports at least 256 colors,+-- then 256 colors are used. If it supports at least 8 colors but less+-- than 256 colors, then 256 colors are used. Otherwise, no colors are+-- used. A runtime error will occur if the 'TermName' is not found in+-- the system terminal database.+printChunks :: Term -> [Chunk] -> IO ()+printChunks = hPrintChunks IO.stdout++hPrintChunk :: IO.Handle -> T.Terminal -> Chunk -> IO ()+hPrintChunk h t (Chunk ts x) =+  T.hRunTermOutput h t+  . mconcat+  $ [defaultColors t, codes, txt]+  where+    codes = getTermCodes t ts+    txt = T.termText . X.unpack $ x++defaultColors :: T.Terminal -> T.TermOutput+defaultColors term =+  fromMaybe mempty (T.getCapability term T.restoreDefaultColors)++--+-- Effects+--+newtype Bold = Bold { unBold :: Bool }+  deriving (Show, Eq, Ord)++newtype Underline = Underline { unUnderline :: Bool }+  deriving (Show, Eq, Ord)++newtype Flash = Flash { unFlash :: Bool }+  deriving (Show, Eq, Ord)++newtype Inverse = Inverse { unInverse :: Bool }+  deriving (Show, Eq, Ord)++newtype Bold8 = Bold8 { unBold8 :: Bold }+  deriving (Show, Eq, Ord)++bold8 :: Bold8+bold8 = Bold8 (Bold True)++bold8off :: Bold8+bold8off = Bold8 (Bold False)++instance Mod Bold8 where+  changeChunk (Chunk ts t) (Bold8 b) =+    let c8 = common8 . style8 $ ts+        c8' = c8 { scBold = b }+        ts' = ts { style8 = (style8 ts) { common8 = c8' } }+    in Chunk ts' t++newtype Underline8 = Underline8 { unUnderline8 :: Underline }+  deriving (Show, Eq, Ord)++underline8 :: Underline8+underline8 = Underline8 (Underline True)++underline8off :: Underline8+underline8off = Underline8 (Underline False)++instance Mod Underline8 where+  changeChunk (Chunk ts t) (Underline8 u) =+    let c8 = common8 . style8 $ ts+        c8' = c8 { scUnderline = u }+        ts' = ts { style8 = (style8 ts) { common8 = c8' } }+    in Chunk ts' t++newtype Flash8 = Flash8 { unFlash8 :: Flash }+  deriving (Show, Eq, Ord)++flash8 :: Flash8+flash8 = Flash8 (Flash True)++flash8off :: Flash8+flash8off = Flash8 (Flash False)++instance Mod Flash8 where+  changeChunk (Chunk ts t) (Flash8 f) =+    let c8 = common8 . style8 $ ts+        c8' = c8 { scFlash = f }+        ts' = ts { style8 = (style8 ts) { common8 = c8' } }+    in Chunk ts' t++newtype Inverse8 = Inverse8 { unInverse8 :: Inverse }+  deriving (Show, Eq, Ord)++inverse8 :: Inverse8+inverse8 = Inverse8 (Inverse True)++inverse8off :: Inverse8+inverse8off = Inverse8 (Inverse False)++instance Mod Inverse8 where+  changeChunk (Chunk ts t) (Inverse8 i) =+    let c8 = common8 . style8 $ ts+        c8' = c8 { scInverse = i }+        ts' = ts { style8 = (style8 ts) { common8 = c8' } }+    in Chunk ts' t++newtype Bold256 = Bold256 { unBold256 :: Bold }+  deriving (Show, Eq, Ord)++bold256 :: Bold256+bold256 = Bold256 (Bold True)++bold256off :: Bold256+bold256off = Bold256 (Bold False)++instance Mod Bold256 where+  changeChunk (Chunk ts t) (Bold256 b) =+    let c256 = common256 . style256 $ ts+        c256' = c256 { scBold = b }+        ts' = ts { style256 = (style256 ts) { common256 = c256' } }+    in Chunk ts' t++newtype Underline256 = Underline256 { unUnderline256 :: Underline }+  deriving (Show, Eq, Ord)++underline256 :: Underline256+underline256 = Underline256 (Underline True)++underline256off :: Underline256+underline256off = Underline256 (Underline False)++instance Mod Underline256 where+  changeChunk (Chunk ts t) (Underline256 u) =+    let c256 = common256 . style256 $ ts+        c256' = c256 { scUnderline = u }+        ts' = ts { style256 = (style256 ts) { common256 = c256' } }+    in Chunk ts' t++newtype Flash256 = Flash256 { unFlash256 :: Flash }+  deriving (Show, Eq, Ord)++flash256 :: Flash256+flash256 = Flash256 (Flash True)++flash256off :: Flash256+flash256off = Flash256 (Flash False)++instance Mod Flash256 where+  changeChunk (Chunk ts t) (Flash256 f) =+    let c256 = common256 . style256 $ ts+        c256' = c256 { scFlash = f }+        ts' = ts { style256 = (style256 ts) { common256 = c256' } }+    in Chunk ts' t++newtype Inverse256 = Inverse256 { unInverse256 :: Inverse }+  deriving (Show, Eq, Ord)++inverse256 :: Inverse256+inverse256 = Inverse256 (Inverse True)++inverse256off :: Inverse256+inverse256off = Inverse256 (Inverse False)++instance Mod Inverse256 where+  changeChunk (Chunk ts t) (Inverse256 i) =+    let c256 = common256 . style256 $ ts+        c256' = c256 { scInverse = i }+        ts' = ts { style256 = (style256 ts) { common256 = c256' } }+    in Chunk ts' t+++--+-- All+--++doAll+  :: (Mod a, Mod b)+  => (a, b)+  -- ^ Turn on+  -> (a, b)+  -- ^ Turn off+  -> Chunk+  -> Bool+  -> Chunk+doAll on off c b =+  flip changeChunk m1 . flip changeChunk m2 $ c+  where+    (m1, m2) = if b then on else off+++newtype BoldAll = BoldAll { unBoldAll :: Bool }+  deriving (Eq, Ord, Show)++bold :: BoldAll+bold = BoldAll True++boldOff :: BoldAll+boldOff = BoldAll False++instance Mod BoldAll where+  changeChunk c =+    doAll (bold8, bold256) (bold8off, bold256off) c . unBoldAll++newtype UnderlineAll = UnderlineAll { unUnderlineAll :: Bool }+  deriving (Eq, Ord, Show)++underline :: UnderlineAll+underline = UnderlineAll True++underlineOff :: UnderlineAll+underlineOff = UnderlineAll False++instance Mod UnderlineAll where+  changeChunk c =+    doAll (underline8, underline256)+          (underline8off, underline256off) c+    . unUnderlineAll++newtype FlashAll = FlashAll { unFlashAll :: Bool }+  deriving (Eq, Ord, Show)++flash :: FlashAll+flash = FlashAll True++flashOff :: FlashAll+flashOff = FlashAll False++instance Mod FlashAll where+  changeChunk c =+    doAll (flash8, flash256) (flash8off, flash256off) c+    . unFlashAll++newtype InverseAll = InverseAll { unInverseAll :: Bool }+  deriving (Eq, Ord, Show)++inverse :: InverseAll+inverse = InverseAll True++inverseOff :: InverseAll+inverseOff = InverseAll False++instance Mod InverseAll where+  changeChunk c =+    doAll (inverse8, inverse256) (inverse8off, inverse256off) c+    . unInverseAll++data ForegroundAll = ForegroundAll+  { fa8 :: Foreground8+  , fa256 :: Foreground256+  }++instance Mod ForegroundAll where+  changeChunk c (ForegroundAll c8 c256) =+    flip changeChunk c8 . flip changeChunk c256 $ c++f_default :: ForegroundAll+f_default = ForegroundAll color8_f_default color256_f_default++f_black :: ForegroundAll+f_black = ForegroundAll color8_f_black color256_f_black++f_red :: ForegroundAll+f_red = ForegroundAll color8_f_red color256_f_red++f_green :: ForegroundAll+f_green = ForegroundAll color8_f_green color256_f_green++f_yellow :: ForegroundAll+f_yellow = ForegroundAll color8_f_yellow color256_f_yellow++f_blue :: ForegroundAll+f_blue = ForegroundAll color8_f_blue color256_f_blue++f_magenta :: ForegroundAll+f_magenta = ForegroundAll color8_f_magenta color256_f_magenta++f_cyan :: ForegroundAll+f_cyan = ForegroundAll color8_f_cyan color256_f_cyan++f_white :: ForegroundAll+f_white = ForegroundAll color8_f_white color256_f_white+++data BackgroundAll = BackgroundAll+  { ba8 :: Background8+  , ba256 :: Background256+  }++instance Mod BackgroundAll where+  changeChunk c (BackgroundAll c8 c256) =+    flip changeChunk c8 . flip changeChunk c256 $ c++b_default :: BackgroundAll+b_default = BackgroundAll color8_b_default color256_b_default++b_black :: BackgroundAll+b_black = BackgroundAll color8_b_black color256_b_black++b_red :: BackgroundAll+b_red = BackgroundAll color8_b_red color256_b_red++b_green :: BackgroundAll+b_green = BackgroundAll color8_b_green color256_b_green++b_yellow :: BackgroundAll+b_yellow = BackgroundAll color8_b_yellow color256_b_yellow++b_blue :: BackgroundAll+b_blue = BackgroundAll color8_b_blue color256_b_blue++b_magenta :: BackgroundAll+b_magenta = BackgroundAll color8_b_magenta color256_b_magenta++b_cyan :: BackgroundAll+b_cyan = BackgroundAll color8_b_cyan color256_b_cyan++b_white :: BackgroundAll+b_white = BackgroundAll color8_b_white color256_b_white++--+-- Styles+--++-- | Style elements that apply in both 8 and 256 color+-- terminals. However, the elements are described separately for 8 and+-- 256 color terminals, so that the text appearance can change+-- depending on how many colors a terminal has.+data StyleCommon = StyleCommon+  { scBold :: Bold+  , scUnderline :: Underline+  , scFlash :: Flash+  , scInverse :: Inverse+  } deriving (Show, Eq, Ord)++-- | Describes text appearance (foreground and background colors, as+-- well as other attributes such as bold) for an 8 color terminal.+data Style8 = Style8+  { foreground8 :: Foreground8+  , background8 :: Background8+  , common8 :: StyleCommon+  } deriving (Show, Eq, Ord)++-- | Describes text appearance (foreground and background colors, as+-- well as other attributes such as bold) for a 256 color terminal.+data Style256 = Style256+  { foreground256 :: Foreground256+  , background256 :: Background256+  , common256 :: StyleCommon+  } deriving (Show, Eq, Ord)++-- | Has all bold, flash, underline, and inverse turned off.+defaultStyleCommon :: StyleCommon+defaultStyleCommon = StyleCommon+  { scBold = Bold False+  , scUnderline = Underline False+  , scFlash = Flash False+  , scInverse = Inverse False+  }++-- | Uses the default terminal colors (which will vary depending on+-- the terminal).+defaultStyle8 :: Style8+defaultStyle8 = Style8+  { foreground8 = color8_f_default+  , background8 = color8_b_default+  , common8 = defaultStyleCommon+  }++-- | Uses the default terminal colors (which will vary depending on+-- the terminal).+defaultStyle256 :: Style256+defaultStyle256 = Style256+  { foreground256 = color256_f_default+  , background256 = color256_b_default+  , common256 = defaultStyleCommon+  }++--+-- TextSpec+--++-- | The TextSpec bundles together the styles for the 8 and 256 color+-- terminals, so that the text can be portrayed on any terminal.+data TextSpec = TextSpec+  { style8 :: Style8+  , style256 :: Style256+  } deriving (Show, Eq, Ord)++-- | A TextSpec with the default colors on 8 and 256 color terminals,+-- with all attributes turned off.+defaultTextSpec :: TextSpec+defaultTextSpec = TextSpec+  { style8 = defaultStyle8+  , style256 = defaultStyle256+  }++--+-- Internal+--++commonAttrs :: T.Terminal -> StyleCommon -> T.TermOutput+commonAttrs t s =+  let a = T.Attributes+        { T.standoutAttr = False+        , T.underlineAttr = unUnderline . scUnderline $ s+        , T.reverseAttr = unInverse . scInverse $ s+        , T.blinkAttr = unFlash . scFlash $ s+        , T.dimAttr = False+        , T.boldAttr = unBold . scBold $ s+        , T.invisibleAttr = False+        , T.protectedAttr = False+        }+  in case T.getCapability t (T.setAttributes) of+      Nothing -> error $ "System.Console.Rainbow: commonAttrs: "+                 ++ "capability failed; should never happen"+      Just f -> f a+++-- | Gets the right set of terminal codes to apply the desired+-- highlighting, bold, underlining, etc. Be sure to apply the+-- attributes first (bold, underlining, etc) and then the+-- colors. Setting the colors first and then the attributes seems to+-- reset the colors, giving blank output.+getTermCodes+  :: T.Terminal+  -> TextSpec+  -> T.TermOutput+getTermCodes t ts = fromMaybe mempty $ do+  cols <- T.getCapability t T.termColors+  let TextSpec s8 s256 = ts+      Style8 f8 b8 c8 = s8+      Style256 f256 b256 c256 = s256+  setFg <- T.getCapability t T.setForegroundColor+  setBg <- T.getCapability t T.setBackgroundColor+  (fg, bg, cm) <- case () of+    _ | cols >= 256 -> Just $ ( unForeground256 f256+                              , unBackground256 b256+                              , c256 )+      | cols >= 8 -> Just ( unForeground8 f8+                         , unBackground8 b8+                         , c8)+      | otherwise -> Nothing+  let oFg = maybe mempty setFg fg+      oBg = maybe mempty setBg bg+      oCm = commonAttrs t cm+  return $ mconcat [oCm, oFg, oBg]+++--+-- Color basement+--+color8_f_default :: Foreground8+color8_f_default = Foreground8 Nothing++color8_f_black :: Foreground8+color8_f_black = Foreground8 $ Just T.Black++color8_f_red :: Foreground8+color8_f_red = Foreground8 $ Just T.Red++color8_f_green :: Foreground8+color8_f_green = Foreground8 $ Just T.Green++color8_f_yellow :: Foreground8+color8_f_yellow = Foreground8 $ Just T.Yellow++color8_f_blue :: Foreground8+color8_f_blue = Foreground8 $ Just T.Blue++color8_f_magenta :: Foreground8+color8_f_magenta = Foreground8 $ Just T.Magenta++color8_f_cyan :: Foreground8+color8_f_cyan = Foreground8 $ Just T.Cyan++color8_f_white :: Foreground8+color8_f_white = Foreground8 $ Just T.White++color8_b_default :: Background8+color8_b_default = Background8 Nothing++color8_b_black :: Background8+color8_b_black = Background8 $ Just T.Black++color8_b_red :: Background8+color8_b_red = Background8 $ Just T.Red++color8_b_green :: Background8+color8_b_green = Background8 $ Just T.Green++color8_b_yellow :: Background8+color8_b_yellow = Background8 $ Just T.Yellow++color8_b_blue :: Background8+color8_b_blue = Background8 $ Just T.Blue++color8_b_magenta :: Background8+color8_b_magenta = Background8 $ Just T.Magenta++color8_b_cyan :: Background8+color8_b_cyan = Background8 $ Just T.Cyan++color8_b_white :: Background8+color8_b_white = Background8 $ Just T.White++color256_f_default :: Foreground256+color256_f_default = Foreground256 Nothing++color256_f_0 :: Foreground256+color256_f_0 = Foreground256 (Just (T.ColorNumber 0))++color256_f_black :: Foreground256+color256_f_black = Foreground256 (Just (T.ColorNumber 0))++color256_f_1 :: Foreground256+color256_f_1 = Foreground256 (Just (T.ColorNumber 1))++color256_f_red :: Foreground256+color256_f_red = Foreground256 (Just (T.ColorNumber 1))++color256_f_2 :: Foreground256+color256_f_2 = Foreground256 (Just (T.ColorNumber 2))++color256_f_green :: Foreground256+color256_f_green = Foreground256 (Just (T.ColorNumber 2))++color256_f_3 :: Foreground256+color256_f_3 = Foreground256 (Just (T.ColorNumber 3))++color256_f_yellow :: Foreground256+color256_f_yellow = Foreground256 (Just (T.ColorNumber 3))++color256_f_4 :: Foreground256+color256_f_4 = Foreground256 (Just (T.ColorNumber 4))++color256_f_blue :: Foreground256+color256_f_blue = Foreground256 (Just (T.ColorNumber 4))++color256_f_5 :: Foreground256+color256_f_5 = Foreground256 (Just (T.ColorNumber 5))++color256_f_magenta :: Foreground256+color256_f_magenta = Foreground256 (Just (T.ColorNumber 5))++color256_f_6 :: Foreground256+color256_f_6 = Foreground256 (Just (T.ColorNumber 6))++color256_f_cyan :: Foreground256+color256_f_cyan = Foreground256 (Just (T.ColorNumber 6))++color256_f_7 :: Foreground256+color256_f_7 = Foreground256 (Just (T.ColorNumber 7))++color256_f_white :: Foreground256+color256_f_white = Foreground256 (Just (T.ColorNumber 7))++color256_f_8 :: Foreground256+color256_f_8 = Foreground256 (Just (T.ColorNumber 8))++color256_f_grey :: Foreground256+color256_f_grey = Foreground256 (Just (T.ColorNumber 8))++color256_f_9 :: Foreground256+color256_f_9 = Foreground256 (Just (T.ColorNumber 9))++color256_f_red_bright :: Foreground256+color256_f_red_bright = Foreground256 (Just (T.ColorNumber 9))++color256_f_10 :: Foreground256+color256_f_10 = Foreground256 (Just (T.ColorNumber 10))++color256_f_green_bright :: Foreground256+color256_f_green_bright = Foreground256 (Just (T.ColorNumber 10))++color256_f_11 :: Foreground256+color256_f_11 = Foreground256 (Just (T.ColorNumber 11))++color256_f_yellow_bright :: Foreground256+color256_f_yellow_bright = Foreground256 (Just (T.ColorNumber 11))++color256_f_12 :: Foreground256+color256_f_12 = Foreground256 (Just (T.ColorNumber 12))++color256_f_blue_bright :: Foreground256+color256_f_blue_bright = Foreground256 (Just (T.ColorNumber 12))++color256_f_13 :: Foreground256+color256_f_13 = Foreground256 (Just (T.ColorNumber 13))++color256_f_magenta_bright :: Foreground256+color256_f_magenta_bright = Foreground256 (Just (T.ColorNumber 13))++color256_f_14 :: Foreground256+color256_f_14 = Foreground256 (Just (T.ColorNumber 14))++color256_f_cyan_bright :: Foreground256+color256_f_cyan_bright = Foreground256 (Just (T.ColorNumber 14))++color256_f_15 :: Foreground256+color256_f_15 = Foreground256 (Just (T.ColorNumber 15))++color256_f_white_bright :: Foreground256+color256_f_white_bright = Foreground256 (Just (T.ColorNumber 15))++color256_f_16 :: Foreground256+color256_f_16 = Foreground256 (Just (T.ColorNumber 16))++color256_f_17 :: Foreground256+color256_f_17 = Foreground256 (Just (T.ColorNumber 17))++color256_f_18 :: Foreground256+color256_f_18 = Foreground256 (Just (T.ColorNumber 18))++color256_f_19 :: Foreground256+color256_f_19 = Foreground256 (Just (T.ColorNumber 19))++color256_f_20 :: Foreground256+color256_f_20 = Foreground256 (Just (T.ColorNumber 20))++color256_f_21 :: Foreground256+color256_f_21 = Foreground256 (Just (T.ColorNumber 21))++color256_f_22 :: Foreground256+color256_f_22 = Foreground256 (Just (T.ColorNumber 22))++color256_f_23 :: Foreground256+color256_f_23 = Foreground256 (Just (T.ColorNumber 23))++color256_f_24 :: Foreground256+color256_f_24 = Foreground256 (Just (T.ColorNumber 24))++color256_f_25 :: Foreground256+color256_f_25 = Foreground256 (Just (T.ColorNumber 25))++color256_f_26 :: Foreground256+color256_f_26 = Foreground256 (Just (T.ColorNumber 26))++color256_f_27 :: Foreground256+color256_f_27 = Foreground256 (Just (T.ColorNumber 27))++color256_f_28 :: Foreground256+color256_f_28 = Foreground256 (Just (T.ColorNumber 28))++color256_f_29 :: Foreground256+color256_f_29 = Foreground256 (Just (T.ColorNumber 29))++color256_f_30 :: Foreground256+color256_f_30 = Foreground256 (Just (T.ColorNumber 30))++color256_f_31 :: Foreground256+color256_f_31 = Foreground256 (Just (T.ColorNumber 31))++color256_f_32 :: Foreground256+color256_f_32 = Foreground256 (Just (T.ColorNumber 32))++color256_f_33 :: Foreground256+color256_f_33 = Foreground256 (Just (T.ColorNumber 33))++color256_f_34 :: Foreground256+color256_f_34 = Foreground256 (Just (T.ColorNumber 34))++color256_f_35 :: Foreground256+color256_f_35 = Foreground256 (Just (T.ColorNumber 35))++color256_f_36 :: Foreground256+color256_f_36 = Foreground256 (Just (T.ColorNumber 36))++color256_f_37 :: Foreground256+color256_f_37 = Foreground256 (Just (T.ColorNumber 37))++color256_f_38 :: Foreground256+color256_f_38 = Foreground256 (Just (T.ColorNumber 38))++color256_f_39 :: Foreground256+color256_f_39 = Foreground256 (Just (T.ColorNumber 39))++color256_f_40 :: Foreground256+color256_f_40 = Foreground256 (Just (T.ColorNumber 40))++color256_f_41 :: Foreground256+color256_f_41 = Foreground256 (Just (T.ColorNumber 41))++color256_f_42 :: Foreground256+color256_f_42 = Foreground256 (Just (T.ColorNumber 42))++color256_f_43 :: Foreground256+color256_f_43 = Foreground256 (Just (T.ColorNumber 43))++color256_f_44 :: Foreground256+color256_f_44 = Foreground256 (Just (T.ColorNumber 44))++color256_f_45 :: Foreground256+color256_f_45 = Foreground256 (Just (T.ColorNumber 45))++color256_f_46 :: Foreground256+color256_f_46 = Foreground256 (Just (T.ColorNumber 46))++color256_f_47 :: Foreground256+color256_f_47 = Foreground256 (Just (T.ColorNumber 47))++color256_f_48 :: Foreground256+color256_f_48 = Foreground256 (Just (T.ColorNumber 48))++color256_f_49 :: Foreground256+color256_f_49 = Foreground256 (Just (T.ColorNumber 49))++color256_f_50 :: Foreground256+color256_f_50 = Foreground256 (Just (T.ColorNumber 50))++color256_f_51 :: Foreground256+color256_f_51 = Foreground256 (Just (T.ColorNumber 51))++color256_f_52 :: Foreground256+color256_f_52 = Foreground256 (Just (T.ColorNumber 52))++color256_f_53 :: Foreground256+color256_f_53 = Foreground256 (Just (T.ColorNumber 53))++color256_f_54 :: Foreground256+color256_f_54 = Foreground256 (Just (T.ColorNumber 54))++color256_f_55 :: Foreground256+color256_f_55 = Foreground256 (Just (T.ColorNumber 55))++color256_f_56 :: Foreground256+color256_f_56 = Foreground256 (Just (T.ColorNumber 56))++color256_f_57 :: Foreground256+color256_f_57 = Foreground256 (Just (T.ColorNumber 57))++color256_f_58 :: Foreground256+color256_f_58 = Foreground256 (Just (T.ColorNumber 58))++color256_f_59 :: Foreground256+color256_f_59 = Foreground256 (Just (T.ColorNumber 59))++color256_f_60 :: Foreground256+color256_f_60 = Foreground256 (Just (T.ColorNumber 60))++color256_f_61 :: Foreground256+color256_f_61 = Foreground256 (Just (T.ColorNumber 61))++color256_f_62 :: Foreground256+color256_f_62 = Foreground256 (Just (T.ColorNumber 62))++color256_f_63 :: Foreground256+color256_f_63 = Foreground256 (Just (T.ColorNumber 63))++color256_f_64 :: Foreground256+color256_f_64 = Foreground256 (Just (T.ColorNumber 64))++color256_f_65 :: Foreground256+color256_f_65 = Foreground256 (Just (T.ColorNumber 65))++color256_f_66 :: Foreground256+color256_f_66 = Foreground256 (Just (T.ColorNumber 66))++color256_f_67 :: Foreground256+color256_f_67 = Foreground256 (Just (T.ColorNumber 67))++color256_f_68 :: Foreground256+color256_f_68 = Foreground256 (Just (T.ColorNumber 68))++color256_f_69 :: Foreground256+color256_f_69 = Foreground256 (Just (T.ColorNumber 69))++color256_f_70 :: Foreground256+color256_f_70 = Foreground256 (Just (T.ColorNumber 70))++color256_f_71 :: Foreground256+color256_f_71 = Foreground256 (Just (T.ColorNumber 71))++color256_f_72 :: Foreground256+color256_f_72 = Foreground256 (Just (T.ColorNumber 72))++color256_f_73 :: Foreground256+color256_f_73 = Foreground256 (Just (T.ColorNumber 73))++color256_f_74 :: Foreground256+color256_f_74 = Foreground256 (Just (T.ColorNumber 74))++color256_f_75 :: Foreground256+color256_f_75 = Foreground256 (Just (T.ColorNumber 75))++color256_f_76 :: Foreground256+color256_f_76 = Foreground256 (Just (T.ColorNumber 76))++color256_f_77 :: Foreground256+color256_f_77 = Foreground256 (Just (T.ColorNumber 77))++color256_f_78 :: Foreground256+color256_f_78 = Foreground256 (Just (T.ColorNumber 78))++color256_f_79 :: Foreground256+color256_f_79 = Foreground256 (Just (T.ColorNumber 79))++color256_f_80 :: Foreground256+color256_f_80 = Foreground256 (Just (T.ColorNumber 80))++color256_f_81 :: Foreground256+color256_f_81 = Foreground256 (Just (T.ColorNumber 81))++color256_f_82 :: Foreground256+color256_f_82 = Foreground256 (Just (T.ColorNumber 82))++color256_f_83 :: Foreground256+color256_f_83 = Foreground256 (Just (T.ColorNumber 83))++color256_f_84 :: Foreground256+color256_f_84 = Foreground256 (Just (T.ColorNumber 84))++color256_f_85 :: Foreground256+color256_f_85 = Foreground256 (Just (T.ColorNumber 85))++color256_f_86 :: Foreground256+color256_f_86 = Foreground256 (Just (T.ColorNumber 86))++color256_f_87 :: Foreground256+color256_f_87 = Foreground256 (Just (T.ColorNumber 87))++color256_f_88 :: Foreground256+color256_f_88 = Foreground256 (Just (T.ColorNumber 88))++color256_f_89 :: Foreground256+color256_f_89 = Foreground256 (Just (T.ColorNumber 89))++color256_f_90 :: Foreground256+color256_f_90 = Foreground256 (Just (T.ColorNumber 90))++color256_f_91 :: Foreground256+color256_f_91 = Foreground256 (Just (T.ColorNumber 91))++color256_f_92 :: Foreground256+color256_f_92 = Foreground256 (Just (T.ColorNumber 92))++color256_f_93 :: Foreground256+color256_f_93 = Foreground256 (Just (T.ColorNumber 93))++color256_f_94 :: Foreground256+color256_f_94 = Foreground256 (Just (T.ColorNumber 94))++color256_f_95 :: Foreground256+color256_f_95 = Foreground256 (Just (T.ColorNumber 95))++color256_f_96 :: Foreground256+color256_f_96 = Foreground256 (Just (T.ColorNumber 96))++color256_f_97 :: Foreground256+color256_f_97 = Foreground256 (Just (T.ColorNumber 97))++color256_f_98 :: Foreground256+color256_f_98 = Foreground256 (Just (T.ColorNumber 98))++color256_f_99 :: Foreground256+color256_f_99 = Foreground256 (Just (T.ColorNumber 99))++color256_f_100 :: Foreground256+color256_f_100 = Foreground256 (Just (T.ColorNumber 100))++color256_f_101 :: Foreground256+color256_f_101 = Foreground256 (Just (T.ColorNumber 101))++color256_f_102 :: Foreground256+color256_f_102 = Foreground256 (Just (T.ColorNumber 102))++color256_f_103 :: Foreground256+color256_f_103 = Foreground256 (Just (T.ColorNumber 103))++color256_f_104 :: Foreground256+color256_f_104 = Foreground256 (Just (T.ColorNumber 104))++color256_f_105 :: Foreground256+color256_f_105 = Foreground256 (Just (T.ColorNumber 105))++color256_f_106 :: Foreground256+color256_f_106 = Foreground256 (Just (T.ColorNumber 106))++color256_f_107 :: Foreground256+color256_f_107 = Foreground256 (Just (T.ColorNumber 107))++color256_f_108 :: Foreground256+color256_f_108 = Foreground256 (Just (T.ColorNumber 108))++color256_f_109 :: Foreground256+color256_f_109 = Foreground256 (Just (T.ColorNumber 109))++color256_f_110 :: Foreground256+color256_f_110 = Foreground256 (Just (T.ColorNumber 110))++color256_f_111 :: Foreground256+color256_f_111 = Foreground256 (Just (T.ColorNumber 111))++color256_f_112 :: Foreground256+color256_f_112 = Foreground256 (Just (T.ColorNumber 112))++color256_f_113 :: Foreground256+color256_f_113 = Foreground256 (Just (T.ColorNumber 113))++color256_f_114 :: Foreground256+color256_f_114 = Foreground256 (Just (T.ColorNumber 114))++color256_f_115 :: Foreground256+color256_f_115 = Foreground256 (Just (T.ColorNumber 115))++color256_f_116 :: Foreground256+color256_f_116 = Foreground256 (Just (T.ColorNumber 116))++color256_f_117 :: Foreground256+color256_f_117 = Foreground256 (Just (T.ColorNumber 117))++color256_f_118 :: Foreground256+color256_f_118 = Foreground256 (Just (T.ColorNumber 118))++color256_f_119 :: Foreground256+color256_f_119 = Foreground256 (Just (T.ColorNumber 119))++color256_f_120 :: Foreground256+color256_f_120 = Foreground256 (Just (T.ColorNumber 120))++color256_f_121 :: Foreground256+color256_f_121 = Foreground256 (Just (T.ColorNumber 121))++color256_f_122 :: Foreground256+color256_f_122 = Foreground256 (Just (T.ColorNumber 122))++color256_f_123 :: Foreground256+color256_f_123 = Foreground256 (Just (T.ColorNumber 123))++color256_f_124 :: Foreground256+color256_f_124 = Foreground256 (Just (T.ColorNumber 124))++color256_f_125 :: Foreground256+color256_f_125 = Foreground256 (Just (T.ColorNumber 125))++color256_f_126 :: Foreground256+color256_f_126 = Foreground256 (Just (T.ColorNumber 126))++color256_f_127 :: Foreground256+color256_f_127 = Foreground256 (Just (T.ColorNumber 127))++color256_f_128 :: Foreground256+color256_f_128 = Foreground256 (Just (T.ColorNumber 128))++color256_f_129 :: Foreground256+color256_f_129 = Foreground256 (Just (T.ColorNumber 129))++color256_f_130 :: Foreground256+color256_f_130 = Foreground256 (Just (T.ColorNumber 130))++color256_f_131 :: Foreground256+color256_f_131 = Foreground256 (Just (T.ColorNumber 131))++color256_f_132 :: Foreground256+color256_f_132 = Foreground256 (Just (T.ColorNumber 132))++color256_f_133 :: Foreground256+color256_f_133 = Foreground256 (Just (T.ColorNumber 133))++color256_f_134 :: Foreground256+color256_f_134 = Foreground256 (Just (T.ColorNumber 134))++color256_f_135 :: Foreground256+color256_f_135 = Foreground256 (Just (T.ColorNumber 135))++color256_f_136 :: Foreground256+color256_f_136 = Foreground256 (Just (T.ColorNumber 136))++color256_f_137 :: Foreground256+color256_f_137 = Foreground256 (Just (T.ColorNumber 137))++color256_f_138 :: Foreground256+color256_f_138 = Foreground256 (Just (T.ColorNumber 138))++color256_f_139 :: Foreground256+color256_f_139 = Foreground256 (Just (T.ColorNumber 139))++color256_f_140 :: Foreground256+color256_f_140 = Foreground256 (Just (T.ColorNumber 140))++color256_f_141 :: Foreground256+color256_f_141 = Foreground256 (Just (T.ColorNumber 141))++color256_f_142 :: Foreground256+color256_f_142 = Foreground256 (Just (T.ColorNumber 142))++color256_f_143 :: Foreground256+color256_f_143 = Foreground256 (Just (T.ColorNumber 143))++color256_f_144 :: Foreground256+color256_f_144 = Foreground256 (Just (T.ColorNumber 144))++color256_f_145 :: Foreground256+color256_f_145 = Foreground256 (Just (T.ColorNumber 145))++color256_f_146 :: Foreground256+color256_f_146 = Foreground256 (Just (T.ColorNumber 146))++color256_f_147 :: Foreground256+color256_f_147 = Foreground256 (Just (T.ColorNumber 147))++color256_f_148 :: Foreground256+color256_f_148 = Foreground256 (Just (T.ColorNumber 148))++color256_f_149 :: Foreground256+color256_f_149 = Foreground256 (Just (T.ColorNumber 149))++color256_f_150 :: Foreground256+color256_f_150 = Foreground256 (Just (T.ColorNumber 150))++color256_f_151 :: Foreground256+color256_f_151 = Foreground256 (Just (T.ColorNumber 151))++color256_f_152 :: Foreground256+color256_f_152 = Foreground256 (Just (T.ColorNumber 152))++color256_f_153 :: Foreground256+color256_f_153 = Foreground256 (Just (T.ColorNumber 153))++color256_f_154 :: Foreground256+color256_f_154 = Foreground256 (Just (T.ColorNumber 154))++color256_f_155 :: Foreground256+color256_f_155 = Foreground256 (Just (T.ColorNumber 155))++color256_f_156 :: Foreground256+color256_f_156 = Foreground256 (Just (T.ColorNumber 156))++color256_f_157 :: Foreground256+color256_f_157 = Foreground256 (Just (T.ColorNumber 157))++color256_f_158 :: Foreground256+color256_f_158 = Foreground256 (Just (T.ColorNumber 158))++color256_f_159 :: Foreground256+color256_f_159 = Foreground256 (Just (T.ColorNumber 159))++color256_f_160 :: Foreground256+color256_f_160 = Foreground256 (Just (T.ColorNumber 160))++color256_f_161 :: Foreground256+color256_f_161 = Foreground256 (Just (T.ColorNumber 161))++color256_f_162 :: Foreground256+color256_f_162 = Foreground256 (Just (T.ColorNumber 162))++color256_f_163 :: Foreground256+color256_f_163 = Foreground256 (Just (T.ColorNumber 163))++color256_f_164 :: Foreground256+color256_f_164 = Foreground256 (Just (T.ColorNumber 164))++color256_f_165 :: Foreground256+color256_f_165 = Foreground256 (Just (T.ColorNumber 165))++color256_f_166 :: Foreground256+color256_f_166 = Foreground256 (Just (T.ColorNumber 166))++color256_f_167 :: Foreground256+color256_f_167 = Foreground256 (Just (T.ColorNumber 167))++color256_f_168 :: Foreground256+color256_f_168 = Foreground256 (Just (T.ColorNumber 168))++color256_f_169 :: Foreground256+color256_f_169 = Foreground256 (Just (T.ColorNumber 169))++color256_f_170 :: Foreground256+color256_f_170 = Foreground256 (Just (T.ColorNumber 170))++color256_f_171 :: Foreground256+color256_f_171 = Foreground256 (Just (T.ColorNumber 171))++color256_f_172 :: Foreground256+color256_f_172 = Foreground256 (Just (T.ColorNumber 172))++color256_f_173 :: Foreground256+color256_f_173 = Foreground256 (Just (T.ColorNumber 173))++color256_f_174 :: Foreground256+color256_f_174 = Foreground256 (Just (T.ColorNumber 174))++color256_f_175 :: Foreground256+color256_f_175 = Foreground256 (Just (T.ColorNumber 175))++color256_f_176 :: Foreground256+color256_f_176 = Foreground256 (Just (T.ColorNumber 176))++color256_f_177 :: Foreground256+color256_f_177 = Foreground256 (Just (T.ColorNumber 177))++color256_f_178 :: Foreground256+color256_f_178 = Foreground256 (Just (T.ColorNumber 178))++color256_f_179 :: Foreground256+color256_f_179 = Foreground256 (Just (T.ColorNumber 179))++color256_f_180 :: Foreground256+color256_f_180 = Foreground256 (Just (T.ColorNumber 180))++color256_f_181 :: Foreground256+color256_f_181 = Foreground256 (Just (T.ColorNumber 181))++color256_f_182 :: Foreground256+color256_f_182 = Foreground256 (Just (T.ColorNumber 182))++color256_f_183 :: Foreground256+color256_f_183 = Foreground256 (Just (T.ColorNumber 183))++color256_f_184 :: Foreground256+color256_f_184 = Foreground256 (Just (T.ColorNumber 184))++color256_f_185 :: Foreground256+color256_f_185 = Foreground256 (Just (T.ColorNumber 185))++color256_f_186 :: Foreground256+color256_f_186 = Foreground256 (Just (T.ColorNumber 186))++color256_f_187 :: Foreground256+color256_f_187 = Foreground256 (Just (T.ColorNumber 187))++color256_f_188 :: Foreground256+color256_f_188 = Foreground256 (Just (T.ColorNumber 188))++color256_f_189 :: Foreground256+color256_f_189 = Foreground256 (Just (T.ColorNumber 189))++color256_f_190 :: Foreground256+color256_f_190 = Foreground256 (Just (T.ColorNumber 190))++color256_f_191 :: Foreground256+color256_f_191 = Foreground256 (Just (T.ColorNumber 191))++color256_f_192 :: Foreground256+color256_f_192 = Foreground256 (Just (T.ColorNumber 192))++color256_f_193 :: Foreground256+color256_f_193 = Foreground256 (Just (T.ColorNumber 193))++color256_f_194 :: Foreground256+color256_f_194 = Foreground256 (Just (T.ColorNumber 194))++color256_f_195 :: Foreground256+color256_f_195 = Foreground256 (Just (T.ColorNumber 195))++color256_f_196 :: Foreground256+color256_f_196 = Foreground256 (Just (T.ColorNumber 196))++color256_f_197 :: Foreground256+color256_f_197 = Foreground256 (Just (T.ColorNumber 197))++color256_f_198 :: Foreground256+color256_f_198 = Foreground256 (Just (T.ColorNumber 198))++color256_f_199 :: Foreground256+color256_f_199 = Foreground256 (Just (T.ColorNumber 199))++color256_f_200 :: Foreground256+color256_f_200 = Foreground256 (Just (T.ColorNumber 200))++color256_f_201 :: Foreground256+color256_f_201 = Foreground256 (Just (T.ColorNumber 201))++color256_f_202 :: Foreground256+color256_f_202 = Foreground256 (Just (T.ColorNumber 202))++color256_f_203 :: Foreground256+color256_f_203 = Foreground256 (Just (T.ColorNumber 203))++color256_f_204 :: Foreground256+color256_f_204 = Foreground256 (Just (T.ColorNumber 204))++color256_f_205 :: Foreground256+color256_f_205 = Foreground256 (Just (T.ColorNumber 205))++color256_f_206 :: Foreground256+color256_f_206 = Foreground256 (Just (T.ColorNumber 206))++color256_f_207 :: Foreground256+color256_f_207 = Foreground256 (Just (T.ColorNumber 207))++color256_f_208 :: Foreground256+color256_f_208 = Foreground256 (Just (T.ColorNumber 208))++color256_f_209 :: Foreground256+color256_f_209 = Foreground256 (Just (T.ColorNumber 209))++color256_f_210 :: Foreground256+color256_f_210 = Foreground256 (Just (T.ColorNumber 210))++color256_f_211 :: Foreground256+color256_f_211 = Foreground256 (Just (T.ColorNumber 211))++color256_f_212 :: Foreground256+color256_f_212 = Foreground256 (Just (T.ColorNumber 212))++color256_f_213 :: Foreground256+color256_f_213 = Foreground256 (Just (T.ColorNumber 213))++color256_f_214 :: Foreground256+color256_f_214 = Foreground256 (Just (T.ColorNumber 214))++color256_f_215 :: Foreground256+color256_f_215 = Foreground256 (Just (T.ColorNumber 215))++color256_f_216 :: Foreground256+color256_f_216 = Foreground256 (Just (T.ColorNumber 216))++color256_f_217 :: Foreground256+color256_f_217 = Foreground256 (Just (T.ColorNumber 217))++color256_f_218 :: Foreground256+color256_f_218 = Foreground256 (Just (T.ColorNumber 218))++color256_f_219 :: Foreground256+color256_f_219 = Foreground256 (Just (T.ColorNumber 219))++color256_f_220 :: Foreground256+color256_f_220 = Foreground256 (Just (T.ColorNumber 220))++color256_f_221 :: Foreground256+color256_f_221 = Foreground256 (Just (T.ColorNumber 221))++color256_f_222 :: Foreground256+color256_f_222 = Foreground256 (Just (T.ColorNumber 222))++color256_f_223 :: Foreground256+color256_f_223 = Foreground256 (Just (T.ColorNumber 223))++color256_f_224 :: Foreground256+color256_f_224 = Foreground256 (Just (T.ColorNumber 224))++color256_f_225 :: Foreground256+color256_f_225 = Foreground256 (Just (T.ColorNumber 225))++color256_f_226 :: Foreground256+color256_f_226 = Foreground256 (Just (T.ColorNumber 226))++color256_f_227 :: Foreground256+color256_f_227 = Foreground256 (Just (T.ColorNumber 227))++color256_f_228 :: Foreground256+color256_f_228 = Foreground256 (Just (T.ColorNumber 228))++color256_f_229 :: Foreground256+color256_f_229 = Foreground256 (Just (T.ColorNumber 229))++color256_f_230 :: Foreground256+color256_f_230 = Foreground256 (Just (T.ColorNumber 230))++color256_f_231 :: Foreground256+color256_f_231 = Foreground256 (Just (T.ColorNumber 231))++color256_f_232 :: Foreground256+color256_f_232 = Foreground256 (Just (T.ColorNumber 232))++color256_f_233 :: Foreground256+color256_f_233 = Foreground256 (Just (T.ColorNumber 233))++color256_f_234 :: Foreground256+color256_f_234 = Foreground256 (Just (T.ColorNumber 234))++color256_f_235 :: Foreground256+color256_f_235 = Foreground256 (Just (T.ColorNumber 235))++color256_f_236 :: Foreground256+color256_f_236 = Foreground256 (Just (T.ColorNumber 236))++color256_f_237 :: Foreground256+color256_f_237 = Foreground256 (Just (T.ColorNumber 237))++color256_f_238 :: Foreground256+color256_f_238 = Foreground256 (Just (T.ColorNumber 238))++color256_f_239 :: Foreground256+color256_f_239 = Foreground256 (Just (T.ColorNumber 239))++color256_f_240 :: Foreground256+color256_f_240 = Foreground256 (Just (T.ColorNumber 240))++color256_f_241 :: Foreground256+color256_f_241 = Foreground256 (Just (T.ColorNumber 241))++color256_f_242 :: Foreground256+color256_f_242 = Foreground256 (Just (T.ColorNumber 242))++color256_f_243 :: Foreground256+color256_f_243 = Foreground256 (Just (T.ColorNumber 243))++color256_f_244 :: Foreground256+color256_f_244 = Foreground256 (Just (T.ColorNumber 244))++color256_f_245 :: Foreground256+color256_f_245 = Foreground256 (Just (T.ColorNumber 245))++color256_f_246 :: Foreground256+color256_f_246 = Foreground256 (Just (T.ColorNumber 246))++color256_f_247 :: Foreground256+color256_f_247 = Foreground256 (Just (T.ColorNumber 247))++color256_f_248 :: Foreground256+color256_f_248 = Foreground256 (Just (T.ColorNumber 248))++color256_f_249 :: Foreground256+color256_f_249 = Foreground256 (Just (T.ColorNumber 249))++color256_f_250 :: Foreground256+color256_f_250 = Foreground256 (Just (T.ColorNumber 250))++color256_f_251 :: Foreground256+color256_f_251 = Foreground256 (Just (T.ColorNumber 251))++color256_f_252 :: Foreground256+color256_f_252 = Foreground256 (Just (T.ColorNumber 252))++color256_f_253 :: Foreground256+color256_f_253 = Foreground256 (Just (T.ColorNumber 253))++color256_f_254 :: Foreground256+color256_f_254 = Foreground256 (Just (T.ColorNumber 254))++color256_f_255 :: Foreground256+color256_f_255 = Foreground256 (Just (T.ColorNumber 255))++color256_b_default :: Background256+color256_b_default = Background256 Nothing++color256_b_0 :: Background256+color256_b_0 = Background256 (Just (T.ColorNumber 0))++color256_b_black :: Background256+color256_b_black = Background256 (Just (T.ColorNumber 0))++color256_b_1 :: Background256+color256_b_1 = Background256 (Just (T.ColorNumber 1))++color256_b_red :: Background256+color256_b_red = Background256 (Just (T.ColorNumber 1))++color256_b_2 :: Background256+color256_b_2 = Background256 (Just (T.ColorNumber 2))++color256_b_green :: Background256+color256_b_green = Background256 (Just (T.ColorNumber 2))++color256_b_3 :: Background256+color256_b_3 = Background256 (Just (T.ColorNumber 3))++color256_b_yellow :: Background256+color256_b_yellow = Background256 (Just (T.ColorNumber 3))++color256_b_4 :: Background256+color256_b_4 = Background256 (Just (T.ColorNumber 4))++color256_b_blue :: Background256+color256_b_blue = Background256 (Just (T.ColorNumber 4))++color256_b_5 :: Background256+color256_b_5 = Background256 (Just (T.ColorNumber 5))++color256_b_magenta :: Background256+color256_b_magenta = Background256 (Just (T.ColorNumber 5))++color256_b_6 :: Background256+color256_b_6 = Background256 (Just (T.ColorNumber 6))++color256_b_cyan :: Background256+color256_b_cyan = Background256 (Just (T.ColorNumber 6))++color256_b_7 :: Background256+color256_b_7 = Background256 (Just (T.ColorNumber 7))++color256_b_white :: Background256+color256_b_white = Background256 (Just (T.ColorNumber 7))++color256_b_8 :: Background256+color256_b_8 = Background256 (Just (T.ColorNumber 8))++color256_b_grey :: Background256+color256_b_grey = Background256 (Just (T.ColorNumber 8))++color256_b_9 :: Background256+color256_b_9 = Background256 (Just (T.ColorNumber 9))++color256_b_red_bright :: Background256+color256_b_red_bright = Background256 (Just (T.ColorNumber 9))++color256_b_10 :: Background256+color256_b_10 = Background256 (Just (T.ColorNumber 10))++color256_b_green_bright :: Background256+color256_b_green_bright = Background256 (Just (T.ColorNumber 10))++color256_b_11 :: Background256+color256_b_11 = Background256 (Just (T.ColorNumber 11))++color256_b_yellow_bright :: Background256+color256_b_yellow_bright = Background256 (Just (T.ColorNumber 11))++color256_b_12 :: Background256+color256_b_12 = Background256 (Just (T.ColorNumber 12))++color256_b_blue_bright :: Background256+color256_b_blue_bright = Background256 (Just (T.ColorNumber 12))++color256_b_13 :: Background256+color256_b_13 = Background256 (Just (T.ColorNumber 13))++color256_b_magenta_bright :: Background256+color256_b_magenta_bright = Background256 (Just (T.ColorNumber 13))++color256_b_14 :: Background256+color256_b_14 = Background256 (Just (T.ColorNumber 14))++color256_b_cyan_bright :: Background256+color256_b_cyan_bright = Background256 (Just (T.ColorNumber 14))++color256_b_15 :: Background256+color256_b_15 = Background256 (Just (T.ColorNumber 15))++color256_b_white_bright :: Background256+color256_b_white_bright = Background256 (Just (T.ColorNumber 15))++color256_b_16 :: Background256+color256_b_16 = Background256 (Just (T.ColorNumber 16))++color256_b_17 :: Background256+color256_b_17 = Background256 (Just (T.ColorNumber 17))++color256_b_18 :: Background256+color256_b_18 = Background256 (Just (T.ColorNumber 18))++color256_b_19 :: Background256+color256_b_19 = Background256 (Just (T.ColorNumber 19))++color256_b_20 :: Background256+color256_b_20 = Background256 (Just (T.ColorNumber 20))++color256_b_21 :: Background256+color256_b_21 = Background256 (Just (T.ColorNumber 21))++color256_b_22 :: Background256+color256_b_22 = Background256 (Just (T.ColorNumber 22))++color256_b_23 :: Background256+color256_b_23 = Background256 (Just (T.ColorNumber 23))++color256_b_24 :: Background256+color256_b_24 = Background256 (Just (T.ColorNumber 24))++color256_b_25 :: Background256+color256_b_25 = Background256 (Just (T.ColorNumber 25))++color256_b_26 :: Background256+color256_b_26 = Background256 (Just (T.ColorNumber 26))++color256_b_27 :: Background256+color256_b_27 = Background256 (Just (T.ColorNumber 27))++color256_b_28 :: Background256+color256_b_28 = Background256 (Just (T.ColorNumber 28))++color256_b_29 :: Background256+color256_b_29 = Background256 (Just (T.ColorNumber 29))++color256_b_30 :: Background256+color256_b_30 = Background256 (Just (T.ColorNumber 30))++color256_b_31 :: Background256+color256_b_31 = Background256 (Just (T.ColorNumber 31))++color256_b_32 :: Background256+color256_b_32 = Background256 (Just (T.ColorNumber 32))++color256_b_33 :: Background256+color256_b_33 = Background256 (Just (T.ColorNumber 33))++color256_b_34 :: Background256+color256_b_34 = Background256 (Just (T.ColorNumber 34))++color256_b_35 :: Background256+color256_b_35 = Background256 (Just (T.ColorNumber 35))++color256_b_36 :: Background256+color256_b_36 = Background256 (Just (T.ColorNumber 36))++color256_b_37 :: Background256+color256_b_37 = Background256 (Just (T.ColorNumber 37))++color256_b_38 :: Background256+color256_b_38 = Background256 (Just (T.ColorNumber 38))++color256_b_39 :: Background256+color256_b_39 = Background256 (Just (T.ColorNumber 39))++color256_b_40 :: Background256+color256_b_40 = Background256 (Just (T.ColorNumber 40))++color256_b_41 :: Background256+color256_b_41 = Background256 (Just (T.ColorNumber 41))++color256_b_42 :: Background256+color256_b_42 = Background256 (Just (T.ColorNumber 42))++color256_b_43 :: Background256+color256_b_43 = Background256 (Just (T.ColorNumber 43))++color256_b_44 :: Background256+color256_b_44 = Background256 (Just (T.ColorNumber 44))++color256_b_45 :: Background256+color256_b_45 = Background256 (Just (T.ColorNumber 45))++color256_b_46 :: Background256+color256_b_46 = Background256 (Just (T.ColorNumber 46))++color256_b_47 :: Background256+color256_b_47 = Background256 (Just (T.ColorNumber 47))++color256_b_48 :: Background256+color256_b_48 = Background256 (Just (T.ColorNumber 48))++color256_b_49 :: Background256+color256_b_49 = Background256 (Just (T.ColorNumber 49))++color256_b_50 :: Background256+color256_b_50 = Background256 (Just (T.ColorNumber 50))++color256_b_51 :: Background256+color256_b_51 = Background256 (Just (T.ColorNumber 51))++color256_b_52 :: Background256+color256_b_52 = Background256 (Just (T.ColorNumber 52))++color256_b_53 :: Background256+color256_b_53 = Background256 (Just (T.ColorNumber 53))++color256_b_54 :: Background256+color256_b_54 = Background256 (Just (T.ColorNumber 54))++color256_b_55 :: Background256+color256_b_55 = Background256 (Just (T.ColorNumber 55))++color256_b_56 :: Background256+color256_b_56 = Background256 (Just (T.ColorNumber 56))++color256_b_57 :: Background256+color256_b_57 = Background256 (Just (T.ColorNumber 57))++color256_b_58 :: Background256+color256_b_58 = Background256 (Just (T.ColorNumber 58))++color256_b_59 :: Background256+color256_b_59 = Background256 (Just (T.ColorNumber 59))++color256_b_60 :: Background256+color256_b_60 = Background256 (Just (T.ColorNumber 60))++color256_b_61 :: Background256+color256_b_61 = Background256 (Just (T.ColorNumber 61))++color256_b_62 :: Background256+color256_b_62 = Background256 (Just (T.ColorNumber 62))++color256_b_63 :: Background256+color256_b_63 = Background256 (Just (T.ColorNumber 63))++color256_b_64 :: Background256+color256_b_64 = Background256 (Just (T.ColorNumber 64))++color256_b_65 :: Background256+color256_b_65 = Background256 (Just (T.ColorNumber 65))++color256_b_66 :: Background256+color256_b_66 = Background256 (Just (T.ColorNumber 66))++color256_b_67 :: Background256+color256_b_67 = Background256 (Just (T.ColorNumber 67))++color256_b_68 :: Background256+color256_b_68 = Background256 (Just (T.ColorNumber 68))++color256_b_69 :: Background256+color256_b_69 = Background256 (Just (T.ColorNumber 69))++color256_b_70 :: Background256+color256_b_70 = Background256 (Just (T.ColorNumber 70))++color256_b_71 :: Background256+color256_b_71 = Background256 (Just (T.ColorNumber 71))++color256_b_72 :: Background256+color256_b_72 = Background256 (Just (T.ColorNumber 72))++color256_b_73 :: Background256+color256_b_73 = Background256 (Just (T.ColorNumber 73))++color256_b_74 :: Background256+color256_b_74 = Background256 (Just (T.ColorNumber 74))++color256_b_75 :: Background256+color256_b_75 = Background256 (Just (T.ColorNumber 75))++color256_b_76 :: Background256+color256_b_76 = Background256 (Just (T.ColorNumber 76))++color256_b_77 :: Background256+color256_b_77 = Background256 (Just (T.ColorNumber 77))++color256_b_78 :: Background256+color256_b_78 = Background256 (Just (T.ColorNumber 78))++color256_b_79 :: Background256+color256_b_79 = Background256 (Just (T.ColorNumber 79))++color256_b_80 :: Background256+color256_b_80 = Background256 (Just (T.ColorNumber 80))++color256_b_81 :: Background256+color256_b_81 = Background256 (Just (T.ColorNumber 81))++color256_b_82 :: Background256+color256_b_82 = Background256 (Just (T.ColorNumber 82))++color256_b_83 :: Background256+color256_b_83 = Background256 (Just (T.ColorNumber 83))++color256_b_84 :: Background256+color256_b_84 = Background256 (Just (T.ColorNumber 84))++color256_b_85 :: Background256+color256_b_85 = Background256 (Just (T.ColorNumber 85))++color256_b_86 :: Background256+color256_b_86 = Background256 (Just (T.ColorNumber 86))++color256_b_87 :: Background256+color256_b_87 = Background256 (Just (T.ColorNumber 87))++color256_b_88 :: Background256+color256_b_88 = Background256 (Just (T.ColorNumber 88))++color256_b_89 :: Background256+color256_b_89 = Background256 (Just (T.ColorNumber 89))++color256_b_90 :: Background256+color256_b_90 = Background256 (Just (T.ColorNumber 90))++color256_b_91 :: Background256+color256_b_91 = Background256 (Just (T.ColorNumber 91))++color256_b_92 :: Background256+color256_b_92 = Background256 (Just (T.ColorNumber 92))++color256_b_93 :: Background256+color256_b_93 = Background256 (Just (T.ColorNumber 93))++color256_b_94 :: Background256+color256_b_94 = Background256 (Just (T.ColorNumber 94))++color256_b_95 :: Background256+color256_b_95 = Background256 (Just (T.ColorNumber 95))++color256_b_96 :: Background256+color256_b_96 = Background256 (Just (T.ColorNumber 96))++color256_b_97 :: Background256+color256_b_97 = Background256 (Just (T.ColorNumber 97))++color256_b_98 :: Background256+color256_b_98 = Background256 (Just (T.ColorNumber 98))++color256_b_99 :: Background256+color256_b_99 = Background256 (Just (T.ColorNumber 99))++color256_b_100 :: Background256+color256_b_100 = Background256 (Just (T.ColorNumber 100))++color256_b_101 :: Background256+color256_b_101 = Background256 (Just (T.ColorNumber 101))++color256_b_102 :: Background256+color256_b_102 = Background256 (Just (T.ColorNumber 102))++color256_b_103 :: Background256+color256_b_103 = Background256 (Just (T.ColorNumber 103))++color256_b_104 :: Background256+color256_b_104 = Background256 (Just (T.ColorNumber 104))++color256_b_105 :: Background256+color256_b_105 = Background256 (Just (T.ColorNumber 105))++color256_b_106 :: Background256+color256_b_106 = Background256 (Just (T.ColorNumber 106))++color256_b_107 :: Background256+color256_b_107 = Background256 (Just (T.ColorNumber 107))++color256_b_108 :: Background256+color256_b_108 = Background256 (Just (T.ColorNumber 108))++color256_b_109 :: Background256+color256_b_109 = Background256 (Just (T.ColorNumber 109))++color256_b_110 :: Background256+color256_b_110 = Background256 (Just (T.ColorNumber 110))++color256_b_111 :: Background256+color256_b_111 = Background256 (Just (T.ColorNumber 111))++color256_b_112 :: Background256+color256_b_112 = Background256 (Just (T.ColorNumber 112))++color256_b_113 :: Background256+color256_b_113 = Background256 (Just (T.ColorNumber 113))++color256_b_114 :: Background256+color256_b_114 = Background256 (Just (T.ColorNumber 114))++color256_b_115 :: Background256+color256_b_115 = Background256 (Just (T.ColorNumber 115))++color256_b_116 :: Background256+color256_b_116 = Background256 (Just (T.ColorNumber 116))++color256_b_117 :: Background256+color256_b_117 = Background256 (Just (T.ColorNumber 117))++color256_b_118 :: Background256+color256_b_118 = Background256 (Just (T.ColorNumber 118))++color256_b_119 :: Background256+color256_b_119 = Background256 (Just (T.ColorNumber 119))++color256_b_120 :: Background256+color256_b_120 = Background256 (Just (T.ColorNumber 120))++color256_b_121 :: Background256+color256_b_121 = Background256 (Just (T.ColorNumber 121))++color256_b_122 :: Background256+color256_b_122 = Background256 (Just (T.ColorNumber 122))++color256_b_123 :: Background256+color256_b_123 = Background256 (Just (T.ColorNumber 123))++color256_b_124 :: Background256+color256_b_124 = Background256 (Just (T.ColorNumber 124))++color256_b_125 :: Background256+color256_b_125 = Background256 (Just (T.ColorNumber 125))++color256_b_126 :: Background256+color256_b_126 = Background256 (Just (T.ColorNumber 126))++color256_b_127 :: Background256+color256_b_127 = Background256 (Just (T.ColorNumber 127))++color256_b_128 :: Background256+color256_b_128 = Background256 (Just (T.ColorNumber 128))++color256_b_129 :: Background256+color256_b_129 = Background256 (Just (T.ColorNumber 129))++color256_b_130 :: Background256+color256_b_130 = Background256 (Just (T.ColorNumber 130))++color256_b_131 :: Background256+color256_b_131 = Background256 (Just (T.ColorNumber 131))++color256_b_132 :: Background256+color256_b_132 = Background256 (Just (T.ColorNumber 132))++color256_b_133 :: Background256+color256_b_133 = Background256 (Just (T.ColorNumber 133))++color256_b_134 :: Background256+color256_b_134 = Background256 (Just (T.ColorNumber 134))++color256_b_135 :: Background256+color256_b_135 = Background256 (Just (T.ColorNumber 135))++color256_b_136 :: Background256+color256_b_136 = Background256 (Just (T.ColorNumber 136))++color256_b_137 :: Background256+color256_b_137 = Background256 (Just (T.ColorNumber 137))++color256_b_138 :: Background256+color256_b_138 = Background256 (Just (T.ColorNumber 138))++color256_b_139 :: Background256+color256_b_139 = Background256 (Just (T.ColorNumber 139))++color256_b_140 :: Background256+color256_b_140 = Background256 (Just (T.ColorNumber 140))++color256_b_141 :: Background256+color256_b_141 = Background256 (Just (T.ColorNumber 141))++color256_b_142 :: Background256+color256_b_142 = Background256 (Just (T.ColorNumber 142))++color256_b_143 :: Background256+color256_b_143 = Background256 (Just (T.ColorNumber 143))++color256_b_144 :: Background256+color256_b_144 = Background256 (Just (T.ColorNumber 144))++color256_b_145 :: Background256+color256_b_145 = Background256 (Just (T.ColorNumber 145))++color256_b_146 :: Background256+color256_b_146 = Background256 (Just (T.ColorNumber 146))++color256_b_147 :: Background256+color256_b_147 = Background256 (Just (T.ColorNumber 147))++color256_b_148 :: Background256+color256_b_148 = Background256 (Just (T.ColorNumber 148))++color256_b_149 :: Background256+color256_b_149 = Background256 (Just (T.ColorNumber 149))++color256_b_150 :: Background256+color256_b_150 = Background256 (Just (T.ColorNumber 150))++color256_b_151 :: Background256+color256_b_151 = Background256 (Just (T.ColorNumber 151))++color256_b_152 :: Background256+color256_b_152 = Background256 (Just (T.ColorNumber 152))++color256_b_153 :: Background256+color256_b_153 = Background256 (Just (T.ColorNumber 153))++color256_b_154 :: Background256+color256_b_154 = Background256 (Just (T.ColorNumber 154))++color256_b_155 :: Background256+color256_b_155 = Background256 (Just (T.ColorNumber 155))++color256_b_156 :: Background256+color256_b_156 = Background256 (Just (T.ColorNumber 156))++color256_b_157 :: Background256+color256_b_157 = Background256 (Just (T.ColorNumber 157))++color256_b_158 :: Background256+color256_b_158 = Background256 (Just (T.ColorNumber 158))++color256_b_159 :: Background256+color256_b_159 = Background256 (Just (T.ColorNumber 159))++color256_b_160 :: Background256+color256_b_160 = Background256 (Just (T.ColorNumber 160))++color256_b_161 :: Background256+color256_b_161 = Background256 (Just (T.ColorNumber 161))++color256_b_162 :: Background256+color256_b_162 = Background256 (Just (T.ColorNumber 162))++color256_b_163 :: Background256+color256_b_163 = Background256 (Just (T.ColorNumber 163))++color256_b_164 :: Background256+color256_b_164 = Background256 (Just (T.ColorNumber 164))++color256_b_165 :: Background256+color256_b_165 = Background256 (Just (T.ColorNumber 165))++color256_b_166 :: Background256+color256_b_166 = Background256 (Just (T.ColorNumber 166))++color256_b_167 :: Background256+color256_b_167 = Background256 (Just (T.ColorNumber 167))++color256_b_168 :: Background256+color256_b_168 = Background256 (Just (T.ColorNumber 168))++color256_b_169 :: Background256+color256_b_169 = Background256 (Just (T.ColorNumber 169))++color256_b_170 :: Background256+color256_b_170 = Background256 (Just (T.ColorNumber 170))++color256_b_171 :: Background256+color256_b_171 = Background256 (Just (T.ColorNumber 171))++color256_b_172 :: Background256+color256_b_172 = Background256 (Just (T.ColorNumber 172))++color256_b_173 :: Background256+color256_b_173 = Background256 (Just (T.ColorNumber 173))++color256_b_174 :: Background256+color256_b_174 = Background256 (Just (T.ColorNumber 174))++color256_b_175 :: Background256+color256_b_175 = Background256 (Just (T.ColorNumber 175))++color256_b_176 :: Background256+color256_b_176 = Background256 (Just (T.ColorNumber 176))++color256_b_177 :: Background256+color256_b_177 = Background256 (Just (T.ColorNumber 177))++color256_b_178 :: Background256+color256_b_178 = Background256 (Just (T.ColorNumber 178))++color256_b_179 :: Background256+color256_b_179 = Background256 (Just (T.ColorNumber 179))++color256_b_180 :: Background256+color256_b_180 = Background256 (Just (T.ColorNumber 180))++color256_b_181 :: Background256+color256_b_181 = Background256 (Just (T.ColorNumber 181))++color256_b_182 :: Background256+color256_b_182 = Background256 (Just (T.ColorNumber 182))++color256_b_183 :: Background256+color256_b_183 = Background256 (Just (T.ColorNumber 183))++color256_b_184 :: Background256+color256_b_184 = Background256 (Just (T.ColorNumber 184))++color256_b_185 :: Background256+color256_b_185 = Background256 (Just (T.ColorNumber 185))++color256_b_186 :: Background256+color256_b_186 = Background256 (Just (T.ColorNumber 186))++color256_b_187 :: Background256+color256_b_187 = Background256 (Just (T.ColorNumber 187))++color256_b_188 :: Background256+color256_b_188 = Background256 (Just (T.ColorNumber 188))++color256_b_189 :: Background256+color256_b_189 = Background256 (Just (T.ColorNumber 189))++color256_b_190 :: Background256+color256_b_190 = Background256 (Just (T.ColorNumber 190))++color256_b_191 :: Background256+color256_b_191 = Background256 (Just (T.ColorNumber 191))++color256_b_192 :: Background256+color256_b_192 = Background256 (Just (T.ColorNumber 192))++color256_b_193 :: Background256+color256_b_193 = Background256 (Just (T.ColorNumber 193))++color256_b_194 :: Background256+color256_b_194 = Background256 (Just (T.ColorNumber 194))++color256_b_195 :: Background256+color256_b_195 = Background256 (Just (T.ColorNumber 195))++color256_b_196 :: Background256+color256_b_196 = Background256 (Just (T.ColorNumber 196))++color256_b_197 :: Background256+color256_b_197 = Background256 (Just (T.ColorNumber 197))++color256_b_198 :: Background256+color256_b_198 = Background256 (Just (T.ColorNumber 198))++color256_b_199 :: Background256+color256_b_199 = Background256 (Just (T.ColorNumber 199))++color256_b_200 :: Background256+color256_b_200 = Background256 (Just (T.ColorNumber 200))++color256_b_201 :: Background256+color256_b_201 = Background256 (Just (T.ColorNumber 201))++color256_b_202 :: Background256+color256_b_202 = Background256 (Just (T.ColorNumber 202))++color256_b_203 :: Background256+color256_b_203 = Background256 (Just (T.ColorNumber 203))++color256_b_204 :: Background256+color256_b_204 = Background256 (Just (T.ColorNumber 204))++color256_b_205 :: Background256+color256_b_205 = Background256 (Just (T.ColorNumber 205))++color256_b_206 :: Background256+color256_b_206 = Background256 (Just (T.ColorNumber 206))++color256_b_207 :: Background256+color256_b_207 = Background256 (Just (T.ColorNumber 207))++color256_b_208 :: Background256+color256_b_208 = Background256 (Just (T.ColorNumber 208))++color256_b_209 :: Background256+color256_b_209 = Background256 (Just (T.ColorNumber 209))++color256_b_210 :: Background256+color256_b_210 = Background256 (Just (T.ColorNumber 210))++color256_b_211 :: Background256+color256_b_211 = Background256 (Just (T.ColorNumber 211))++color256_b_212 :: Background256+color256_b_212 = Background256 (Just (T.ColorNumber 212))++color256_b_213 :: Background256+color256_b_213 = Background256 (Just (T.ColorNumber 213))++color256_b_214 :: Background256+color256_b_214 = Background256 (Just (T.ColorNumber 214))++color256_b_215 :: Background256+color256_b_215 = Background256 (Just (T.ColorNumber 215))++color256_b_216 :: Background256+color256_b_216 = Background256 (Just (T.ColorNumber 216))++color256_b_217 :: Background256+color256_b_217 = Background256 (Just (T.ColorNumber 217))++color256_b_218 :: Background256+color256_b_218 = Background256 (Just (T.ColorNumber 218))++color256_b_219 :: Background256+color256_b_219 = Background256 (Just (T.ColorNumber 219))++color256_b_220 :: Background256+color256_b_220 = Background256 (Just (T.ColorNumber 220))++color256_b_221 :: Background256+color256_b_221 = Background256 (Just (T.ColorNumber 221))++color256_b_222 :: Background256+color256_b_222 = Background256 (Just (T.ColorNumber 222))++color256_b_223 :: Background256+color256_b_223 = Background256 (Just (T.ColorNumber 223))++color256_b_224 :: Background256+color256_b_224 = Background256 (Just (T.ColorNumber 224))++color256_b_225 :: Background256+color256_b_225 = Background256 (Just (T.ColorNumber 225))++color256_b_226 :: Background256+color256_b_226 = Background256 (Just (T.ColorNumber 226))++color256_b_227 :: Background256+color256_b_227 = Background256 (Just (T.ColorNumber 227))++color256_b_228 :: Background256+color256_b_228 = Background256 (Just (T.ColorNumber 228))++color256_b_229 :: Background256+color256_b_229 = Background256 (Just (T.ColorNumber 229))++color256_b_230 :: Background256+color256_b_230 = Background256 (Just (T.ColorNumber 230))++color256_b_231 :: Background256+color256_b_231 = Background256 (Just (T.ColorNumber 231))++color256_b_232 :: Background256+color256_b_232 = Background256 (Just (T.ColorNumber 232))++color256_b_233 :: Background256+color256_b_233 = Background256 (Just (T.ColorNumber 233))++color256_b_234 :: Background256+color256_b_234 = Background256 (Just (T.ColorNumber 234))++color256_b_235 :: Background256+color256_b_235 = Background256 (Just (T.ColorNumber 235))++color256_b_236 :: Background256+color256_b_236 = Background256 (Just (T.ColorNumber 236))++color256_b_237 :: Background256+color256_b_237 = Background256 (Just (T.ColorNumber 237))++color256_b_238 :: Background256+color256_b_238 = Background256 (Just (T.ColorNumber 238))++color256_b_239 :: Background256+color256_b_239 = Background256 (Just (T.ColorNumber 239))++color256_b_240 :: Background256+color256_b_240 = Background256 (Just (T.ColorNumber 240))++color256_b_241 :: Background256+color256_b_241 = Background256 (Just (T.ColorNumber 241))++color256_b_242 :: Background256+color256_b_242 = Background256 (Just (T.ColorNumber 242))++color256_b_243 :: Background256+color256_b_243 = Background256 (Just (T.ColorNumber 243))++color256_b_244 :: Background256+color256_b_244 = Background256 (Just (T.ColorNumber 244))++color256_b_245 :: Background256+color256_b_245 = Background256 (Just (T.ColorNumber 245))++color256_b_246 :: Background256+color256_b_246 = Background256 (Just (T.ColorNumber 246))++color256_b_247 :: Background256+color256_b_247 = Background256 (Just (T.ColorNumber 247))++color256_b_248 :: Background256+color256_b_248 = Background256 (Just (T.ColorNumber 248))++color256_b_249 :: Background256+color256_b_249 = Background256 (Just (T.ColorNumber 249))++color256_b_250 :: Background256+color256_b_250 = Background256 (Just (T.ColorNumber 250))++color256_b_251 :: Background256+color256_b_251 = Background256 (Just (T.ColorNumber 251))++color256_b_252 :: Background256+color256_b_252 = Background256 (Just (T.ColorNumber 252))++color256_b_253 :: Background256+color256_b_253 = Background256 (Just (T.ColorNumber 253))++color256_b_254 :: Background256+color256_b_254 = Background256 (Just (T.ColorNumber 254))++color256_b_255 :: Background256+color256_b_255 = Background256 (Just (T.ColorNumber 255))+

@@ -0,0 +1,32 @@+name:                rainbow+version:             0.2.0.0+synopsis:            Print text to terminal with colors and effects+description:+  rainbow helps you print Text chunks to a terminal with colors and effects+  such as bold, underlining, etc. You pair each Text with a description+  of how it should appear. Rainbow works with both 8-color and 256-color+  terminals.+homepage:            http://github.com/massysett/rainbow+license:             BSD3+license-file:        LICENSE+author:              Omari Norman+maintainer:          omari@smileystation.com+copyright:           2013 Omari Norman+category:            System+build-type:          Simple+cabal-version:       >=1.8++source-repository head+    type: git+    location: git://github.com/massysett/rainbow.git++library+  exposed-modules:+      System.Console.Rainbow++  build-depends:+      base ==4.6.*+    , terminfo ==0.3.*+    , text ==0.11.*++  ghc-options: -Wall