{-# LANGUAGE OverloadedStrings #-}
module Text.Blaze.Front.Html5
( module Text.Blaze.Front
, Html
, toHtml
, preEscapedToHtml
, docType
, docTypeHtml
, a
, abbr
, address
, area
, article
, aside
, audio
, b
, base
, bdo
, blockquote
, body
, br
, button
, canvas
, caption
, cite
, code
, col
, colgroup
, command
, datalist
, dd
, del
, details
, dfn
, div
, dl
, dt
, em
, embed
, fieldset
, figcaption
, figure
, footer
, form
, h1
, h2
, h3
, h4
, h5
, h6
, head
, header
, hgroup
, hr
, html
, i
, iframe
, img
, input
, ins
, kbd
, keygen
, label
, legend
, li
, link
, map
, mark
, menu
, menuitem
, meta
, meter
, nav
, noscript
, object
, ol
, optgroup
, option
, output
, p
, param
, pre
, progress
, q
, rp
, rt
, ruby
, samp
, script
, section
, select
, small
, source
, span
, strong
, style
, sub
, summary
, sup
, svg
, table
, tbody
, td
, textarea
, tfoot
, th
, thead
, time
, title
, tr
, track
, ul
, var
, video
, wbr
) where
import Prelude ((>>), (.))
import Text.Blaze.Front
import Text.Blaze.Front.Internal
import Text.Blaze.Front.Svg (Svg)
type Html ev = Markup ev
toHtml :: ToMarkup a => a -> Html ev
toHtml :: a -> Html ev
toHtml = a -> Html ev
forall a ev. ToMarkup a => a -> Markup ev
toMarkup
preEscapedToHtml :: ToMarkup a => a -> Html ev
preEscapedToHtml :: a -> Html ev
preEscapedToHtml = a -> Html ev
forall a ev. ToMarkup a => a -> Markup ev
preEscapedToMarkup
docType :: Html ev
docType :: Html ev
docType = Text -> Html ev
forall ev. Text -> Markup ev
preEscapedText Text
"<!DOCTYPE HTML>\n"
{-# INLINE docType #-}
docTypeHtml :: Html ev
-> Html ev
docTypeHtml :: Html ev -> Html ev
docTypeHtml Html ev
inner = Html ev
forall ev. Html ev
docType Html ev -> Html ev -> Html ev
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>> Html ev -> Html ev
forall ev. Html ev -> Html ev
html Html ev
inner
{-# INLINE docTypeHtml #-}
a :: Html ev
-> Html ev
a :: Html ev -> Html ev
a = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"a" StaticString
"<a" StaticString
"</a>"
{-# INLINE a #-}
abbr :: Html ev
-> Html ev
abbr :: Html ev -> Html ev
abbr = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"abbr" StaticString
"<abbr" StaticString
"</abbr>"
{-# INLINE abbr #-}
address :: Html ev
-> Html ev
address :: Html ev -> Html ev
address = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"address" StaticString
"<address" StaticString
"</address>"
{-# INLINE address #-}
area :: Html ev
area :: Html ev
area = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"area" StaticString
"<area" StaticString
">"
{-# INLINE area #-}
article :: Html ev
-> Html ev
article :: Html ev -> Html ev
article = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"article" StaticString
"<article" StaticString
"</article>"
{-# INLINE article #-}
aside :: Html ev
-> Html ev
aside :: Html ev -> Html ev
aside = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"aside" StaticString
"<aside" StaticString
"</aside>"
{-# INLINE aside #-}
audio :: Html ev
-> Html ev
audio :: Html ev -> Html ev
audio = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"audio" StaticString
"<audio" StaticString
"</audio>"
{-# INLINE audio #-}
b :: Html ev
-> Html ev
b :: Html ev -> Html ev
b = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"b" StaticString
"<b" StaticString
"</b>"
{-# INLINE b #-}
base :: Html ev
base :: Html ev
base = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"base" StaticString
"<base" StaticString
">"
{-# INLINE base #-}
bdo :: Html ev
-> Html ev
bdo :: Html ev -> Html ev
bdo = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"bdo" StaticString
"<bdo" StaticString
"</bdo>"
{-# INLINE bdo #-}
blockquote :: Html ev
-> Html ev
blockquote :: Html ev -> Html ev
blockquote = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"blockquote" StaticString
"<blockquote" StaticString
"</blockquote>"
{-# INLINE blockquote #-}
body :: Html ev
-> Html ev
body :: Html ev -> Html ev
body = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"body" StaticString
"<body" StaticString
"</body>"
{-# INLINE body #-}
br :: Html ev
br :: Html ev
br = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"br" StaticString
"<br" StaticString
">"
{-# INLINE br #-}
button :: Html ev
-> Html ev
button :: Html ev -> Html ev
button = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"button" StaticString
"<button" StaticString
"</button>"
{-# INLINE button #-}
canvas :: Html ev
-> Html ev
canvas :: Html ev -> Html ev
canvas = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"canvas" StaticString
"<canvas" StaticString
"</canvas>"
{-# INLINE canvas #-}
caption :: Html ev
-> Html ev
caption :: Html ev -> Html ev
caption = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"caption" StaticString
"<caption" StaticString
"</caption>"
{-# INLINE caption #-}
cite :: Html ev
-> Html ev
cite :: Html ev -> Html ev
cite = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"cite" StaticString
"<cite" StaticString
"</cite>"
{-# INLINE cite #-}
code :: Html ev
-> Html ev
code :: Html ev -> Html ev
code = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"code" StaticString
"<code" StaticString
"</code>"
{-# INLINE code #-}
col :: Html ev
col :: Html ev
col = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"col" StaticString
"<col" StaticString
">"
{-# INLINE col #-}
colgroup :: Html ev
-> Html ev
colgroup :: Html ev -> Html ev
colgroup = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"colgroup" StaticString
"<colgroup" StaticString
"</colgroup>"
{-# INLINE colgroup #-}
command :: Html ev
-> Html ev
command :: Html ev -> Html ev
command = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"command" StaticString
"<command" StaticString
"</command>"
{-# INLINE command #-}
datalist :: Html ev
-> Html ev
datalist :: Html ev -> Html ev
datalist = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"datalist" StaticString
"<datalist" StaticString
"</datalist>"
{-# INLINE datalist #-}
dd :: Html ev
-> Html ev
dd :: Html ev -> Html ev
dd = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"dd" StaticString
"<dd" StaticString
"</dd>"
{-# INLINE dd #-}
del :: Html ev
-> Html ev
del :: Html ev -> Html ev
del = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"del" StaticString
"<del" StaticString
"</del>"
{-# INLINE del #-}
details :: Html ev
-> Html ev
details :: Html ev -> Html ev
details = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"details" StaticString
"<details" StaticString
"</details>"
{-# INLINE details #-}
dfn :: Html ev
-> Html ev
dfn :: Html ev -> Html ev
dfn = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"dfn" StaticString
"<dfn" StaticString
"</dfn>"
{-# INLINE dfn #-}
div :: Html ev
-> Html ev
div :: Html ev -> Html ev
div = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"div" StaticString
"<div" StaticString
"</div>"
{-# INLINE div #-}
dl :: Html ev
-> Html ev
dl :: Html ev -> Html ev
dl = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"dl" StaticString
"<dl" StaticString
"</dl>"
{-# INLINE dl #-}
dt :: Html ev
-> Html ev
dt :: Html ev -> Html ev
dt = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"dt" StaticString
"<dt" StaticString
"</dt>"
{-# INLINE dt #-}
em :: Html ev
-> Html ev
em :: Html ev -> Html ev
em = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"em" StaticString
"<em" StaticString
"</em>"
{-# INLINE em #-}
embed :: Html ev
embed :: Html ev
embed = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"embed" StaticString
"<embed" StaticString
">"
{-# INLINE embed #-}
fieldset :: Html ev
-> Html ev
fieldset :: Html ev -> Html ev
fieldset = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"fieldset" StaticString
"<fieldset" StaticString
"</fieldset>"
{-# INLINE fieldset #-}
figcaption :: Html ev
-> Html ev
figcaption :: Html ev -> Html ev
figcaption = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"figcaption" StaticString
"<figcaption" StaticString
"</figcaption>"
{-# INLINE figcaption #-}
figure :: Html ev
-> Html ev
figure :: Html ev -> Html ev
figure = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"figure" StaticString
"<figure" StaticString
"</figure>"
{-# INLINE figure #-}
footer :: Html ev
-> Html ev
= StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"footer" StaticString
"<footer" StaticString
"</footer>"
{-# INLINE footer #-}
form :: Html ev
-> Html ev
form :: Html ev -> Html ev
form = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"form" StaticString
"<form" StaticString
"</form>"
{-# INLINE form #-}
h1 :: Html ev
-> Html ev
h1 :: Html ev -> Html ev
h1 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h1" StaticString
"<h1" StaticString
"</h1>"
{-# INLINE h1 #-}
h2 :: Html ev
-> Html ev
h2 :: Html ev -> Html ev
h2 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h2" StaticString
"<h2" StaticString
"</h2>"
{-# INLINE h2 #-}
h3 :: Html ev
-> Html ev
h3 :: Html ev -> Html ev
h3 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h3" StaticString
"<h3" StaticString
"</h3>"
{-# INLINE h3 #-}
h4 :: Html ev
-> Html ev
h4 :: Html ev -> Html ev
h4 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h4" StaticString
"<h4" StaticString
"</h4>"
{-# INLINE h4 #-}
h5 :: Html ev
-> Html ev
h5 :: Html ev -> Html ev
h5 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h5" StaticString
"<h5" StaticString
"</h5>"
{-# INLINE h5 #-}
h6 :: Html ev
-> Html ev
h6 :: Html ev -> Html ev
h6 = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"h6" StaticString
"<h6" StaticString
"</h6>"
{-# INLINE h6 #-}
head :: Html ev
-> Html ev
head :: Html ev -> Html ev
head = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"head" StaticString
"<head" StaticString
"</head>"
{-# INLINE head #-}
header :: Html ev
-> Html ev
= StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"header" StaticString
"<header" StaticString
"</header>"
{-# INLINE header #-}
hgroup :: Html ev
-> Html ev
hgroup :: Html ev -> Html ev
hgroup = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"hgroup" StaticString
"<hgroup" StaticString
"</hgroup>"
{-# INLINE hgroup #-}
hr :: Html ev
hr :: Html ev
hr = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"hr" StaticString
"<hr" StaticString
">"
{-# INLINE hr #-}
html :: Html ev
-> Html ev
html :: Html ev -> Html ev
html = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"html" StaticString
"<html" StaticString
"</html>"
{-# INLINE html #-}
i :: Html ev
-> Html ev
i :: Html ev -> Html ev
i = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"i" StaticString
"<i" StaticString
"</i>"
{-# INLINE i #-}
iframe :: Html ev
-> Html ev
iframe :: Html ev -> Html ev
iframe = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"iframe" StaticString
"<iframe" StaticString
"</iframe>"
{-# INLINE iframe #-}
img :: Html ev
img :: Html ev
img = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"img" StaticString
"<img" StaticString
">"
{-# INLINE img #-}
input :: Html ev
input :: Html ev
input = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"input" StaticString
"<input" StaticString
">"
{-# INLINE input #-}
ins :: Html ev
-> Html ev
ins :: Html ev -> Html ev
ins = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"ins" StaticString
"<ins" StaticString
"</ins>"
{-# INLINE ins #-}
kbd :: Html ev
-> Html ev
kbd :: Html ev -> Html ev
kbd = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"kbd" StaticString
"<kbd" StaticString
"</kbd>"
{-# INLINE kbd #-}
keygen :: Html ev
keygen :: Html ev
keygen = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"keygen" StaticString
"<keygen" StaticString
">"
{-# INLINE keygen #-}
label :: Html ev
-> Html ev
label :: Html ev -> Html ev
label = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"label" StaticString
"<label" StaticString
"</label>"
{-# INLINE label #-}
legend :: Html ev
-> Html ev
legend :: Html ev -> Html ev
legend = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"legend" StaticString
"<legend" StaticString
"</legend>"
{-# INLINE legend #-}
li :: Html ev
-> Html ev
li :: Html ev -> Html ev
li = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"li" StaticString
"<li" StaticString
"</li>"
{-# INLINE li #-}
link :: Html ev
link :: Html ev
link = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"link" StaticString
"<link" StaticString
">"
{-# INLINE link #-}
map :: Html ev
-> Html ev
map :: Html ev -> Html ev
map = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"map" StaticString
"<map" StaticString
"</map>"
{-# INLINE map #-}
mark :: Html ev
-> Html ev
mark :: Html ev -> Html ev
mark = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"mark" StaticString
"<mark" StaticString
"</mark>"
{-# INLINE mark #-}
menu :: Html ev
-> Html ev
= StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"menu" StaticString
"<menu" StaticString
"</menu>"
{-# INLINE menu #-}
menuitem :: Html ev
= StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"menuitem" StaticString
"<menuitem" StaticString
">"
{-# INLINE menuitem #-}
meta :: Html ev
meta :: Html ev
meta = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"meta" StaticString
"<meta" StaticString
">"
{-# INLINE meta #-}
meter :: Html ev
-> Html ev
meter :: Html ev -> Html ev
meter = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"meter" StaticString
"<meter" StaticString
"</meter>"
{-# INLINE meter #-}
nav :: Html ev
-> Html ev
nav :: Html ev -> Html ev
nav = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"nav" StaticString
"<nav" StaticString
"</nav>"
{-# INLINE nav #-}
noscript :: Html ev
-> Html ev
noscript :: Html ev -> Html ev
noscript = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"noscript" StaticString
"<noscript" StaticString
"</noscript>"
{-# INLINE noscript #-}
object :: Html ev
-> Html ev
object :: Html ev -> Html ev
object = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"object" StaticString
"<object" StaticString
"</object>"
{-# INLINE object #-}
ol :: Html ev
-> Html ev
ol :: Html ev -> Html ev
ol = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"ol" StaticString
"<ol" StaticString
"</ol>"
{-# INLINE ol #-}
optgroup :: Html ev
-> Html ev
optgroup :: Html ev -> Html ev
optgroup = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"optgroup" StaticString
"<optgroup" StaticString
"</optgroup>"
{-# INLINE optgroup #-}
option :: Html ev
-> Html ev
option :: Html ev -> Html ev
option = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"option" StaticString
"<option" StaticString
"</option>"
{-# INLINE option #-}
output :: Html ev
-> Html ev
output :: Html ev -> Html ev
output = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"output" StaticString
"<output" StaticString
"</output>"
{-# INLINE output #-}
p :: Html ev
-> Html ev
p :: Html ev -> Html ev
p = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"p" StaticString
"<p" StaticString
"</p>"
{-# INLINE p #-}
param :: Html ev
param :: Html ev
param = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"param" StaticString
"<param" StaticString
">"
{-# INLINE param #-}
pre :: Html ev
-> Html ev
pre :: Html ev -> Html ev
pre = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"pre" StaticString
"<pre" StaticString
"</pre>"
{-# INLINE pre #-}
progress :: Html ev
-> Html ev
progress :: Html ev -> Html ev
progress = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"progress" StaticString
"<progress" StaticString
"</progress>"
{-# INLINE progress #-}
q :: Html ev
-> Html ev
q :: Html ev -> Html ev
q = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"q" StaticString
"<q" StaticString
"</q>"
{-# INLINE q #-}
rp :: Html ev
-> Html ev
rp :: Html ev -> Html ev
rp = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"rp" StaticString
"<rp" StaticString
"</rp>"
{-# INLINE rp #-}
rt :: Html ev
-> Html ev
rt :: Html ev -> Html ev
rt = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"rt" StaticString
"<rt" StaticString
"</rt>"
{-# INLINE rt #-}
ruby :: Html ev
-> Html ev
ruby :: Html ev -> Html ev
ruby = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"ruby" StaticString
"<ruby" StaticString
"</ruby>"
{-# INLINE ruby #-}
samp :: Html ev
-> Html ev
samp :: Html ev -> Html ev
samp = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"samp" StaticString
"<samp" StaticString
"</samp>"
{-# INLINE samp #-}
script :: Html ev
-> Html ev
script :: Html ev -> Html ev
script = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"script" StaticString
"<script" StaticString
"</script>" (Html ev -> Html ev) -> (Html ev -> Html ev) -> Html ev -> Html ev
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Html ev -> Html ev
forall ev a. MarkupM ev a -> MarkupM ev a
external
{-# INLINE script #-}
section :: Html ev
-> Html ev
section :: Html ev -> Html ev
section = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"section" StaticString
"<section" StaticString
"</section>"
{-# INLINE section #-}
select :: Html ev
-> Html ev
select :: Html ev -> Html ev
select = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"select" StaticString
"<select" StaticString
"</select>"
{-# INLINE select #-}
small :: Html ev
-> Html ev
small :: Html ev -> Html ev
small = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"small" StaticString
"<small" StaticString
"</small>"
{-# INLINE small #-}
source :: Html ev
source :: Html ev
source = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"source" StaticString
"<source" StaticString
">"
{-# INLINE source #-}
span :: Html ev
-> Html ev
span :: Html ev -> Html ev
span = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"span" StaticString
"<span" StaticString
"</span>"
{-# INLINE span #-}
strong :: Html ev
-> Html ev
strong :: Html ev -> Html ev
strong = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"strong" StaticString
"<strong" StaticString
"</strong>"
{-# INLINE strong #-}
style :: Html ev
-> Html ev
style :: Html ev -> Html ev
style = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"style" StaticString
"<style" StaticString
"</style>" (Html ev -> Html ev) -> (Html ev -> Html ev) -> Html ev -> Html ev
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Html ev -> Html ev
forall ev a. MarkupM ev a -> MarkupM ev a
external
{-# INLINE style #-}
sub :: Html ev
-> Html ev
sub :: Html ev -> Html ev
sub = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"sub" StaticString
"<sub" StaticString
"</sub>"
{-# INLINE sub #-}
summary :: Html ev
-> Html ev
summary :: Html ev -> Html ev
summary = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"summary" StaticString
"<summary" StaticString
"</summary>"
{-# INLINE summary #-}
sup :: Html ev
-> Html ev
sup :: Html ev -> Html ev
sup = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"sup" StaticString
"<sup" StaticString
"</sup>"
{-# INLINE sup #-}
svg :: Svg ev -> Html ev
svg :: Svg ev -> Svg ev
svg = StaticString -> StaticString -> StaticString -> Svg ev -> Svg ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"svg" StaticString
"<svg" StaticString
"</svg>"
{-# INLINE svg #-}
table :: Html ev
-> Html ev
table :: Html ev -> Html ev
table = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"table" StaticString
"<table" StaticString
"</table>"
{-# INLINE table #-}
tbody :: Html ev
-> Html ev
tbody :: Html ev -> Html ev
tbody = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"tbody" StaticString
"<tbody" StaticString
"</tbody>"
{-# INLINE tbody #-}
td :: Html ev
-> Html ev
td :: Html ev -> Html ev
td = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"td" StaticString
"<td" StaticString
"</td>"
{-# INLINE td #-}
textarea :: Html ev -> Html ev
textarea :: Html ev -> Html ev
textarea = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"textarea" StaticString
"<textarea" StaticString
"</textarea>"
{-# INLINE textarea #-}
tfoot :: Html ev
-> Html ev
= StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"tfoot" StaticString
"<tfoot" StaticString
"</tfoot>"
{-# INLINE tfoot #-}
th :: Html ev
-> Html ev
th :: Html ev -> Html ev
th = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"th" StaticString
"<th" StaticString
"</th>"
{-# INLINE th #-}
thead :: Html ev
-> Html ev
thead :: Html ev -> Html ev
thead = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"thead" StaticString
"<thead" StaticString
"</thead>"
{-# INLINE thead #-}
time :: Html ev
-> Html ev
time :: Html ev -> Html ev
time = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"time" StaticString
"<time" StaticString
"</time>"
{-# INLINE time #-}
title :: Html ev
-> Html ev
title :: Html ev -> Html ev
title = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"title" StaticString
"<title" StaticString
"</title>"
{-# INLINE title #-}
tr :: Html ev
-> Html ev
tr :: Html ev -> Html ev
tr = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"tr" StaticString
"<tr" StaticString
"</tr>"
{-# INLINE tr #-}
track :: Html ev
track :: Html ev
track = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"track" StaticString
"<track" StaticString
">"
{-# INLINE track #-}
ul :: Html ev
-> Html ev
ul :: Html ev -> Html ev
ul = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"ul" StaticString
"<ul" StaticString
"</ul>"
{-# INLINE ul #-}
var :: Html ev
-> Html ev
var :: Html ev -> Html ev
var = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"var" StaticString
"<var" StaticString
"</var>"
{-# INLINE var #-}
video :: Html ev
-> Html ev
video :: Html ev -> Html ev
video = StaticString -> StaticString -> StaticString -> Html ev -> Html ev
forall act a.
StaticString
-> StaticString -> StaticString -> MarkupM act a -> MarkupM act a
Parent StaticString
"video" StaticString
"<video" StaticString
"</video>"
{-# INLINE video #-}
wbr :: Html ev
wbr :: Html ev
wbr = StaticString -> StaticString -> StaticString -> Html ev
forall act a.
StaticString -> StaticString -> StaticString -> MarkupM act a
Leaf StaticString
"wbr" StaticString
"<wbr" StaticString
">"
{-# INLINE wbr #-}