#lang scribble/manual
@(require (for-label racket))

@title{(distort a)}

Nonlinear distortion.

(audition 
   (out 0 (mul (distort (mul (f-sin-osc ar 500 0.0)
			     (x-line kr 0.1 10 10 do-nothing)))
	       0.25)))