Random BigInteger

[ThomasJohnsen]

You are absolutely right - I failed to look properly through your code before making the remark.

There is a question, I'd like to ask though out of curiosity:
I have looked at this for a while:

            Dim n() As Byte = New Byte(_prng.Next(aMinL, aMaxL + 1)) {}
            'what if _prng.NextBytes(n)  see *** near end of for loop
            For y As Integer = 0 To n.Length - 1
                Dim nb As Byte = CByte(_prng.Next(0, 2))
                For x As Integer = 1 To 7
                    nb = nb Or CByte(_prng.Next(0, 2) << x)
                Next
                '*** what if n(y) = n(y) Xor nb instead of n(y) = nb
                n(y) = nb
            Next

and it seems to me to be completely equivalent to using

Dim n() As Byte = New Byte(_prng.Next(aMinL, aMaxL + 1)) {}
_prng.NextBytes(n)

though your comments suggest otherwise. I fail to see how taking random bits on a by 8 basis is any different than taking a random byte, but there may be something I am missing. Using the latter gives completely equivalent statistical data in the examples, I tried.


#EDIT: And I ofc forgot to appologize, which was the intention of this post:

My appologies for making a rash statement about your code before looking properly through it .