sig
  val a :
    ?a:Xhtmltypes.a_attrib XHTML.M.attrib list ->
    ('a, unit, [< Eliom.get_service_kind ], [< Eliom.suff ], 'b,
     unit Eliom.param_name, [< Eliom.registrable ])
    Eliom.service ->
    Eliom.server_params ->
    Xhtmltypes.a_content XHTML.M.elt list ->
    '-> [> Xhtmltypes.a ] XHTML.M.elt
  val css_link :
    ?a:Xhtmltypes.link_attrib XHTML.M.attrib list ->
    XHTML.M.uri -> [> Xhtmltypes.link ] XHTML.M.elt
  val js_script :
    ?a:Xhtmltypes.script_attrib XHTML.M.attrib list ->
    XHTML.M.uri -> [> Xhtmltypes.script ] XHTML.M.elt
  val make_uri :
    ('a, unit, [< Eliom.get_service_kind ], [< Eliom.suff ], 'b,
     unit Eliom.param_name, [< Eliom.registrable ])
    Eliom.service -> Eliom.server_params -> '-> XHTML.M.uri
  val get_form :
    ?a:Xhtmltypes.form_attrib XHTML.M.attrib list ->
    ('a, unit, [< Eliom.get_service_kind ], [< Eliom.suff ], 'b,
     unit Eliom.param_name, [< Eliom.registrable ])
    Eliom.service ->
    Eliom.server_params ->
    ('-> Xhtmltypes.form_content XHTML.M.elt list) ->
    [> Xhtmltypes.form ] XHTML.M.elt
  val post_form :
    ?a:Xhtmltypes.form_attrib XHTML.M.attrib list ->
    ('a, 'b, [< Eliom.post_service_kind ], [< Eliom.suff ], 'c, 'd,
     [< Eliom.registrable ])
    Eliom.service ->
    Eliom.server_params ->
    ('-> Xhtmltypes.form_content XHTML.M.elt list) ->
    '-> [> Xhtmltypes.form ] XHTML.M.elt
  val int_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:int -> int Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val float_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:float ->
    float Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val string_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:string ->
    string Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val user_type_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:'->
    ('-> string) ->
    'Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val int_password_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:int -> int Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val float_password_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:float ->
    float Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val string_password_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:string ->
    string Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val user_type_password_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:'->
    ('-> string) ->
    'Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val hidden_int_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    int Eliom.param_name -> int -> [> Xhtmltypes.input ] XHTML.M.elt
  val hidden_float_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    float Eliom.param_name -> float -> [> Xhtmltypes.input ] XHTML.M.elt
  val hidden_string_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    string Eliom.param_name -> string -> [> Xhtmltypes.input ] XHTML.M.elt
  val hidden_user_type_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ('-> string) ->
    'Eliom.param_name -> '-> [> Xhtmltypes.input ] XHTML.M.elt
  val bool_checkbox :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?checked:bool ->
    bool Eliom.param_name -> [> Xhtmltypes.input ] XHTML.M.elt
  val string_radio :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?checked:bool ->
    string option Eliom.param_name ->
    string -> [> Xhtmltypes.input ] XHTML.M.elt
  val int_radio :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?checked:bool ->
    int option Eliom.param_name -> int -> [> Xhtmltypes.input ] XHTML.M.elt
  val float_radio :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?checked:bool ->
    float option Eliom.param_name ->
    float -> [> Xhtmltypes.input ] XHTML.M.elt
  val user_type_radio :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?checked:bool ->
    ('-> string) ->
    'a option Eliom.param_name -> '-> [> Xhtmltypes.input ] XHTML.M.elt
  val textarea :
    ?a:Xhtmltypes.textarea_attrib XHTML.M.attrib list ->
    string Eliom.param_name ->
    rows:XHTML.M.number ->
    cols:XHTML.M.number ->
    [ `PCDATA ] XHTML.M.elt -> [> Xhtmltypes.textarea ] XHTML.M.elt
  val select :
    ?a:Xhtmltypes.select_attrib XHTML.M.attrib list ->
    ?selected:(string option * string) option ->
    string option * string ->
    (string option * string) list ->
    string Eliom.param_name -> [> Xhtmltypes.select ] XHTML.M.elt
  val submit_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    string -> [> Xhtmltypes.input ] XHTML.M.elt
  val file_input :
    ?a:Xhtmltypes.input_attrib XHTML.M.attrib list ->
    ?value:string ->
    Extensions.file_info Eliom.param_name ->
    [> Xhtmltypes.input ] XHTML.M.elt
end