#N canvas 0 0 865 473 10;
#X obj 197 160 expr~ $v1*(abs($v1) + $f2)/(pow($v1 \, 2) + ($f2 - 1)*abs($v1)
+1);
#X obj 191 94 adc~;
#X obj 195 366 dac~;
#X obj 197 127 *~ 0.5;
#X obj 196 332 *~ 0.5;
#X obj 269 17 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 5600 1;
#X obj 265 207 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 3400 1;
#X floatatom 528 91 5 0 0;
#X connect 0 0 4 0;
#X connect 1 0 3 0;
#X connect 1 1 3 0;
#X connect 3 0 0 0;
#X connect 4 0 2 0;
#X connect 4 0 2 1;
#X connect 5 0 3 1;
#X connect 6 0 4 1;
#X connect 7 0 0 1;