openscad/BOSL2
1
0
Fork 0
mirror of https://github.com/revarbat/BOSL2.git synced 2025-08-19 17:21:55 +02:00
Code Issues Projects Releases Wiki Activity

Fixed bugs in hull_points, added seeds to tests, added seed parm to shuffle()

Browse Source
This commit is contained in:
Adrian Mariano
2020-12-22 18:15:25 -05:00
parent e10a70fc98
commit a495528398
5 changed files with 42 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
arrays.scad
View File

@@ -672,15 +672,20 @@ function _valid_idx(idx,imin,imax) =
// Function: shuffle()
// Usage:
// shuffled = shuffle(list,[seed])
// Description:
// Shuffles the input list into random order.
// If given a string, shuffles the characters within the string.
function shuffle(list) =
// If you give a numeric seed value then the permutation
// will be repeatable.
function shuffle(list,seed) =
assert(is_list(list)||is_string(list), "Invalid input." )
is_string(list)? str_join(shuffle([for (x = list) x])) :
is_string(list)? str_join(shuffle([for (x = list) x],seed=seed)) :
len(list)<=1 ? list :
let (
rval = rands(0,1,len(list)),
rval = is_num(seed) ? rands(0,1,len(list),seed_value=seed)
: rands(0,1,len(list)),
left = [for (i=[0:len(list)-1]) if (rval[i]< 0.5) list[i]],
right = [for (i=[0:len(list)-1]) if (rval[i]>=0.5) list[i]]
)