[Get different random repeat at each draw with gen-repeat]

Sorry but i think it does the same thing 

(setf chords
      (gen-chord2 12 3 
                  (gen-repeat 12
                              (rnd-sample 3 '(c4 cs4 e4 f4 g4 gs4 a4 b4)))
                  :offset '(2)
                  :transpose '(3 8 -3)))

=> (bb4d5d5 g5eb5g5 gs4gs4e4 bb4d5d5 g5eb5g5 gs4gs4e4
   bb4d5d5 g5eb5g5 gs4gs4e4 bb4d5d5 g5eb5g5 gs4gs4e4)

It repeats several times the same set of three chords . What i am looking for is to have 12 different chords 

[Get different random repeat at each draw with gen-repeat]

Hello

i would like to have this function to repeat 12 times different random repeats of 3 pitches at each draw and not as it does right now 12 times the same choice .

I know it is easy but i can't recall how i can achieve this 

(setf chords
      (gen-chord2 12 3
                  (gen-repeat
                   12
                   (rnd-repeat '(3) '(c4 cs4 e4 f4 g4 gs4 a4 b4)))
                  :offset '(2)
                  :transpose '(3 8 -3)))

Thanks 

Patrick

[I try to make this set of functions to work]

So the solution is to place it before the function  as a variable isn't it  ?

[I try to make this set of functions to work]

hello i try to make this work any idea ?

(gen-filter-change 
 (permute '(gs4 e4 d4 c4 c4 a4 fs4)) 
 '(1/16 1/2 1/4 1/4)
 '(pp ff mf))

Thanks,

Patrick

[gen-filter-change function question]

I would like to understand why if i express this function that way it works fine 

(gen-filter-change (vector-to-pitch '(g4 g5) (gen-white-noise 64 :seed 246))
 (vector-to-length 's 1 5 (gen-white-noise 32 :seed 456))
 (vector-to-velocity 'mp 'ff (gen-white-noise 122 )))

and if i do that 

(gen-filter-change '(gs4 e4 e4 d4 e4 gs4 d4 c4 fs4 gs4 e4 e4 c4 e4 gs4 d4 gs4 fs4 fs4 d4)
                   '(1/16 1/2 1/4 1/4) '(s e s s e)
                   '(mf mf mp ff mf mf mp mf ff mf mf f f mf mf mp ff mf f mp ff ff f
                     mp ff f f mp mf mp f ff f mf mf mf ff mf mp f ff f mf mp f f mf
                     ff f f mf f mp mf f ff f mp mf mf f ff f mf mp f mf mf mf mf mf
                     mf f mf mf f f ff mf f mf f mp f mf f mp f mf mf f mp mp mf mf mf
                     mf f ff f mf mp mp mf mf mf f mp f f f f f f f mf f mf mp mp f mp))

It doesn't work , why can't we enter velocities manually?

 

Thanks

[Clauses, String Quartet and VSL]

Thanks

Patrick

[Clauses, String Quartet and VSL]

When evaluating any of the  v1-gcl  v2-gcl  etc ... 

 (rnd-sample len (primes 5 3))

 

I get this error message:

> Error: Too many arguments in call to #<Compiled-function primes #x3000010BC1BF>:
>        2 arguments provided, at most 1 accepted. 
> While executing: primes, in process Listener-1(9).
> Type cmd-. to abort, cmd-\ for a list of available restarts.
> Type :? for other options.

 

something wrong?