{-# OPTIONS_GHC -fno-warn-unticked-promoted-constructors #-}
{-# LANGUAGE TypeOperators #-}
{-# LANGUAGE DataKinds     #-}
{-# LANGUAGE PolyKinds     #-}

module Html.Obsolete where

import Html.Type

-- | Functions to create obsolete html elements.
--
-- Usage:
--
-- >>> center :> "barf"
-- <center>barf</center>

type CustomElementDefault x
  = Element
  x
  '[Metadata, Flow, Sectioning, Heading, Phrasing, Embedded, Interactive, Palpable, Scripting] (Metadata :|: Flow :|: Sectioning :|: Heading :|: Phrasing :|: Embedded :|: Interactive :|: Palpable :|: Scripting)
  '[]

applet :: CustomElementDefault "applet"
applet :: CustomElementDefault "applet"
applet = CustomElementDefault "applet"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

acronym :: CustomElementDefault "acronym"
acronym :: CustomElementDefault "acronym"
acronym = CustomElementDefault "acronym"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

bgsound :: CustomElementDefault "bgsound"
bgsound :: CustomElementDefault "bgsound"
bgsound = CustomElementDefault "bgsound"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

dir :: CustomElementDefault "dir"
dir :: CustomElementDefault "dir"
dir = CustomElementDefault "dir"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

frame :: CustomElementDefault "frame"
frame :: CustomElementDefault "frame"
frame = CustomElementDefault "frame"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

frameset :: CustomElementDefault "frameset"
frameset :: CustomElementDefault "frameset"
frameset = CustomElementDefault "frameset"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

noframes :: CustomElementDefault "noframes"
noframes :: CustomElementDefault "noframes"
noframes = CustomElementDefault "noframes"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

isindex :: CustomElementDefault "isindex"
isindex :: CustomElementDefault "isindex"
isindex = CustomElementDefault "isindex"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

keygen :: CustomElementDefault "keygen"
keygen :: CustomElementDefault "keygen"
keygen = CustomElementDefault "keygen"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

listing :: CustomElementDefault "listing"
listing :: CustomElementDefault "listing"
listing = CustomElementDefault "listing"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

menuitem :: CustomElementDefault "menuitem"
menuitem :: CustomElementDefault "menuitem"
menuitem = CustomElementDefault "menuitem"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

nextid :: CustomElementDefault "nextid"
nextid :: CustomElementDefault "nextid"
nextid = CustomElementDefault "nextid"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

noembed :: CustomElementDefault "noembed"
noembed :: CustomElementDefault "noembed"
noembed = CustomElementDefault "noembed"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

plaintext :: CustomElementDefault "plaintext"
plaintext :: CustomElementDefault "plaintext"
plaintext = CustomElementDefault "plaintext"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

rb :: CustomElementDefault "rb"
rb :: CustomElementDefault "rb"
rb = CustomElementDefault "rb"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

rtc :: CustomElementDefault "rtc"
rtc :: CustomElementDefault "rtc"
rtc = CustomElementDefault "rtc"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

strike :: CustomElementDefault "strike"
strike :: CustomElementDefault "strike"
strike = CustomElementDefault "strike"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

xmp :: CustomElementDefault "xmp"
xmp :: CustomElementDefault "xmp"
xmp = CustomElementDefault "xmp"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

basefont :: CustomElementDefault "basefont"
basefont :: CustomElementDefault "basefont"
basefont = CustomElementDefault "basefont"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

big :: CustomElementDefault "big"
big :: CustomElementDefault "big"
big = CustomElementDefault "big"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

blink :: CustomElementDefault "blink"
blink :: CustomElementDefault "blink"
blink = CustomElementDefault "blink"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

center :: CustomElementDefault "center"
center :: CustomElementDefault "center"
center = CustomElementDefault "center"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

font :: CustomElementDefault "font"
font :: CustomElementDefault "font"
font = CustomElementDefault "font"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

marquee :: CustomElementDefault "marquee"
marquee :: CustomElementDefault "marquee"
marquee = CustomElementDefault "marquee"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

multicol :: CustomElementDefault "multicol"
multicol :: CustomElementDefault "multicol"
multicol = CustomElementDefault "multicol"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

nobr :: CustomElementDefault "nobr"
nobr :: CustomElementDefault "nobr"
nobr = CustomElementDefault "nobr"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

spacer :: CustomElementDefault "spacer"
spacer :: CustomElementDefault "spacer"
spacer = CustomElementDefault "spacer"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement

tt :: CustomElementDefault "tt"
tt :: CustomElementDefault "tt"
tt = CustomElementDefault "tt"
forall (name :: Symbol) (categories :: [ContentCategory])
       (contentModel :: ContentCategory) (contentAttributes :: [Symbol]).
Element name categories contentModel contentAttributes
CustomElement