fact: Definition Vrel1_nth n A (R : relation A) : relation (vector A n) := fun v1 v2 : vector A n => exists i (hi : i<n), R (Vnth v1 hi) (Vnth v2 hi) /\ forall j (hj : j<n), j <> i -> Vnth v1 hj = Vnth v2 hj.
imports: CoLoR(LogicUtil VecUtil RelUtil NatUtil SN)