Module type Xhtml_sigs.T

module type T = T_01_01

module Xml: Xml_sigs.T

module Info: Xml_sigs.Info

The elements, attributes, attribute types and data types are given names that match the names in the W3C recommendation as closely as allowed by a strict typing discipline and the lexical conventions of O'Caml:

elements are implemented as O'Caml constructors with the same name as in the W3C recommendation. The domain and codomain are specified as 'a elt, where 'a is a concrete phantom type build out of polymorphic variants.
attributes are implemented as O'Caml constructors with a_ prefixed to the name. The name is the same as in the W3C recommendation, unless an additional prefix is required to disambiguate:
- a_fs_rows and a_fs_cols instead of a_rows and a_cols for framesets, because of the different argument types.
attribute types are implemented as O'Caml types that all have the same names as in the W3C recommendation, but are all lowercase.
data types are also implemented as O'Caml types that all have the same names as in the W3C recommendation and are again all lowercase.

Finite sets of alternatives are mapped to polymorphic variants.

The phantom type is always the most general required by any (supported) version of the standard. Type discipline is enforced by exporting or not-exporting the corresponding constructor.

The type defining group of html elements are in Xhtml_types

type uri = Xml.uri

val string_of_uri : uri -> string

val uri_of_string : string -> uri

Common Attributes

type +'a attrib

val to_xmlattribs : 'a attrib list -> Xml.attrib list

val to_attrib : Xml.attrib -> 'a attrib

'a is known as a phantom type. The implementation is actually monomorphic (the different element types are distinguished by a homogeneous variable, such as their textual representation) and the type variable `a is just used by the type checker.

NB: It might be possible to use polymorphic variants directly, without phantom types, but the implementation is likely to be more involved.

Core

val a_class : Xhtml_types.nmtokens -> [> `Class ] attrib

This attribute assigns a class name or set of class names to an element. Any number of elements may be assigned the same class name or names.

val a_id : Xhtml_types.id -> [> `Id ] attrib

This attribute assigns a name to an element. This name must be unique in a document.

val a_title : Xhtml_types.cdata -> [> `Title ] attrib

This attribute offers advisory information about the element for which it is set.

Values of the title attribute may be rendered by user agents in a variety of ways. For instance, visual browsers frequently display the title as a tool tip (a short message that appears when the pointing device pauses over an object). Audio user agents may speak the title information in a similar context.

The title attribute has an additional role when used with the link element to designate an external style sheet. Please consult the section on links and style sheets for details.

I18N

val a_xml_lang : Xhtml_types.nmtoken -> [> `XML_lang ] attrib

Style

The Style collection is deprecated, because the Style Attribute Module is deprecated.

Events

Javascript events

val a_onblur : Xml.event_handler -> [> `OnBlur ] attrib

val a_onclick : Xml.event_handler -> [> `OnClick ] attrib

val a_ondblclick : Xml.event_handler -> [> `OnDblClick ] attrib

val a_onchange : Xml.event_handler -> [> `OnChange ] attrib

val a_onfocus : Xml.event_handler -> [> `OnFocus ] attrib

val a_onload : Xml.event_handler -> [> `OnLoad ] attrib

val a_onunload : Xml.event_handler -> [> `OnUnload ] attrib

val a_onreset : Xml.event_handler -> [> `OnReset ] attrib

val a_onselect : Xml.event_handler -> [> `OnSelect ] attrib

val a_onsubmit : Xml.event_handler -> [> `OnSubmit ] attrib

val a_onmousedown : Xml.event_handler -> [> `OnMouseDown ] attrib

val a_onmouseup : Xml.event_handler -> [> `OnMouseUp ] attrib

val a_onmouseover : Xml.event_handler -> [> `OnMouseOver ] attrib

val a_onmousemove : Xml.event_handler -> [> `OnMouseMove ] attrib

val a_onmouseout : Xml.event_handler -> [> `OnMouseOut ] attrib

val a_onkeypress : Xml.event_handler -> [> `OnKeyPress ] attrib

val a_onkeydown : Xml.event_handler -> [> `OnKeyDown ] attrib

val a_onkeyup : Xml.event_handler -> [> `OnKeyUp ] attrib

