Lemma omit_concat_second_part' : forall (n m : Nat) (A : Setoid) (v : seq n A) (w : seq m A) (i : Nat) (Hi : i < m) (Hi' : n + i < n + m) (H : n + pred m = pred (n + m)), seq_equal (omit (v ++ w) (Build_finiteT Hi')) (v ++ omit w (Build_finiteT Hi)).