#N canvas 209 115 626 459 10;
#N canvas 0 0 450 300 intv2ratio 0;
#X obj 25 45 inlet;
#X obj 25 189 outlet;
#X text 100 239 1994 by Karlheinz Essl;
#X obj 25 146 pow;
#X obj 25 103 t b f;
#X msg 25 126 2;
#X obj 25 79 / 12;
#X text 460 107 < ln(2) / 12;
#X text 227 107 [expr exp($f1* 0.0577622650467)];
#X text 231 88 In Max this was:;
#X connect 0 0 6 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 4 1 3 1;
#X connect 5 0 3 0;
#X connect 6 0 4 0;
#X restore 188 207 pd intv2ratio;
#X obj 148 298 s_playtable;
#X obj 188 183 - 72;
#X obj 405 149 inlet;
#X obj 148 137 inlet;
#X obj 148 158 unpack s f f;
#X obj 148 236 pack s 1 0;
#X obj 147 326 outlet~;
#X text 81 92 in_ <tablename> <desired pitch> <base pitch>;
#X text 406 125 s_playtable messages;
#X connect 0 0 6 2;
#X connect 1 0 7 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 1 2 0;
#X connect 5 2 2 1;
#X connect 6 0 1 0;
