static L<SRTEntry> srtFillCompletely(L<SRTEntry> l) {
  for (Pair<SRTEntry> p : overlappingPairs(l))
    p.a.end = p.b.start;
  ret l;
}