module Alignment where type Alignment = Double aTop :: Alignment aTop = Alignment 0 :: Alignment aBottom :: Alignment aBottom = Alignment 1 :: Alignment aLeft :: Alignment aLeft = Alignment 0 :: Alignment aRight :: Alignment aRight = Alignment 1 :: Alignment aCenter :: Alignment aCenter = Alignment 0.5 :: Alignment