Definition contiguous_range_exact_lo xs lo :=
    (forall i,
       lo < i <= maxIndex xs ->
       exists e,
         eIndex e = i /\
         In e xs) /\
    (forall e,
       In e xs ->
       lo < eIndex e).

Lemma maxIndex_removeAfterIndex_le : forall l i, sorted l -> maxIndex (removeAfterIndex l i) <= maxIndex l.