fact: Axiom randomRNatCorrect: forall n n1 n2, n1 <= n2 -> (n1 <= n <= n2 <-> exists seed, (fst (randomRNat (n1, n2) seed)) = n).
imports: mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool ssrnat eqtype) ZArith LazyList Tactics List