{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ExtendedDefaultRules #-}

module Lucid.Foundation.Structure.Utils where

import qualified Data.Text as T
import Data.Monoid


clearfix_ :: T.Text
clearfix_ = " clearfix "

left_ :: T.Text
left_ = " left "

right_ :: T.Text
right_ = " right "


radius_ :: T.Text
radius_ = " radius "

round_ ::T.Text
round_ = " round "


text_left_ :: T.Text
text_left_ = " text-left "

text_right_ :: T.Text
text_right_ = " text-right "

text_center_ :: T.Text
text_center_ = " text-center "

text_justify_ :: T.Text
text_justify_ = " text-justify "


small_text_left_ :: T.Text
small_text_left_ = " small-text-left "

small_text_right_ :: T.Text
small_text_right_ = " small-text-right "

small_text_center_ :: T.Text
small_text_center_ = " small-text-center "

small_text_justify_ :: T.Text
small_text_justify_ = " small-text-justify "


medium_text_left_ :: T.Text
medium_text_left_ = " medium-text-left "

medium_text_right_ :: T.Text
medium_text_right_ = " medium-text-right "

medium_text_center_ :: T.Text
medium_text_center_ = " medium-text-center "

medium_text_justify_ :: T.Text
medium_text_justify_ = " medium-text-justify "


large_text_left_ :: T.Text
large_text_left_ = " large-text-left "

large_text_right_ :: T.Text
large_text_right_ = " large-text-right "

large_text_center_ :: T.Text
large_text_center_ = " large-text-center "

large_text_justify_ :: T.Text
large_text_justify_ = " large-text-justify "


xlarge_text_left_ :: T.Text
xlarge_text_left_ = " xlarge-text-left "

xlarge_text_right_ :: T.Text
xlarge_text_right_ = " xlarge-text-right "

xlarge_text_center_ :: T.Text
xlarge_text_center_ = " xlarge-text-center "

xlarge_text_justify_ :: T.Text
xlarge_text_justify_ = " xlarge-text-justify "


xxlarge_text_left_ :: T.Text
xxlarge_text_left_ = " xxlarge-text-left "

xxlarge_text_right_ :: T.Text
xxlarge_text_right_ = " xxlarge-text-right "

xxlarge_text_center_ :: T.Text
xxlarge_text_center_ = " xxlarge-text-center "

xxlarge_text_justify_ :: T.Text
xxlarge_text_justify_ = " xxlarge-text-justify "


hide_ :: T.Text
hide_ = " hide "