sS hlabelFor(S id, O contents) {
  ret empty(contents) ? "" : htag label(contents, "for" := id);
}