Modules, Element Sets and Attributes

val a_profile : Xml.uri -> [> `Profile ] attrib

val a_version : Xhtml_types.cdata -> [> `Version ] attrib

val a_xmlns : [< `W3_org_1999_xhtml ] -> [> `XMLns ] attrib

val a_cite : Xml.uri -> [> `Cite ] attrib

val a_xml_space : [< `Preserve ] -> [> `XML_space ] attrib

val a_accesskey : Xhtml_types.character -> [> `Accesskey ] attrib

This attribute assigns an access key to an element. An access key is a single character from the document character set. NB: authors should consider the input method of the expected reader when specifying an accesskey.

val a_charset : Xhtml_types.charset -> [> `Charset ] attrib

This attribute specifies the character encoding of the resource designated by the link. Please consult the section on character encodings for more details.

val a_accept_charset : Xhtml_types.charset -> [> `Accept_charset ] attrib

val a_accept : Xhtml_types.contenttype -> [> `Accept ] attrib

val a_href : Xml.uri -> [> `Href ] attrib

This attribute specifies the location of a Web resource, thus defining a link between the current element (the source anchor) and the destination anchor defined by this attribute.

val a_hreflang : Xhtml_types.languagecode -> [> `Hreflang ] attrib

This attribute specifies the base language of the resource designated by href and may only be used when href is specified.

val a_rel : Xhtml_types.linktypes -> [> `Rel ] attrib

This attribute describes the relationship from the current document to the anchor specified by the href attribute. The value of this attribute is a space-separated list of link types.

val a_rev : Xhtml_types.linktypes -> [> `Rev ] attrib

This attribute is used to describe a reverse link from the anchor specified by the href attribute to the current document. The value of this attribute is a space-separated list of link types.

val a_tabindex : Xhtml_types.number -> [> `Tabindex ] attrib

This attribute specifies the position of the current element in the tabbing order for the current document. This value must be a number between 0 and 32767. User agents should ignore leading zeros.

val a_type : Xhtml_types.contenttype -> [> `Type ] attrib

This attribute gives an advisory hint as to the content type of the content available at the link target address. It allows user agents to opt to use a fallback mechanism rather than fetch the content if they are advised that they will get content in a content type they do not support.Authors who use this attribute take responsibility to manage the risk that it may become inconsistent with the content available at the link target address.

val a_datetime : Xhtml_types.cdata -> [> `Datetime ] attrib

Bi-directional Text Attributes

val a_dir : [< `Ltr | `Rtl ] -> [> `Dir ] attrib

Forms attributes

val a_action : Xml.uri -> [> `Action ] attrib

This attribute specifies a form processing agent. User agent behavior for a value other than an HTTP URI is undefined.

val a_checked : [< `Checked ] -> [> `Checked ] attrib

When the type attribute has the value "radio" or "checkbox", this boolean attribute specifies that the button is on. User agents must ignore this attribute for other control types.

val a_cols : Xhtml_types.number -> [> `Cols ] attrib

This attribute specifies the visible width in average character widths. Users should be able to enter longer lines than this, so user agents should provide some means to scroll through the contents of the control when the contents extend beyond the visible area. User agents may wrap visible text lines to keep long lines visible without the need for scrolling.

val a_enctype : Xhtml_types.contenttype -> [> `Enctype ] attrib

val a_for : Xhtml_types.idref -> [> `For ] attrib

val a_maxlength : Xhtml_types.number -> [> `Maxlength ] attrib

val a_method : [< `Get | `Post ] -> [> `Method ] attrib

val a_multiple : [< `Multiple ] -> [> `Multiple ] attrib

val a_name : Xhtml_types.cdata -> [> `Name ] attrib

This attribute assigns the control name.

val a_rows : Xhtml_types.number -> [> `Rows ] attrib

This attribute specifies the number of visible text lines. Users should be able to enter more lines than this, so user agents should provide some means to scroll through the contents of the control when the contents extend beyond the visible area.

val a_selected : [< `Selected ] -> [> `Selected ] attrib

When set, this boolean attribute specifies that this option is pre-selected.

val a_size : Xhtml_types.number -> [> `Size ] attrib

