(
SynthDef(\tom, {
	var freq, decay, mod, sig, base, noise, vibrato, pitchEnv, ampEnv, filterEnv;
	freq = \freq.kr(120);
	decay = \decay.kr(1.6);
	ampEnv = Env.perc(0, decay).ar(Done.freeSelf);
	filterEnv = Env.perc(0, 0.15).ar;
	pitchEnv = Env.perc(0, 0.035).ar;
	noise = WhiteNoise.ar;
	base = SinOsc.ar(freq + (freq * pitchEnv) * [0.5, 1]).sum;
	sig = Splay.ar([base, noise], 0.1) * ampEnv * -2.dbamp;
	sig = RLPF.ar(sig, 200 + (\ff.kr(900) * filterEnv), 0.45);
	// sig = Fold.ar(sig, -0.6, 0.8);
	sig = sig + GVerb.ar(sig, 22, 1, 0.8) * -16.dbamp;
	Out.ar(\out.kr(0), sig * \amp.kr(1));
}).add;
)

Synth(\tom, [freq: 90, decay: 2]);