fact: Definition injectivity_cons {A} (u v : tele (x : A) (n : nat) in vector A n) : (&(S u.2.1 & @Vector.cons A u.1 u.2.1 u.2.2) = &(S v.2.1 & @Vector.cons A v.1 v.2.1 v.2.2)) <~> u == v := equiv_compose (noconf_equiv A &(S u.2.1 & @Vector.cons A u.1 u.2.1 u.2.2) &(S v.2.1 & @Vector.cons A v.1 v.2.1 v.2.2)) (eq_points_equiv (tele (x : A) (n : nat) in vector A n) _ _).
imports: Equations Utf8 DepElimDec EqDecInstances