module Costants where
import Canvas
import Graphics.Gloss
display :: Display
display = InWindow "Amaranth" (500, 500) (0,0)
background :: Color
background = white
initial :: Canvas
initial = Canvas {
items = []
, mode = Brush
}