proposition: Lemma nth_rev : forall `{Inhab A} n l, n < length l -> nth n (rev l) = nth (length l - 1 - n) l.
proof: Proof. Proof using. introv L. applys nth_of_Nth. applys~ Nth_rev'. applys~ Nth_of_nth. math. Qed.
imports: Coq.Classes.Morphisms TLC(LibTactics LibLogic LibReflect LibOperation LibProd LibOption LibNat LibInt LibWf LibMonoid LibRelation)