module Text.HTML.Moe2.DSL.HTML where

import Text.HTML.Moe2.Element
import Text.HTML.Moe2.Type
import Prelude hiding (head)


a         :: MoeCombinator
body      :: MoeCombinator
br        :: LightCombinator
blockquote  :: MoeCombinator
code      :: MoeCombinator
colgroup  :: MoeCombinator
col       :: MoeCombinator
div       :: MoeCombinator
form      :: MoeCombinator
embed     :: MoeCombinator
em        :: MoeCombinator
h1        :: MoeCombinator
h2        :: MoeCombinator
h3        :: MoeCombinator
h4        :: MoeCombinator
h5        :: MoeCombinator
h6        :: MoeCombinator
head      :: MoeCombinator
html      :: MoeCombinator
hr        :: LightCombinator
img       :: LightCombinator
input     :: LightCombinator
label     :: MoeCombinator
li        :: MoeCombinator
link      :: LightCombinator
meta      :: LightCombinator
object    :: MoeCombinator
ol        :: MoeCombinator
param     :: MoeCombinator
ul        :: MoeCombinator
dl        :: MoeCombinator
dt        :: MoeCombinator
dd        :: MoeCombinator
option    :: MoeCombinator
p         :: MoeCombinator
pre       :: MoeCombinator
select    :: MoeCombinator
script    :: MoeCombinator
span      :: MoeCombinator
style     :: MoeCombinator
strong    :: MoeCombinator
table     :: MoeCombinator
textarea  :: MoeCombinator
td        :: MoeCombinator
th        :: MoeCombinator
title     :: MoeCombinator
tr        :: MoeCombinator



a          = e "a"
body       = e "body"
br         = sc "br"
blockquote  = e "blockquote"
code       = e "code"
colgroup   = e "colgroup"
col        = e "col"
div        = e "div"
embed      = e "embed"
em         = e "em"
form       = e "form"
h1         = e "h1"
h2         = e "h2"
h3         = e "h3"
h4         = e "h4"
h5         = e "h5"
h6         = e "h6"
head       = e "head"
html       = e "html"
hr         = sc "hr"
img        = sc "img"
input      = sc "input"
label      = e "label"
li         = e "li"
link       = sc "link"
meta       = sc "meta"
object     = e "object"
ol         = e "ol"
param      = e "param"
ul         = e "ul"
dl         = e "dl"
dt         = e "dt"
dd         = e "dd"
option     = e "option"
p          = e "p"
pre        = e "pre"
select     = e "select"
script     = e "script"
span       = e "span"
style      = e "style"
strong     = e "strong"
table      = e "table"
textarea   = ne "textarea"
td         = e "td"
th         = e "th"
title      = e "title"
tr         = e "tr"