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