Evaluated proc n_arsebackwards_rands' {n max} {set aret [list]; foreach z [nist_rand {} $n] {lappend aret [expr $z % $max]}; return $aret}

This commit is contained in:
radical_honesty on #flashsupport 2022-12-26 18:16:10 -08:00 committed by dupa dup
parent 664fc34caa
commit e430ea4106
2 changed files with 2 additions and 0 deletions

View File

@ -10,6 +10,7 @@ fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f
gay 2871591e64f027a23fadafaa00305a8bd3484292
gay_real 7350d9495ac03aaeea097bcb716a52eacbda7ce0
isgitworkingatall 446e36f703ad4368f85a4fb396371f7e6ec4d86e
n_arsebackwards_rands' dbe0cbd1b5f7bc866fe4775a9b82c4c319740c70
n_r_r d2aee9543bb4d625863781234a7a0967026a85f1
nist_rand be4fc6825952b2d54286259ef360a9b8a073d5e1
nist_rand' 689f4294eb670cf61758663926c0fe538d7021c6

View File

@ -0,0 +1 @@
{n max} {set aret [list]; foreach z [nist_rand {} $n] {lappend aret [expr $z % $max]}; return $aret}