val a_src : Xml.uri -> [> `Src ] attrib

val a_input_type : [< `Button
        | `Checkbox
        | `File
        | `Hidden
        | `Image
        | `Password
        | `Radio
        | `Reset
        | `Submit
        | `Text ] ->
       [> `Input_Type ] attrib

val a_value : Xhtml_types.cdata -> [> `Value ] attrib

This attribute specifies the initial value of the control. If this attribute is not set, the initial value is set to the contents of the option element.

val a_value_type : [< `Data | `Object | `Ref ] -> [> `Value_Type ] attrib

val a_disabled : [< `Disabled ] -> [> `Disabled ] attrib

val a_readonly : [< `ReadOnly ] -> [> `ReadOnly ] attrib

val a_button_type : [< `Button | `Reset | `Submit ] ->
       [> `Button_Type ] attrib

val a_label : Xhtml_types.text -> [> `Label ] attrib

Attributes for tables

val a_abbr : Xhtml_types.text -> [> `Abbr ] attrib

val a_align : [< `Center | `Char | `Justify | `Left | `Right ] ->
       [> `Align ] attrib

val a_axis : Xhtml_types.cdata -> [> `Axis ] attrib

val a_colspan : Xhtml_types.number -> [> `Colspan ] attrib

val a_headers : Xhtml_types.idrefs -> [> `Headers ] attrib

val a_rowspan : Xhtml_types.number -> [> `Rowspan ] attrib

val a_scope : [< `Col | `Colgroup | `Row | `Rowgroup ] ->
       [> `Scope ] attrib

val a_summary : Xhtml_types.text -> [> `Summary ] attrib

val a_valign : [< `Baseline | `Bottom | `Middle | `Top ] ->
       [> `Valign ] attrib

val a_border : Xhtml_types.pixels -> [> `Border ] attrib

val a_cellpadding : Xhtml_types.length -> [> `Cellpadding ] attrib

val a_cellspacing : Xhtml_types.length -> [> `Cellspacing ] attrib

val a_datapagesize : Xhtml_types.cdata -> [> `Datapagesize ] attrib

val a_frame : [< `Above | `Below | `Border | `Box | `Hsides | `LHS | `RHS | `Void | `Vsides ] ->
       [> `Frame ] attrib

val a_rules : [< `All | `Cols | `Groups | `None | `Rows ] ->
       [> `Rules ] attrib

val a_char : Xhtml_types.character -> [> `Char ] attrib

val a_charoff : Xhtml_types.length -> [> `Charoff ] attrib

val a_span : Xhtml_types.number -> [> `Span ] attrib

val a_alt : Xhtml_types.text -> [> `Alt ] attrib

val a_height : Xhtml_types.length -> [> `Height ] attrib

val a_longdesc : Xml.uri -> [> `Longdesc ] attrib

val a_width : Xhtml_types.length -> [> `Width ] attrib

Attributes for client-side image map

type shape = [ `Circle | `Default | `Poly | `Rect ]

val a_shape : shape -> [> `Shape ] attrib

val a_coords : int list -> [> `Coords ] attrib

val a_nohref : [< `Nohref ] -> [> `Nohref ] attrib

val a_usemap : Xhtml_types.idref -> [> `Usemap ] attrib

Attributes for Server-side Image Map

val a_ismap : [< `Ismap ] -> [> `Ismap ] attrib

Attributes for Object

val a_declare : [< `Declare ] -> [> `Declare ] attrib

val a_classid : Xml.uri -> [> `Classid ] attrib

val a_codebase : Xml.uri -> [> `Codebase ] attrib

val a_data : Xml.uri -> [> `Data ] attrib

val a_codetype : Xhtml_types.contenttype -> [> `Codetype ] attrib

val a_archive : Xml.uri list -> [> `Archive ] attrib

val a_standby : Xhtml_types.text -> [> `Standby ] attrib

Attributes for Frames

