#N canvas 78 22 892 632 10;
#X obj 28 14 tgl 15 0 empty empty empty 20 8 0 10 -262144 -1 -1 0 1
;
#X floatatom 28 81 5 0 0 0 - - -;
#X floatatom 44 59 3 0 0 0 - - -;
#X obj 28 36 dsp;
#X obj 468 27 loadbang;
#X text 425 251 see also:;
#X obj 493 251 tabread4~;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array99 13 float 0;
#X coords 0 5.5 12 -5.5 250 200 1;
#X restore 121 44 graph;
#X text 116 -15 4-point-interpolating table lookup;
#X obj 41 523 snapshot~;
#X obj 194 489 metro 200;
#X obj 40 426 sig~;
#X floatatom 41 549 0 0 0 0 - - -;
#X text 42 272 Tabread4~ is used to build samplers and other table
lookup algorithms. The interpolation scheme is 4-point polynomial.
;
#X text 13 -15 tabread4~~;
#X obj 41 488 tabread4~~ array99;
#X obj 194 444 loadbang;
#X obj 194 468 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 158 10 table array98 1.7e+07;
#X obj 294 530 snapshot~;
#X obj 293 454 sig~;
#X floatatom 294 556 0 0 0 0 - - -;
#X obj 293 491 tabread4~ array99;
#X floatatom 155 356 0 0 0 0 - - -;
#X obj 145 430 sig~;
#N canvas 0 22 470 320 copy_99_into_98 0;
#X obj 55 199 tabwrite~ array98;
#X msg 80 105 start 1.698e+07;
#X obj 55 128 tabplay~ array99;
#X obj 55 62 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 146 150 stop;
#X obj 55 83 t b b;
#X obj 55 24 inlet;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 2 1 4 0;
#X connect 3 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 2 0;
#X connect 5 1 1 0;
#X connect 6 0 3 0;
#X restore 408 222 pd copy_99_into_98;
#X obj 408 50 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 293 432 + 0;
#X obj 408 69 t b b;
#X obj 158 337 hsl 101 15 1 11 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 6000 1;
#X obj 306 412 r \$0_offset;
#X obj 145 408 r \$0_offset;
#X obj 334 467 r \$0_which_table;
#X obj 47 461 r \$0_which_table;
#X msg 433 92 \; array98 const 0 \; array99 resize 13 \; array99 0
-5 -5 -4 -3 -2 -1 0 1 2 3 4 5 5 \; array99 bounds 0 5.5 12 -5.5 \;
array99 xticks 0 1 2 \; array99 yticks 0 0.5 5 \; array99 xlabel -6
0 2 4 6 8 10 12 \; array99 ylabel -0.4 -5 -4 -3 -2 -1 0 1 2 3 4 5;
#N canvas 0 22 470 320 select_table 0;
#X obj 55 24 inlet;
#X msg 55 112 0;
#X msg 109 180 1.698e+07;
#X obj 55 90 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 109 158 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 55 133 s \$0_offset;
#X obj 109 201 s \$0_offset;
#X obj 186 200 s \$0_which_table;
#X msg 186 178 set array98;
#X obj 127 133 s \$0_which_table;
#X msg 127 111 set array99;
#X obj 55 47 sel 0 1;
#X connect 0 0 11 0;
#X connect 1 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 10 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
#X connect 4 0 8 0;
#X connect 8 0 7 0;
#X connect 10 0 9 0;
#X connect 11 0 3 0;
#X connect 11 1 4 0;
#X restore 275 370 pd select_table;
#X obj 275 336 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
-1 1;
#X text 294 334 array99 offset=0;
#X text 293 349 array98 offset=1.698e+07;
#X text 604 546 IEM KUG;
#X text 588 534 musil;
#X text 625 534 @;
#X text 634 534 iem.at;
#X text 587 556 Graz \, Austria;
#X text 647 508 @;
#X text 656 508 iem.at;
#X text 588 508 zmoelnig;
#X obj 408 29 sel 1;
#X text 539 495 (c) IOhannes m zmoelnig 1999 - 2013;
#X text 539 523 (c) Thomas Musil 2000 - 2013;
#X connect 0 0 3 0;
#X connect 0 0 47 0;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 26 0;
#X connect 9 0 12 0;
#X connect 10 0 9 0;
#X connect 10 0 19 0;
#X connect 11 0 15 0;
#X connect 15 0 9 0;
#X connect 16 0 17 0;
#X connect 17 0 10 0;
#X connect 19 0 21 0;
#X connect 20 0 22 0;
#X connect 22 0 19 0;
#X connect 23 0 11 0;
#X connect 23 0 27 0;
#X connect 24 0 15 1;
#X connect 26 0 28 0;
#X connect 27 0 20 0;
#X connect 28 0 25 0;
#X connect 28 1 34 0;
#X connect 29 0 23 0;
#X connect 30 0 27 1;
#X connect 31 0 24 0;
#X connect 32 0 22 0;
#X connect 33 0 15 0;
#X connect 36 0 35 0;
#X connect 47 0 26 0;