Set Implicit Arguments.
Require Vector.
Require qs_definitions.
Require U.
Require vec.
Section contents.
Variables (ee: E) (ol: list ee).

Lemma ranges (b i j l: nat): (b <= i -> i < j -> j < b + l ->
exists i', exists j', exists r, b + i' = i /\ S (b + i' + j') = j /\ i' + S (j' + S r) = l)%nat.