let colgroup ?align ?valign ?span ?width ?attrs cols = ( Low.colgroup ?attrs ~children:cols () ) >>> set_opt_attrs [ "align",align ; "valign",valign ; "span",span ; "width",width ]