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

@title{FreeSelf}
 When triggered, free enclosing synth.@section{related}
  Classes/PauseSelf, Classes/Free
@section{categories}
   UGens>Synth control


@section{description}

Free enclosing synth when input signal crosses from non-positive to
positive.


@section{classmethods}
 

@section{method}
 kr

@section{argument}
 in

The input signal.


@section{Examples}
 


@racketblock[
(
SynthDef("freeSelf-help", { arg out, t_trig;
	FreeSelf.kr(t_trig);
	Out.ar(out, SinOsc.ar(400,0,0.2));
}).add;
)

s.sendMsg("/s_new", "freeSelf-help", 1731);
s.sendMsg("/n_set", 1731, \t_trig, 1);

// a single impulse SynthDef:

(
SynthDef("dirac", { arg out, amp=0.1;
	var u;
	u = Impulse.ar(1);
	FreeSelf.kr(u);
	Out.ar(out, u * amp);
		// multiply by amp after using for release, so amp = 0
		// doesn't cause synth buildup.
}).add;
)

(
Task {
	loop({
		fork {
			exprand(34, 156).do {|i|
				i = i + 1;
				s.sendMsg("/s_new", "dirac", -1,0,0, \amp, 1 / i);
				(0.006 * i).wait;
			};
		};
		1.wait;
	})
} .play;
)
::

]