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

Theorem qs_sound_cmps_2: forall l,
forall r, ne_tree.In r (qs l) ->
forall i j, In (i, j) (fst r) -> IndexIn i l /\ IndexIn j l.