fact: Fixpoint Vfold_right (A B : Type) (f : A->B->B) n (v : vector A n) (b:B) : B := match v with | Vnil => b | Vcons a w => f a (Vfold_right f w b) end.
imports: Coq(Vector Program Structures.Equalities Morphisms) CoLoR(LogicUtil NatUtil EqUtil ListUtil BoolUtil RelUtil)