sbool assertSorted(Cl l) {
  if (!isSortedList(l))
    fail(shorten("List isn't sorted: " + l));
}