// design by Kriti Shankar Senapati
// title is in HTML
sS htitledSectionWithDiv(S title, O contents, O... _) {
  S backgroundColor = "#fff"; // TODO: grab from params
  S labelStyle = "width: auto; float: top; position: relative; top: -.6em; left:15px; background-color: " + backgroundColor;
  
  S innerDivStyle = stringPar innerDivStyle(_);
  S innerDivClass = stringPar innerDivClass(_);
  optPar S innerDivID;
  _ = paramsMinus(_, "innerDivStyle", "innerDivID", "innerDivClass");

  ret div(
      htag label(b(" " + title + " "), style := labelStyle)
    + div(contents,
      style := joinNemptiesWithSemicolon(innerDivStyle, "padding-left: 15px"),
        class := joinNemptiesWithSpace("sectionContents", innerDivClass),
        id := innerDivID),
      params_stylePlus("border: 2px solid", _);
}