programm randomization code

gistfile1.txt

--- scales
{keys=ss(`A Eb`);}
Scales: {keys} {[`three octaves`, scalePositions()]}
Scales: {zipSpace(keys, ss(`thirds, sixths, octaves`))} [scalePositionsDbl()]
--- bowing
Bowing: arches over [pick(`dim sixths`)], p{divide(ss(`1 2 3 4 5 6`), 2)}
--- shifting
Shifting: position 4 [pick(s(`octaves from 1st, shifts 1-4, shifts 1234`))] [s(`G D A E`)] [s(`0 -1 +1`)] 
Shifting: Sevcik, no gliss [ss(`G D A E`)]
-=-
{zipT(divide(block('scales'), 2), divide(block('bowing'), 2),  divide(block('shifting'), 2)).flat().flat()}