sig
  type name = string
  type t
  val v : B0_web.Htmlg.Att.name -> string -> B0_web.Htmlg.Att.t
  val add_if :
    bool ->
    B0_web.Htmlg.Att.t -> B0_web.Htmlg.Att.t list -> B0_web.Htmlg.Att.t list
  val add_some :
    B0_web.Htmlg.Att.name ->
    string option -> B0_web.Htmlg.Att.t list -> B0_web.Htmlg.Att.t list
  type 'a cons = '-> B0_web.Htmlg.Att.t
  val autofocus : B0_web.Htmlg.Att.t
  val charset : string B0_web.Htmlg.Att.cons
  val checked : B0_web.Htmlg.Att.t
  val class' : string B0_web.Htmlg.Att.cons
  val content : string B0_web.Htmlg.Att.cons
  val disabled : B0_web.Htmlg.Att.t
  val for' : string B0_web.Htmlg.Att.cons
  val height : int B0_web.Htmlg.Att.cons
  val href : string B0_web.Htmlg.Att.cons
  val id : string B0_web.Htmlg.Att.cons
  val media : string B0_web.Htmlg.Att.cons
  val name : string B0_web.Htmlg.Att.cons
  val placeholder : string B0_web.Htmlg.Att.cons
  val rel : string B0_web.Htmlg.Att.cons
  val src : string B0_web.Htmlg.Att.cons
  val tabindex : int B0_web.Htmlg.Att.cons
  val title : string B0_web.Htmlg.Att.cons
  val type' : string B0_web.Htmlg.Att.cons
  val value : string B0_web.Htmlg.Att.cons
  val width : int B0_web.Htmlg.Att.cons
end