(* Attribute creation *)

let id v = H.TextAttr ("id", v)

let class_ v = H.TextAttr ("class", v)

let viewBox v = H.TextAttr ("viewBox", v)

let d v = H.TextAttr ("d", v)

let type_ v = H.TextAttr ("type", v)

let min_ v = H.TextAttr ("min", v)

let value v = H.TextAttr ("value", v)

let for_ v = H.TextAttr ("for", v)

let style v = H.TextAttr ("style", v)

let href v = H.TextAttr ("href", v)

let autocomplete v = H.TextAttr ("autocomplete", v)