s.options.memSize = 2.pow(20);
s.boot;

~inBus = Bus.audio(s, 1);
~out = { Out.ar(~inBus, SoundIn.ar(0)) }.play;

~freezeDict = BmDspAlgs.getDict("spectral/fft_freeze.scd");
~freezeDict.makeBufferProcessingNdef(\freezeOnly);
Ndef(\freezeOnly).set(\in, ~inBus.index);
Ndef(\freezeOnly).reshaping = \elastic;
Ndef(\freezeOnly).play;


Ndef(\freezeOnly).stop;
Ndef(\freezeOnly).set(\freezeGate, 0);
Ndef(\freezeOnly).set(\freezeGate, 1);

Ndef(\freezeOnly).put(90, \filter -> {|in|
  [in[0], in[1] + SinOsc.kr(0.1).range(0.9, 1.0)] * 0.5;
});

Ndef(\freezeOnly).set(\phaseJitter, 10);

Ndef(\freezeOnly).ar(2);

~out.free

Ndef(\freezeOnly).set(\pan, 0);

~freezeDict.makeBufferProcessingNdef(\freezeOnly2);
Ndef(\freezeOnly2).ar(2);
Ndef(\freezeOnly2).set(\in, ~inBus.index);
Ndef(\freezeOnly2).play;
Ndef(\freezeOnly2).set(\freezeGate, 1);
Ndef(\freezeOnly2).set(\amp, 0.2)