fact: CoFixpoint mkSeedTree (s : RandomSeed) : RandomSeedTree := let (s1, s2) := randomSplit s in RstNode s (mkSeedTree s1) (mkSeedTree s2).
imports: mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool ssrnat eqtype) ZArith LazyList Tactics