<sfmt-state> ( seed n m mask parity -- sfmt )

Vocabulary

random.sfmt.private

Inputs

seed	an object
n	an object
m	an object
mask	an object
parity	an object

Outputs

sfmt

an object

Definition

USING: accessors kernel ;

IN: random.sfmt.private

: <sfmt-state> ( seed n m mask parity -- sfmt )
    sfmt-state new swap >>parity swap >>mask swap >>m swap >>n
    swap >>seed 0 >>index ;