Add source files, commit before reverting pictures to lists
This commit is contained in:
@@ -0,0 +1,21 @@
|
||||
module Rendering.Picture.Color
|
||||
where
|
||||
import Geometry.Data
|
||||
|
||||
type RGBA = (Float,Float,Float,Float)
|
||||
|
||||
black,red,green,blue,yellow,cyan,magenta,rose,violet,azure,aquamarine,chartreuse,orange,white::RGBA
|
||||
black = (0,0,0,1)
|
||||
red = (1,0,0,1)
|
||||
green = (0,1,0,1)
|
||||
blue = (0,0,1,1)
|
||||
yellow = (1,1,0,1)
|
||||
cyan = (0,1,1,1)
|
||||
magenta = (1,0,1,1)
|
||||
rose = (1,0,0.5,1)
|
||||
violet = (0.5,0,1,1)
|
||||
azure = (0,0.5,1,1)
|
||||
aquamarine= (0,1,0.5,1)
|
||||
chartreuse= (0.5,1,0,1)
|
||||
orange = (1,0.5,0,1)
|
||||
white = (1,1,1,1)
|
||||
Reference in New Issue
Block a user