(use-modules (ice-9 format))
(new seq :name 'pulse
:subobjects
(loop with d = .1
for i below 80
collect (new midi :time (* i d)
:keynum (pickl '(c4 d4 ef4 f4 g4 af4 bf4 c5))
:duration d
:amplitude (interp (mod i 8) 0 .25 7 .75))))
(list-objects #&pulse :end 3)
_______________________________________________
Cmdist mailing list
[email protected]
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
please let me know if using (ice-9 format) this fixes the problem,
try this:
- [CM] CM tutorial example raises out-of-range error on guile/Sn... Carlos Pita
- Re: [CM] CM tutorial example raises out-of-range error on... Rick Taube
