rsc3/doc/examples/ugen/unary-ops/neg.help.scm

9 lines
119 B
Scheme
Raw Normal View History

2022-08-24 13:53:18 +00:00
;; (neg a)
;; Negation.
(let ((s (sin-osc ar 440 0)))
(audition
(out 0 (mce2 (mul s 0.1)
(add s (neg s))))))