Shpadoinkle.Html.Element

This module provides a DSL of HTML elements This DSL is entirely optional. You may use the Html constuctors provided by Shpadoinkle core and completely ignore this module. You can write your code h style and not use this module. But for those who like a typed DSL with named functions for different tags this is for you.

Each HTML element comes in 4 flavors. Delicous flavors. Plain (IE div), prime (IE div'), underscore (IE div_), and both (IE div_'). The following should hold

  x [] = x'
  flip x [] = x_
  x [] [] = x'_
  h "x" = x

So plain versions like div are for cases where we care about properties as well as children. `div\'' is for cases where we care about children but not properties. And div_ is for cases where we care about properties but not children.

Due to OverloadedStrings this yields a pleasent DSL

 div "foo" [ "hiya" ]
 > <div class="foo">hiya</div>

Documentation

body'_ :: Html m a

body' :: [(Text, Prop m a)] -> Html m a

body_ :: [Html m a] -> Html m a

body :: [(Text, Prop m a)] -> [Html m a] -> Html m a

html'_ :: Html m a

html' :: [(Text, Prop m a)] -> Html m a

html_ :: [Html m a] -> Html m a

html :: [(Text, Prop m a)] -> [Html m a] -> Html m a

param'_ :: Html m a

param' :: [(Text, Prop m a)] -> Html m a

param_ :: [Html m a] -> Html m a

param :: [(Text, Prop m a)] -> [Html m a] -> Html m a

object'_ :: Html m a

object' :: [(Text, Prop m a)] -> Html m a

object_ :: [Html m a] -> Html m a

object :: [(Text, Prop m a)] -> [Html m a] -> Html m a

embed'_ :: Html m a

embed' :: [(Text, Prop m a)] -> Html m a

embed_ :: [Html m a] -> Html m a

embed :: [(Text, Prop m a)] -> [Html m a] -> Html m a

applet'_ :: Html m a

applet' :: [(Text, Prop m a)] -> Html m a

applet_ :: [Html m a] -> Html m a

applet :: [(Text, Prop m a)] -> [Html m a] -> Html m a

noscript'_ :: Html m a

noscript' :: [(Text, Prop m a)] -> Html m a

noscript_ :: [Html m a] -> Html m a

noscript :: [(Text, Prop m a)] -> [Html m a] -> Html m a

script'_ :: Html m a

script' :: [(Text, Prop m a)] -> Html m a

script_ :: [Html m a] -> Html m a

script :: [(Text, Prop m a)] -> [Html m a] -> Html m a

basefont'_ :: Html m a

basefont' :: [(Text, Prop m a)] -> Html m a

basefont_ :: [Html m a] -> Html m a

basefont :: [(Text, Prop m a)] -> [Html m a] -> Html m a

base'_ :: Html m a

base' :: [(Text, Prop m a)] -> Html m a

base_ :: [Html m a] -> Html m a

base :: [(Text, Prop m a)] -> [Html m a] -> Html m a

meta'_ :: Html m a

meta' :: [(Text, Prop m a)] -> Html m a

meta_ :: [Html m a] -> Html m a

meta :: [(Text, Prop m a)] -> [Html m a] -> Html m a

head'_ :: Html m a

head' :: [(Text, Prop m a)] -> Html m a

head_ :: [Html m a] -> Html m a

head :: [(Text, Prop m a)] -> [Html m a] -> Html m a

summary'_ :: Html m a

summary' :: [(Text, Prop m a)] -> Html m a

summary_ :: [Html m a] -> Html m a

summary :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dialog'_ :: Html m a

dialog' :: [(Text, Prop m a)] -> Html m a

dialog_ :: [Html m a] -> Html m a

dialog :: [(Text, Prop m a)] -> [Html m a] -> Html m a

details'_ :: Html m a

details' :: [(Text, Prop m a)] -> Html m a

details_ :: [Html m a] -> Html m a

details :: [(Text, Prop m a)] -> [Html m a] -> Html m a

aside'_ :: Html m a

aside' :: [(Text, Prop m a)] -> Html m a

aside_ :: [Html m a] -> Html m a

aside :: [(Text, Prop m a)] -> [Html m a] -> Html m a

article'_ :: Html m a

article' :: [(Text, Prop m a)] -> Html m a

article_ :: [Html m a] -> Html m a

article :: [(Text, Prop m a)] -> [Html m a] -> Html m a

section'_ :: Html m a

section' :: [(Text, Prop m a)] -> Html m a

section_ :: [Html m a] -> Html m a

section :: [(Text, Prop m a)] -> [Html m a] -> Html m a

main'_ :: Html m a

main' :: [(Text, Prop m a)] -> Html m a

main_ :: [Html m a] -> Html m a

main :: [(Text, Prop m a)] -> [Html m a] -> Html m a

footer'_ :: Html m a

footer' :: [(Text, Prop m a)] -> Html m a

footer_ :: [Html m a] -> Html m a

footer :: [(Text, Prop m a)] -> [Html m a] -> Html m a

header'_ :: Html m a

header' :: [(Text, Prop m a)] -> Html m a

header_ :: [Html m a] -> Html m a

header :: [(Text, Prop m a)] -> [Html m a] -> Html m a

span'_ :: Html m a

span' :: [(Text, Prop m a)] -> Html m a

span_ :: [Html m a] -> Html m a

span :: [(Text, Prop m a)] -> [Html m a] -> Html m a

div'_ :: Html m a

div' :: [(Text, Prop m a)] -> Html m a

div_ :: [Html m a] -> Html m a

div :: [(Text, Prop m a)] -> [Html m a] -> Html m a

style'_ :: Html m a

style' :: [(Text, Prop m a)] -> Html m a

style_ :: [Html m a] -> Html m a

style :: [(Text, Prop m a)] -> [Html m a] -> Html m a

colgroup'_ :: Html m a

colgroup' :: [(Text, Prop m a)] -> Html m a

colgroup_ :: [Html m a] -> Html m a

colgroup :: [(Text, Prop m a)] -> [Html m a] -> Html m a

col'_ :: Html m a

col' :: [(Text, Prop m a)] -> Html m a

col_ :: [Html m a] -> Html m a

col :: [(Text, Prop m a)] -> [Html m a] -> Html m a

tfoot'_ :: Html m a

tfoot' :: [(Text, Prop m a)] -> Html m a

tfoot_ :: [Html m a] -> Html m a

tfoot :: [(Text, Prop m a)] -> [Html m a] -> Html m a

tbody'_ :: Html m a

tbody' :: [(Text, Prop m a)] -> Html m a

tbody_ :: [Html m a] -> Html m a

tbody :: [(Text, Prop m a)] -> [Html m a] -> Html m a

thead'_ :: Html m a

thead' :: [(Text, Prop m a)] -> Html m a

thead_ :: [Html m a] -> Html m a

thead :: [(Text, Prop m a)] -> [Html m a] -> Html m a

td'_ :: Html m a

td' :: [(Text, Prop m a)] -> Html m a

td_ :: [Html m a] -> Html m a

td :: [(Text, Prop m a)] -> [Html m a] -> Html m a

tr'_ :: Html m a

tr' :: [(Text, Prop m a)] -> Html m a

tr_ :: [Html m a] -> Html m a

tr :: [(Text, Prop m a)] -> [Html m a] -> Html m a

th'_ :: Html m a

th' :: [(Text, Prop m a)] -> Html m a

th_ :: [Html m a] -> Html m a

th :: [(Text, Prop m a)] -> [Html m a] -> Html m a

caption'_ :: Html m a

caption' :: [(Text, Prop m a)] -> Html m a

caption_ :: [Html m a] -> Html m a

caption :: [(Text, Prop m a)] -> [Html m a] -> Html m a

table'_ :: Html m a

table' :: [(Text, Prop m a)] -> Html m a

table_ :: [Html m a] -> Html m a

table :: [(Text, Prop m a)] -> [Html m a] -> Html m a

menuitem'_ :: Html m a

menuitem' :: [(Text, Prop m a)] -> Html m a

menuitem_ :: [Html m a] -> Html m a

menuitem :: [(Text, Prop m a)] -> [Html m a] -> Html m a

menu'_ :: Html m a

menu' :: [(Text, Prop m a)] -> Html m a

menu_ :: [Html m a] -> Html m a

menu :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dd'_ :: Html m a

dd' :: [(Text, Prop m a)] -> Html m a

dd_ :: [Html m a] -> Html m a

dd :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dt'_ :: Html m a

dt' :: [(Text, Prop m a)] -> Html m a

dt_ :: [Html m a] -> Html m a

dt :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dl'_ :: Html m a

dl' :: [(Text, Prop m a)] -> Html m a

dl_ :: [Html m a] -> Html m a

dl :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dir'_ :: Html m a

dir' :: [(Text, Prop m a)] -> Html m a

dir_ :: [Html m a] -> Html m a

dir :: [(Text, Prop m a)] -> [Html m a] -> Html m a

li'_ :: Html m a

li' :: [(Text, Prop m a)] -> Html m a

li_ :: [Html m a] -> Html m a

li :: [(Text, Prop m a)] -> [Html m a] -> Html m a

ol'_ :: Html m a

ol' :: [(Text, Prop m a)] -> Html m a

ol_ :: [Html m a] -> Html m a

ol :: [(Text, Prop m a)] -> [Html m a] -> Html m a

ul'_ :: Html m a

ul' :: [(Text, Prop m a)] -> Html m a

ul_ :: [Html m a] -> Html m a

ul :: [(Text, Prop m a)] -> [Html m a] -> Html m a

nav'_ :: Html m a

nav' :: [(Text, Prop m a)] -> Html m a

nav_ :: [Html m a] -> Html m a

nav :: [(Text, Prop m a)] -> [Html m a] -> Html m a

link'_ :: Html m a

link' :: [(Text, Prop m a)] -> Html m a

link_ :: [Html m a] -> Html m a

link :: [(Text, Prop m a)] -> [Html m a] -> Html m a

a'_ :: Html m a

a' :: [(Text, Prop m a)] -> Html m a

a_ :: [Html m a] -> Html m a

a :: [(Text, Prop m a)] -> [Html m a] -> Html m a

figure'_ :: Html m a

figure' :: [(Text, Prop m a)] -> Html m a

figure_ :: [Html m a] -> Html m a

figure :: [(Text, Prop m a)] -> [Html m a] -> Html m a

figcaption'_ :: Html m a

figcaption' :: [(Text, Prop m a)] -> Html m a

figcaption_ :: [Html m a] -> Html m a

figcaption :: [(Text, Prop m a)] -> [Html m a] -> Html m a

canvas'_ :: Html m a

canvas' :: [(Text, Prop m a)] -> Html m a

canvas_ :: [Html m a] -> Html m a

canvas :: [(Text, Prop m a)] -> [Html m a] -> Html m a

area'_ :: Html m a

area' :: [(Text, Prop m a)] -> Html m a

area_ :: [Html m a] -> Html m a

area :: [(Text, Prop m a)] -> [Html m a] -> Html m a

img'_ :: Html m a

img' :: [(Text, Prop m a)] -> Html m a

img_ :: [Html m a] -> Html m a

img :: [(Text, Prop m a)] -> [Html m a] -> Html m a

iframe'_ :: Html m a

iframe' :: [(Text, Prop m a)] -> Html m a

iframe_ :: [Html m a] -> Html m a

iframe :: [(Text, Prop m a)] -> [Html m a] -> Html m a

noframes'_ :: Html m a

noframes' :: [(Text, Prop m a)] -> Html m a

noframes_ :: [Html m a] -> Html m a

noframes :: [(Text, Prop m a)] -> [Html m a] -> Html m a

frameset'_ :: Html m a

frameset' :: [(Text, Prop m a)] -> Html m a

frameset_ :: [Html m a] -> Html m a

frameset :: [(Text, Prop m a)] -> [Html m a] -> Html m a

frame'_ :: Html m a

frame' :: [(Text, Prop m a)] -> Html m a

frame_ :: [Html m a] -> Html m a

frame :: [(Text, Prop m a)] -> [Html m a] -> Html m a

output'_ :: Html m a

output' :: [(Text, Prop m a)] -> Html m a

output_ :: [Html m a] -> Html m a

output :: [(Text, Prop m a)] -> [Html m a] -> Html m a

keygen'_ :: Html m a

keygen' :: [(Text, Prop m a)] -> Html m a

keygen_ :: [Html m a] -> Html m a

keygen :: [(Text, Prop m a)] -> [Html m a] -> Html m a

datalist'_ :: Html m a

datalist' :: [(Text, Prop m a)] -> Html m a

datalist_ :: [Html m a] -> Html m a

datalist :: [(Text, Prop m a)] -> [Html m a] -> Html m a

legend'_ :: Html m a

legend' :: [(Text, Prop m a)] -> Html m a

legend_ :: [Html m a] -> Html m a

legend :: [(Text, Prop m a)] -> [Html m a] -> Html m a

fieldset'_ :: Html m a

fieldset' :: [(Text, Prop m a)] -> Html m a

fieldset_ :: [Html m a] -> Html m a

fieldset :: [(Text, Prop m a)] -> [Html m a] -> Html m a

label'_ :: Html m a

label' :: [(Text, Prop m a)] -> Html m a

label_ :: [Html m a] -> Html m a

label :: [(Text, Prop m a)] -> [Html m a] -> Html m a

button'_ :: Html m a

button' :: [(Text, Prop m a)] -> Html m a

button_ :: [Html m a] -> Html m a

button :: [(Text, Prop m a)] -> [Html m a] -> Html m a

textarea'_ :: Html m a

textarea' :: [(Text, Prop m a)] -> Html m a

textarea_ :: [Html m a] -> Html m a

textarea :: [(Text, Prop m a)] -> [Html m a] -> Html m a

input'_ :: Html m a

input' :: [(Text, Prop m a)] -> Html m a

input_ :: [Html m a] -> Html m a

input :: [(Text, Prop m a)] -> [Html m a] -> Html m a

form'_ :: Html m a

form' :: [(Text, Prop m a)] -> Html m a

form_ :: [Html m a] -> Html m a

form :: [(Text, Prop m a)] -> [Html m a] -> Html m a

wbr'_ :: Html m a

wbr' :: [(Text, Prop m a)] -> Html m a

wbr_ :: [Html m a] -> Html m a

wbr :: [(Text, Prop m a)] -> [Html m a] -> Html m a

var'_ :: Html m a

var' :: [(Text, Prop m a)] -> Html m a

var_ :: [Html m a] -> Html m a

var :: [(Text, Prop m a)] -> [Html m a] -> Html m a

u'_ :: Html m a

u' :: [(Text, Prop m a)] -> Html m a

u_ :: [Html m a] -> Html m a

u :: [(Text, Prop m a)] -> [Html m a] -> Html m a

tt'_ :: Html m a

tt' :: [(Text, Prop m a)] -> Html m a

tt_ :: [Html m a] -> Html m a

tt :: [(Text, Prop m a)] -> [Html m a] -> Html m a

time'_ :: Html m a

time' :: [(Text, Prop m a)] -> Html m a

time_ :: [Html m a] -> Html m a

time :: [(Text, Prop m a)] -> [Html m a] -> Html m a

sup'_ :: Html m a

sup' :: [(Text, Prop m a)] -> Html m a

sup_ :: [Html m a] -> Html m a

sup :: [(Text, Prop m a)] -> [Html m a] -> Html m a

sub'_ :: Html m a

sub' :: [(Text, Prop m a)] -> Html m a

sub_ :: [Html m a] -> Html m a

sub :: [(Text, Prop m a)] -> [Html m a] -> Html m a

strong'_ :: Html m a

strong' :: [(Text, Prop m a)] -> Html m a

strong_ :: [Html m a] -> Html m a

strong :: [(Text, Prop m a)] -> [Html m a] -> Html m a

strike'_ :: Html m a

strike' :: [(Text, Prop m a)] -> Html m a

strike_ :: [Html m a] -> Html m a

strike :: [(Text, Prop m a)] -> [Html m a] -> Html m a

small'_ :: Html m a

small' :: [(Text, Prop m a)] -> Html m a

small_ :: [Html m a] -> Html m a

small :: [(Text, Prop m a)] -> [Html m a] -> Html m a

samp'_ :: Html m a

samp' :: [(Text, Prop m a)] -> Html m a

samp_ :: [Html m a] -> Html m a

samp :: [(Text, Prop m a)] -> [Html m a] -> Html m a

s'_ :: Html m a

s' :: [(Text, Prop m a)] -> Html m a

s_ :: [Html m a] -> Html m a

s :: [(Text, Prop m a)] -> [Html m a] -> Html m a

ruby'_ :: Html m a

ruby' :: [(Text, Prop m a)] -> Html m a

ruby_ :: [Html m a] -> Html m a

ruby :: [(Text, Prop m a)] -> [Html m a] -> Html m a

rt'_ :: Html m a

rt' :: [(Text, Prop m a)] -> Html m a

rt_ :: [Html m a] -> Html m a

rt :: [(Text, Prop m a)] -> [Html m a] -> Html m a

rp'_ :: Html m a

rp' :: [(Text, Prop m a)] -> Html m a

rp_ :: [Html m a] -> Html m a

rp :: [(Text, Prop m a)] -> [Html m a] -> Html m a

q'_ :: Html m a

q' :: [(Text, Prop m a)] -> Html m a

q_ :: [Html m a] -> Html m a

q :: [(Text, Prop m a)] -> [Html m a] -> Html m a

progress'_ :: Html m a

progress' :: [(Text, Prop m a)] -> Html m a

progress_ :: [Html m a] -> Html m a

progress :: [(Text, Prop m a)] -> [Html m a] -> Html m a

pre'_ :: Html m a

pre' :: [(Text, Prop m a)] -> Html m a

pre_ :: [Html m a] -> Html m a

pre :: [(Text, Prop m a)] -> [Html m a] -> Html m a

meter'_ :: Html m a

meter' :: [(Text, Prop m a)] -> Html m a

meter_ :: [Html m a] -> Html m a

meter :: [(Text, Prop m a)] -> [Html m a] -> Html m a

mark'_ :: Html m a

mark' :: [(Text, Prop m a)] -> Html m a

mark_ :: [Html m a] -> Html m a

mark :: [(Text, Prop m a)] -> [Html m a] -> Html m a

kbd'_ :: Html m a

kbd' :: [(Text, Prop m a)] -> Html m a

kbd_ :: [Html m a] -> Html m a

kbd :: [(Text, Prop m a)] -> [Html m a] -> Html m a

ins'_ :: Html m a

ins' :: [(Text, Prop m a)] -> Html m a

ins_ :: [Html m a] -> Html m a

ins :: [(Text, Prop m a)] -> [Html m a] -> Html m a

i'_ :: Html m a

i' :: [(Text, Prop m a)] -> Html m a

i_ :: [Html m a] -> Html m a

i :: [(Text, Prop m a)] -> [Html m a] -> Html m a

font'_ :: Html m a

font' :: [(Text, Prop m a)] -> Html m a

font_ :: [Html m a] -> Html m a

font :: [(Text, Prop m a)] -> [Html m a] -> Html m a

em'_ :: Html m a

em' :: [(Text, Prop m a)] -> Html m a

em_ :: [Html m a] -> Html m a

em :: [(Text, Prop m a)] -> [Html m a] -> Html m a

dfn'_ :: Html m a

dfn' :: [(Text, Prop m a)] -> Html m a

dfn_ :: [Html m a] -> Html m a

dfn :: [(Text, Prop m a)] -> [Html m a] -> Html m a

del'_ :: Html m a

del' :: [(Text, Prop m a)] -> Html m a

del_ :: [Html m a] -> Html m a

del :: [(Text, Prop m a)] -> [Html m a] -> Html m a

code'_ :: Html m a

code' :: [(Text, Prop m a)] -> Html m a

code_ :: [Html m a] -> Html m a

code :: [(Text, Prop m a)] -> [Html m a] -> Html m a

cite'_ :: Html m a

cite' :: [(Text, Prop m a)] -> Html m a

cite_ :: [Html m a] -> Html m a

cite :: [(Text, Prop m a)] -> [Html m a] -> Html m a

center'_ :: Html m a

center' :: [(Text, Prop m a)] -> Html m a

center_ :: [Html m a] -> Html m a

center :: [(Text, Prop m a)] -> [Html m a] -> Html m a

blockquote'_ :: Html m a

blockquote' :: [(Text, Prop m a)] -> Html m a

blockquote_ :: [Html m a] -> Html m a

blockquote :: [(Text, Prop m a)] -> [Html m a] -> Html m a

big'_ :: Html m a

big' :: [(Text, Prop m a)] -> Html m a

big_ :: [Html m a] -> Html m a

big :: [(Text, Prop m a)] -> [Html m a] -> Html m a

bdo'_ :: Html m a

bdo' :: [(Text, Prop m a)] -> Html m a

bdo_ :: [Html m a] -> Html m a

bdo :: [(Text, Prop m a)] -> [Html m a] -> Html m a

bdi'_ :: Html m a

bdi' :: [(Text, Prop m a)] -> Html m a

bdi_ :: [Html m a] -> Html m a

bdi :: [(Text, Prop m a)] -> [Html m a] -> Html m a

b'_ :: Html m a

b' :: [(Text, Prop m a)] -> Html m a

b_ :: [Html m a] -> Html m a

b :: [(Text, Prop m a)] -> [Html m a] -> Html m a

address'_ :: Html m a

address' :: [(Text, Prop m a)] -> Html m a

address_ :: [Html m a] -> Html m a

address :: [(Text, Prop m a)] -> [Html m a] -> Html m a

abbr'_ :: Html m a

abbr' :: [(Text, Prop m a)] -> Html m a

abbr_ :: [Html m a] -> Html m a

abbr :: [(Text, Prop m a)] -> [Html m a] -> Html m a

hr'_ :: Html m a

hr' :: [(Text, Prop m a)] -> Html m a

hr_ :: [Html m a] -> Html m a

hr :: [(Text, Prop m a)] -> [Html m a] -> Html m a

br'_ :: Html m a

br' :: [(Text, Prop m a)] -> Html m a

br_ :: [Html m a] -> Html m a

br :: [(Text, Prop m a)] -> [Html m a] -> Html m a

p'_ :: Html m a

p' :: [(Text, Prop m a)] -> Html m a

p_ :: [Html m a] -> Html m a

p :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h6'_ :: Html m a

h6' :: [(Text, Prop m a)] -> Html m a

h6_ :: [Html m a] -> Html m a

h6 :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h5'_ :: Html m a

h5' :: [(Text, Prop m a)] -> Html m a

h5_ :: [Html m a] -> Html m a

h5 :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h4'_ :: Html m a

h4' :: [(Text, Prop m a)] -> Html m a

h4_ :: [Html m a] -> Html m a

h4 :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h3'_ :: Html m a

h3' :: [(Text, Prop m a)] -> Html m a

h3_ :: [Html m a] -> Html m a

h3 :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h2'_ :: Html m a

h2' :: [(Text, Prop m a)] -> Html m a

h2_ :: [Html m a] -> Html m a

h2 :: [(Text, Prop m a)] -> [Html m a] -> Html m a

h1'_ :: Html m a

h1' :: [(Text, Prop m a)] -> Html m a

h1_ :: [Html m a] -> Html m a

h1 :: [(Text, Prop m a)] -> [Html m a] -> Html m a