fact: Fixpoint bools_find_first n (v : vector bool n) := match v with | Vnil => None | Vcons true w => Some 0 | Vcons false w => match bools_find_first w with | None => None | Some r => Some (S r) end end.
imports: Coq(Permutation Multiset Heap PermutSetoid) CoLoR(AdjMat RelUtil ListExtras LogicUtil VecUtil NatUtil RelSub Path SortUtil ListNodup OptUtil BoundNat SCC SCC_dec Total)