fact: Definition nat_factor_list (p: fterm) n := [/\ ord_below p n, forall i, i<c n -> nat_prime (p i) & forall i, natp i -> csucc i <c n -> (p (csucc i)) <=o p i].
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)