Lemma el_tl {n} (v : vec A (S n)) (i : ⟦ n ⟧) : el (tl v) i = drop (el v) i. Proof. apply idpath. Defined.
Require Import UniMath.Combinatorics.StandardFiniteSets. Require Import UniMath.Foundations.NaturalNumbers.