val a_fs_rows : Xhtml_types.multilengths -> [> `FS_Rows ] attrib

val a_fs_cols : Xhtml_types.multilengths -> [> `FS_Cols ] attrib

val a_frameborder : [< `One | `Zero ] -> [> `Frameborder ] attrib

val a_marginheight : Xhtml_types.pixels -> [> `Marginheight ] attrib

val a_marginwidth : Xhtml_types.pixels -> [> `Marginwidth ] attrib

val a_noresize : [< `Noresize ] -> [> `Noresize ] attrib

val a_scrolling : [< `Auto | `No | `Yes ] -> [> `Scrolling ] attrib

val a_target : Xhtml_types.frametarget -> [> `Target ] attrib

Attributes for metadata

val a_content : Xhtml_types.cdata -> [> `Content ] attrib

val a_http_equiv : Xhtml_types.nmtoken -> [> `Http_equiv ] attrib

val a_scheme : Xhtml_types.cdata -> [> `Scheme ] attrib

val a_defer : [< `Defer ] -> [> `Defer ] attrib

Style attributes

val a_media : Xhtml_types.mediadesc -> [> `Media ] attrib

val a_style : string -> [> `Style_Attr ] attrib

Elements

type +'a elt

Element Constructor Types

type ('a, 'b) nullary = ?a:'a attrib list -> unit -> 'b elt

type ('a, 'b, 'c) unary = ?a:'a attrib list ->
       'b elt -> 'c elt

type ('a, 'b, 'c, 'd) binary = ?a:'a attrib list ->
       'b elt ->
       'c elt -> 'd elt

type ('a, 'b, 'c, 'd, 'e, 'f) quadry = ?a:'a attrib list ->
       'b elt ->
       'c elt ->
       'd elt ->
       'e elt -> 'f elt

type ('a, 'b, 'c) star = ?a:'a attrib list ->
       'b elt list -> 'c elt

Star '*' denotes any number of children, uncluding zero.

type ('a, 'b, 'c) plus = ?a:'a attrib list ->
       'b elt ->
       'b elt list -> 'c elt

Plus '+' requires at least one child.

Structure

type html = [ `Html ] elt

val html : ?a:[< `Dir | `Id | `Version | `XML_lang | `XMLns ] attrib
          list ->
       [< `Head ] elt ->
       [< `Body | `Frameset ] elt -> html

val head : ?a:[< `Dir | `Id | `Profile | `XML_lang ] attrib list ->
       [< `Base | `Title ] elt ->
       [< `Link | `Meta | `Object | `Script | `Style ] elt list ->
       [> `Head ] elt

val title : ([< Xhtml_types.title_attrib ], [< Xhtml_types.title_content ],
        [> Xhtml_types.title ])
       unary

val body : ([< Xhtml_types.body_attrib ], [< Xhtml_types.body_content ],
        [> Xhtml_types.body ])
       star

Data

val pcdata : string -> [> `PCDATA ] elt

val entity : string -> [> `PCDATA ] elt

val space : unit -> [> `PCDATA ] elt

val cdata : string -> [> `PCDATA ] elt

val cdata_script : string -> [> `PCDATA ] elt

val cdata_style : string -> [> `PCDATA ] elt

Text

val h1 : ([< Xhtml_types.h1_attrib ], [< Xhtml_types.h1_content ],
        [> Xhtml_types.h1 ])
       star

val h2 : ([< Xhtml_types.h2_attrib ], [< Xhtml_types.h2_content ],
        [> Xhtml_types.h2 ])
       star

val h3 : ([< Xhtml_types.h3_attrib ], [< Xhtml_types.h3_content ],
        [> Xhtml_types.h3 ])
       star

val h4 : ([< Xhtml_types.h4_attrib ], [< Xhtml_types.h4_content ],
        [> Xhtml_types.h4 ])
       star

val h5 : ([< Xhtml_types.h5_attrib ], [< Xhtml_types.h5_content ],
        [> Xhtml_types.h5 ])
       star

val h6 : ([< Xhtml_types.h6_attrib ], [< Xhtml_types.h6_content ],
        [> Xhtml_types.h6 ])
       star

