sig
  val data : string -> 'Xhtml_sigs.T_01_01.elt
  val node :
    string ->
    ?a:'Xhtml_sigs.T_01_01.attrib list ->
    'Xhtml_sigs.T_01_01.elt list -> 'Xhtml_sigs.T_01_01.elt
  val leaf :
    string ->
    ?a:'Xhtml_sigs.T_01_01.attrib list -> unit -> 'Xhtml_sigs.T_01_01.elt
  val string_attrib : string -> string -> 'Xhtml_sigs.T_01_01.attrib
  val float_attrib : string -> float -> 'Xhtml_sigs.T_01_01.attrib
  val int_attrib : string -> int -> 'Xhtml_sigs.T_01_01.attrib
  val uri_attrib :
    string -> Xhtml_sigs.T_01_01.uri -> 'Xhtml_sigs.T_01_01.attrib
  val space_sep_attrib :
    string -> string list -> 'Xhtml_sigs.T_01_01.attrib
  val comma_sep_attrib :
    string -> string list -> 'Xhtml_sigs.T_01_01.attrib
end