wy2gau ( r -- gaussian )


Vocabulary
checksums.wyhash.private

Inputs
ran object


Outputs
gaussianan object


Definition


: wy2gau ( r -- gaussian )
[ ] [ -21 shift ] [ -42 shift ] tri [ 2097151 bitand ] tri@
+ + 9.5367431640625e-7 * 3.0 - ;