fact: Fixpoint nat_seq (start:nat) (nb:nat) := match nb with | O => nil | S nb' => start :: nat_seq (S start) nb' end.
imports: Coq.Classes.Morphisms TLC(LibTactics LibLogic LibReflect LibOperation LibProd LibOption LibNat LibInt LibWf LibMonoid LibRelation)