val address : ([< Xhtml_types.address_attrib ], [< Xhtml_types.address_content ],
        [> Xhtml_types.address ])
       star

val blockquote : ([< `Cite
         | `Class
         | `Dir
         | `Id
         | `OnClick
         | `OnDblClick
         | `OnKeyDown
         | `OnKeyPress
         | `OnKeyUp
         | `OnMouseDown
         | `OnMouseMove
         | `OnMouseOut
         | `OnMouseOver
         | `OnMouseUp
         | `Style_Attr
         | `Title
         | `XML_lang
         | `XML_space ],
        [< `Address
         | `Blockquote
         | `Del
         | `Div
         | `Dl
         | `Fieldset
         | `Form
         | `H1
         | `H2
         | `H3
         | `H4
         | `H5
         | `H6
         | `Hr
         | `Ins
         | `Noscript
         | `Ol
         | `P
         | `PCDATA
         | `Pre
         | `Script
         | `Table
         | `Ul ],
        [> `Blockquote ])
       star

val div : ([< Xhtml_types.div_attrib ], [< Xhtml_types.div_content ],
        [> Xhtml_types.div ])
       star

val p : ([< Xhtml_types.p_attrib ], [< Xhtml_types.p_content ], [> Xhtml_types.p ])
       star

val pre : ([< `Class
         | `Dir
         | `Id
         | `OnClick
         | `OnDblClick
         | `OnKeyDown
         | `OnKeyPress
         | `OnKeyUp
         | `OnMouseDown
         | `OnMouseMove
         | `OnMouseOut
         | `OnMouseOver
         | `OnMouseUp
         | `Style_Attr
         | `Title
         | `XML_lang
         | `XML_space ],
        [< `A
         | `Abbr
         | `Acronym
         | `B
         | `Bdo
         | `Big
         | `Br
         | `Button
         | `Cite
         | `Code
         | `Del
         | `Dfn
         | `Em
         | `I
         | `Iframe
         | `Img
         | `Input
         | `Ins
         | `Kbd
         | `Label
         | `Map
         | `Noscript
         | `Object
         | `PCDATA
         | `Q
         | `Ruby_complex
         | `Ruby_simple1
         | `Ruby_simple2
         | `Samp
         | `Script
         | `Select
         | `Small
         | `Span
         | `Strong
         | `Sub
         | `Sup
         | `Textarea
         | `Tt
         | `Var ],
        [> `Pre ])
       star

val abbr : ([< Xhtml_types.abbr_attrib ], [< Xhtml_types.abbr_content ],
        [> Xhtml_types.abbr ])
       star

val acronym : ([< Xhtml_types.acronym_attrib ], [< Xhtml_types.acronym_content ],
        [> Xhtml_types.acronym ])
       star

val br : ([< Xhtml_types.br_attrib ], [> Xhtml_types.br ]) nullary

val cite : ([< Xhtml_types.cite_attrib ], [< Xhtml_types.cite_content ],
        [> Xhtml_types.cite ])
       star

val code : ([< Xhtml_types.code_attrib ], [< Xhtml_types.code_content ],
        [> Xhtml_types.code ])
       star

val dfn : ([< Xhtml_types.dfn_attrib ], [< Xhtml_types.dfn_content ],
        [> Xhtml_types.dfn ])
       star

val em : ([< Xhtml_types.em_attrib ], [< Xhtml_types.em_content ],
        [> Xhtml_types.em ])
       star

val kbd : ([< Xhtml_types.kbd_attrib ], [< Xhtml_types.kbd_content ],
        [> Xhtml_types.kbd ])
       star

val q : ([< Xhtml_types.q_attrib ], [< Xhtml_types.q_content ], [> Xhtml_types.q ])
       star

val samp : ([< Xhtml_types.samp_attrib ], [< Xhtml_types.samp_content ],
        [> Xhtml_types.samp ])
       star

val span : ([< Xhtml_types.span_attrib ], [< Xhtml_types.span_content ],
        [> Xhtml_types.span ])
       star

val strong : ([< Xhtml_types.strong_attrib ], [< Xhtml_types.strong_content ],
        [> Xhtml_types.strong ])
       star

val var : ([< Xhtml_types.var_attrib ], [< Xhtml_types.var_content ],
        [> Xhtml_types.var ])
       star

Hypertext

val a : ([< Xhtml_types.a_attrib ], [< Xhtml_types.a_content ], [> Xhtml_types.a ])
       star

List

val dl : ([< Xhtml_types.dl_attrib ], [< Xhtml_types.dl_content ],
        [> Xhtml_types.dl ])
       plus

val ol : ([< Xhtml_types.ol_attrib ], [< Xhtml_types.ol_content ],
        [> Xhtml_types.ol ])
       plus

val ul : ([< Xhtml_types.ul_attrib ], [< Xhtml_types.ul_content ],
        [> Xhtml_types.ul ])
       plus

val dd : ([< Xhtml_types.dd_attrib ], [< Xhtml_types.dd_content ],
        [> Xhtml_types.dd ])
       star

val dt : ([< Xhtml_types.dt_attrib ], [< Xhtml_types.dt_content ],
        [> Xhtml_types.dt ])
       star

val li : ([< Xhtml_types.li_attrib ], [< Xhtml_types.li_content ],
        [> Xhtml_types.li ])
       star

Presentation

val hr : ([< Xhtml_types.hr_attrib ], [> Xhtml_types.hr ]) nullary

val b : ([< Xhtml_types.b_attrib ], [< Xhtml_types.b_content ], [> Xhtml_types.b ])
       star

val big : ([< Xhtml_types.big_attrib ], [< Xhtml_types.big_content ],
        [> Xhtml_types.big ])
       star

val i : ([< Xhtml_types.i_attrib ], [< Xhtml_types.i_content ], [> Xhtml_types.i ])
       star

val small : ([< Xhtml_types.small_attrib ], [< Xhtml_types.small_content ],
        [> Xhtml_types.small ])
       star

val sub : ([< Xhtml_types.sub_attrib ], [< Xhtml_types.sub_content ],
        [> Xhtml_types.sub ])
       star

val sup : ([< Xhtml_types.sup_attrib ], [< Xhtml_types.sup_content ],
        [> Xhtml_types.sup ])
       star

val tt : ([< Xhtml_types.tt_attrib ], [< Xhtml_types.tt_content ],
        [> Xhtml_types.tt ])
       star

val bdo : dir:[< `Ltr | `Rtl ] ->
       ([< Xhtml_types.bdo_attrib ], [< Xhtml_types.bdo_content ],
        [> Xhtml_types.bdo ])
       star

val area : alt:Xhtml_types.text ->
       ([< Xhtml_types.area_attrib ], [> Xhtml_types.area ])
       nullary

val map : id:Xhtml_types.id ->
       ([< Xhtml_types.map_attrib ], [< Xhtml_types.map_content ],
        [> Xhtml_types.map ])
       plus

val del : ([< Xhtml_types.del_attrib ], [< Xhtml_types.del_content ],
        [> Xhtml_types.del ])
       star

val ins : ([< Xhtml_types.ins_attrib ], [< Xhtml_types.ins_content ],
        [> Xhtml_types.ins ])
       star

val script : contenttype:Xhtml_types.contenttype ->
       ([< Xhtml_types.script_attrib ], [< Xhtml_types.script_content ],
        [> Xhtml_types.script ])
       unary

val noscript : ([< Xhtml_types.noscript_attrib ], [< Xhtml_types.noscript_content ],
        [> Xhtml_types.noscript ])
       plus

Forms

Basic Forms

One can use open Basic_Forms to enable basic forms.

module Basic_Forms: sig .. end

Forms

val form : action:Xml.uri ->
       ([< Xhtml_types.form_attrib ], [< Xhtml_types.form_content ],
        [> Xhtml_types.form ])
       plus

Generic forms. WARNING: If you find a bug or if something is missing please send a bug report to the Ocsigen project! -- VB

val input : ([< Xhtml_types.input_attrib ], [> Xhtml_types.input ])
       nullary

val label : ([< Xhtml_types.label_attrib ], [< Xhtml_types.label_content ],
        [> Xhtml_types.label ])
       star

val optgroup : label:Xhtml_types.text ->
       ([< Xhtml_types.optgroup_attrib ], [< Xhtml_types.optgroup_content ],
        [> Xhtml_types.optgroup ])
       plus

val option : ([< Xhtml_types.option_attrib ], [< Xhtml_types.option_content ],
        [> Xhtml_types.selectoption ])
       unary

val select : ([< Xhtml_types.select_attrib ], [< Xhtml_types.select_content ],
        [> Xhtml_types.select ])
       plus

val textarea : rows:Xhtml_types.number ->
       cols:Xhtml_types.number ->
       ([< Xhtml_types.textarea_attrib ], [< Xhtml_types.textarea_content ],
        [> Xhtml_types.textarea ])
       unary

val fieldset : ([< Xhtml_types.fieldset_attrib ], [< Xhtml_types.fieldset_content ],
        [> Xhtml_types.fieldset ])
       star

val legend : ([< Xhtml_types.legend_attrib ], [< Xhtml_types.legend_content ],
        [> Xhtml_types.legend ])
       star

val button : ([< Xhtml_types.button_attrib ], [< Xhtml_types.button_content ],
        [> Xhtml_types.button ])
       star

Tables

Basic Tables

One can use open Basic_Tables to switch globally to basic tables.

module Basic_Tables: sig .. end

Tables

val caption : ([< Xhtml_types.caption_attrib ], [< Xhtml_types.caption_content ],
        [> Xhtml_types.caption ])
       star

val table : ?caption:[< `Caption ] elt ->
       ?columns:[< `Colgroups of [< `Colgroup ] elt list
                 | `Cols of [< `Col ] elt list ] ->
       ([< `Border
         | `Cellpadding
         | `Cellspacing
         | `Class
         | `Datapagesize
         | `Dir
         | `Frame
         | `Id
         | `OnClick
         | `OnDblClick
         | `OnKeyDown
         | `OnKeyPress
         | `OnKeyUp
         | `OnMouseDown
         | `OnMouseMove
         | `OnMouseOut
         | `OnMouseOver
         | `OnMouseUp
         | `Rules
         | `Style_Attr
         | `Summary
         | `Title
         | `Width
         | `XML_lang
         | `XML_space ],
        [< `Tr ], [> `Table ])
       plus

val tablex : ?caption:[< `Caption ] elt ->
       ?columns:[< `Colgroups of [< `Colgroup ] elt list
                 | `Cols of [< `Col ] elt list ] ->
       ?thead:[< `Thead ] elt ->
       ?tfoot:[< `Tfoot ] elt ->
       ([< `Border
         | `Cellpadding
         | `Cellspacing
         | `Class
         | `Datapagesize
         | `Dir
         | `Frame
         | `Id
         | `OnClick
         | `OnDblClick
         | `OnKeyDown
         | `OnKeyPress
         | `OnKeyUp
         | `OnMouseDown
         | `OnMouseMove
         | `OnMouseOut
         | `OnMouseOver
         | `OnMouseUp
         | `Rules
         | `Style_Attr
         | `Summary
         | `Title
         | `Width
         | `XML_lang
         | `XML_space ],
        [< `Tbody ], [> `Table ])
       plus

val td : ([< Xhtml_types.td_attrib ], [< Xhtml_types.td_content ],
        [> Xhtml_types.td ])
       star

val th : ([< Xhtml_types.th_attrib ], [< Xhtml_types.th_content ],
        [> Xhtml_types.th ])
       star

val tr : ([< Xhtml_types.tr_attrib ], [< Xhtml_types.tr_content ],
        [> Xhtml_types.tr ])
       plus

val col : ([< Xhtml_types.col_attrib ], [> Xhtml_types.col ])
       nullary

val colgroup : ([< Xhtml_types.colgroup_attrib ], [< Xhtml_types.colgroup_content ],
        [> Xhtml_types.colgroup ])
       star

val thead : ([< Xhtml_types.thead_attrib ], [< Xhtml_types.thead_content ],
        [> Xhtml_types.thead ])
       plus

val tbody : ([< Xhtml_types.tbody_attrib ], [< Xhtml_types.tbody_content ],
        [> Xhtml_types.tbody ])
       plus

val tfoot : ([< Xhtml_types.tfoot_attrib ], [< Xhtml_types.tfoot_content ],
        [> Xhtml_types.tfoot ])
       plus

Image

val img : src:Xml.uri ->
       alt:Xhtml_types.text ->
       ([< Xhtml_types.img_attrib ], [> Xhtml_types.img ])
       nullary

Object

val object_ : ([< Xhtml_types.object__attrib ], [< Xhtml_types.object__content ],
        [> Xhtml_types.object_ ])
       star

val param : name:Xhtml_types.text ->
       ([< Xhtml_types.param_attrib ], [> Xhtml_types.param ])
       nullary

Frames

val frameset : ?noframes:[< `Noframes ] elt ->
       ([< Xhtml_types.frameset_attrib ], [< Xhtml_types.frameset_content ],
        [> Xhtml_types.frameset ])
       plus

val frame : src:Xml.uri ->
       ([< Xhtml_types.frame_attrib ], [> Xhtml_types.frame ])
       nullary

val noframes : ([< Xhtml_types.noframes_attrib ], [< Xhtml_types.noframes_content ],
        [> Xhtml_types.noframes ])
       unary

val iframe : ([< Xhtml_types.iframe_attrib ], [< Xhtml_types.iframe_content ],
        [> Xhtml_types.iframe ])
       star

Style Sheets

val style : contenttype:Xhtml_types.contenttype ->
       ([< Xhtml_types.style_attrib ], [< Xhtml_types.style_content ],
        [> Xhtml_types.style ])
       star

Link

val link : ([< Xhtml_types.link_attrib ], [> Xhtml_types.link ])
       nullary

Base

val base : href:Xml.uri ->
       ([< Xhtml_types.base_attrib ], [> Xhtml_types.base ])
       nullary

Ruby

val ruby_simple1 : ?a:[< Xhtml_types.common ] attrib list ->
       [< `Rb ] elt ->
       [< `Rt ] elt -> [> `Ruby_simple1 ] elt

val ruby_simple2 : ?a:[< Xhtml_types.common ] attrib list ->
       [< `Rb ] elt ->
       [< `Rp ] elt ->
       [< `Rt ] elt ->
       [< `Rp ] elt -> [> `Ruby_simple2 ] elt

val ruby_complex : ?a:[< Xhtml_types.common ] attrib list ->
       [< `Rbc ] elt ->
       [< `Rtc_complex ] elt ->
       [> `Ruby_complex ] elt

val rbc : ([< Xhtml_types.rbc_attrib ], [< Xhtml_types.rbc_content ],
        [> Xhtml_types.rbc ])
       plus

val rtc : ([< Xhtml_types.rtc_attrib ], [< Xhtml_types.rtc_content ],
        [> Xhtml_types.rtc ])
       plus

val rtc_complex : ([< Xhtml_types.rtc_complex_attrib ], [< Xhtml_types.rtc_complex_content ],
        [> Xhtml_types.rtc_complex ])
       plus

val rb : ([< Xhtml_types.rb_attrib ], [< Xhtml_types.rb_content ],
        [> Xhtml_types.rb ])
       star

val rt : ([< Xhtml_types.rt_attrib ], [< Xhtml_types.rt_content ],
        [> Xhtml_types.rt ])
       star

val rt_complex : ([< Xhtml_types.rt_complex_attrib ], [< Xhtml_types.rt_complex_content ],
        [> Xhtml_types.rt_complex ])
       star

val rp : ([< Xhtml_types.rp_attrib ], [< Xhtml_types.rp_content ],
        [> Xhtml_types.rp ])
       star

val a_rbspan : Xhtml_types.number -> [> `Rbspan ] attrib

...

val tot : Xml.elt -> 'a elt

val totl : Xml.elt list -> 'a elt list

val toelt : 'a elt -> Xml.elt

val toeltl : 'a elt list -> Xml.elt list

...

type doc = [ `Html ] elt

val doc_toelt : doc -> Xml.elt