{A : Type} {n : nat} (v : Vector A n) (i j : nat) (Hi : (i < n)%nat) (Hj : (j < n)%nat) (p : i = j) : entry v i = entry v j. Proof. destruct p. apply nth'_nth'. Defined.
Require Import Basics.Overture Basics.Trunc Basics.Tactics Basics.PathGroupoids. Require Import Types.Sigma. Require Import Algebra.AbGroups.AbelianGroup Algebra.Rings.Ring Algebra.Rings.Module. Require Import Spaces.Nat.Core. Require Import Spaces.List.Core Spaces.List.Theory Spaces.List.Paths. Require Import abstract_algebra.