i kinda figured that<div><br><br><div class="gmail_quote">2011/12/17 Mike Moser-Booth <span dir="ltr"><<a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Oops, the right inlet was connected to a [sel] when it should have<br>
been connected to [> 1000]. I'll upload the fix here and on GitHub.<br>
<br>
.mmb<br>
<br>
On Sat, Dec 17, 2011 at 7:57 PM, Alexandre Torres Porres<br>
<div class="HOEnZb"><div class="h5"><<a href="mailto:porres@gmail.com">porres@gmail.com</a>> wrote:<br>
> when I "change the maximum denominator value" results are weird and Pd<br>
> freezes.<br>
><br>
> cheers<br>
><br>
><br>
><br>
> 2011/12/17 Mike Moser-Booth <<a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a>><br>
>><br>
>> I just added it to my library on GitHub:<br>
>><br>
>> <a href="https://github.com/dotmmb/mmb" target="_blank">https://github.com/dotmmb/mmb</a><br>
>><br>
>> But, yeah, feel free to use it however you want.<br>
>><br>
>> .mmb<br>
>><br>
>> On Sat, Dec 17, 2011 at 2:07 PM, Alexandre Torres Porres<br>
>> <<a href="mailto:porres@gmail.com">porres@gmail.com</a>> wrote:<br>
>> > this looks great huh?<br>
>> ><br>
>> > I have this pd examples that deal with tuning theory, are you releasing<br>
>> > this<br>
>> > somewhere so i can use it?<br>
>> ><br>
>> > thanks<br>
>> > alex<br>
>> ><br>
>> ><br>
>> > 2011/12/17 Mike Moser-Booth <<a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a>><br>
>> >><br>
>> >> They're not working? Huh... Well, here's the text versions:<br>
>> >><br>
>> >> dec2frac.mmb.pd:<br>
>> >><br>
>> >> #N canvas 60 <a href="tel:22%20908%20750%2010" value="+552290875010">22 908 750 10</a>;<br>
>> >> #X obj 298 36 inlet;<br>
>> >> #X obj 573 359 t l;<br>
>> >> #X obj 240 574 list;<br>
>> >> #X obj 198 415 sel 0;<br>
>> >> #X obj 207 168 expr 1/$f1;<br>
>> >> #X obj 478 359 list append;<br>
>> >> #N canvas 203 22 687 744 simplify 0;<br>
>> >> #X obj 144 28 inlet;<br>
>> >> #X obj 198 155 list length;<br>
>> >> #X obj 145 132 t l l;<br>
>> >> #X obj 165 214 spigot;<br>
>> >> #X obj 51 239 spigot;<br>
>> >> #X obj 84 213 == 1;<br>
>> >> #X obj 205 275 list split 2;<br>
>> >> #X obj 98 423 pack f f;<br>
>> >> #X obj 272 371 list split 1;<br>
>> >> #X obj 237 340 list;<br>
>> >> #X obj 198 188 > 1;<br>
>> >> #X obj 98 377 expr $f2*$f1+1 \; $f1;<br>
>> >> #X obj 305 513 list append;<br>
>> >> #X obj 305 541 expr $f1*$f2+$f3 \; $f2;<br>
>> >> #X obj 307 589 pack f f;<br>
>> >> #X obj 229 423 t b l;<br>
>> >> #X obj 226 631 list;<br>
>> >> #X obj 97 448 t l l;<br>
>> >> #X obj 102 687 outlet;<br>
>> >> #X text 206 80 converts the continued fraction form into a simple<br>
>> >> fraction<br>
>> >> ;<br>
>> >> #X connect 0 0 2 0;<br>
>> >> #X connect 1 0 5 0;<br>
>> >> #X connect 1 0 10 0;<br>
>> >> #X connect 2 0 3 0;<br>
>> >> #X connect 2 0 4 0;<br>
>> >> #X connect 2 1 1 0;<br>
>> >> #X connect 3 0 6 0;<br>
>> >> #X connect 4 0 18 0;<br>
>> >> #X connect 5 0 4 1;<br>
>> >> #X connect 6 0 11 0;<br>
>> >> #X connect 6 1 9 1;<br>
>> >> #X connect 7 0 17 0;<br>
>> >> #X connect 8 0 12 0;<br>
>> >> #X connect 8 1 9 1;<br>
>> >> #X connect 8 2 16 0;<br>
>> >> #X connect 9 0 8 0;<br>
>> >> #X connect 10 0 3 1;<br>
>> >> #X connect 11 0 7 0;<br>
>> >> #X connect 11 1 7 1;<br>
>> >> #X connect 12 0 13 0;<br>
>> >> #X connect 13 0 14 0;<br>
>> >> #X connect 13 1 14 1;<br>
>> >> #X connect 14 0 15 0;<br>
>> >> #X connect 15 0 9 0;<br>
>> >> #X connect 15 1 16 1;<br>
>> >> #X connect 15 1 12 1;<br>
>> >> #X connect 16 0 18 0;<br>
>> >> #X connect 17 0 15 0;<br>
>> >> #X connect 17 1 12 1;<br>
>> >> #X restore 478 385 pd simplify;<br>
>> >> #X obj 325 713 outlet;<br>
>> >> #X obj 368 630 list;<br>
>> >> #X obj 479 411 t l l;<br>
>> >> #X obj 596 577 sel 1;<br>
>> >> #X obj 281 348 spigot;<br>
>> >> #X msg 336 349 0;<br>
>> >> #X obj 281 372 t f b;<br>
>> >> #X obj 505 438 list split 1;<br>
>> >> #X obj 535 469 route bang;<br>
>> >> #X msg 333 382 1;<br>
>> >> #X text 41 573 This is just here for debugging;<br>
>> >> #X obj 634 406 loadbang;<br>
>> >> #X obj 634 427 f \$1;<br>
>> >> #X text 612 683 .mmb;<br>
>> >> #X text 638 625 TODO: implement decrementing rules;<br>
>> >> #X obj 102 674 prepend set;<br>
>> >> #X obj 300 210 expr if($f1<0 \, int($f1-1) \, int($f1)) \; $f1;<br>
>> >> #X obj 310 268 expr $f2-$f1 \; $f1;<br>
>> >> #X text 533 211 floor;<br>
>> >> #X obj 628 36 inlet;<br>
>> >> #X obj 628 123 max 1;<br>
>> >> #X obj 596 556 > 1000;<br>
>> >> #X obj 298 100 t b b f b;<br>
>> >> #N canvas 0 22 450 300 test.if.integer 0;<br>
>> >> #X obj 206 117 expr int($f1)==$f1;<br>
>> >> #X obj 151 28 inlet;<br>
>> >> #X obj 151 64 t f f;<br>
>> >> #X obj 129 186 spigot;<br>
>> >> #X obj 179 186 spigot;<br>
>> >> #X obj 164 160 != 1;<br>
>> >> #X obj 129 242 outlet;<br>
>> >> #X obj 179 242 outlet;<br>
>> >> #X msg 179 214 \$1 1;<br>
>> >> #X connect 0 0 4 1;<br>
>> >> #X connect 0 0 5 0;<br>
>> >> #X connect 1 0 2 0;<br>
>> >> #X connect 2 0 3 0;<br>
>> >> #X connect 2 0 4 0;<br>
>> >> #X connect 2 1 0 0;<br>
>> >> #X connect 3 0 6 0;<br>
>> >> #X connect 4 0 8 0;<br>
>> >> #X connect 5 0 3 1;<br>
>> >> #X connect 8 0 7 0;<br>
>> >> #X restore 298 76 pd test.if.integer;<br>
>> >> #X obj 403 111 s \$0-to.outlet;<br>
>> >> #X obj 395 671 r \$0-to.outlet;<br>
>> >> #X msg 101 698;<br>
>> >> #X obj 634 452 max 1;<br>
>> >> #X obj 306 157 until;<br>
>> >> #X obj 335 134 r \$0-stop.until;<br>
>> >> #X obj 306 183 f;<br>
>> >> #X obj 127 483 s \$0-stop.until;<br>
>> >> #X obj 595 604 s \$0-stop.until;<br>
>> >> #X connect 0 0 30 0;<br>
>> >> #X connect 1 0 5 1;<br>
>> >> #X connect 2 0 22 0;<br>
>> >> #X connect 3 0 8 0;<br>
>> >> #X connect 3 0 38 0;<br>
>> >> #X connect 3 1 4 0;<br>
>> >> #X connect 4 0 23 0;<br>
>> >> #X connect 5 0 1 0;<br>
>> >> #X connect 5 0 2 1;<br>
>> >> #X connect 5 0 6 0;<br>
>> >> #X connect 6 0 9 0;<br>
>> >> #X connect 8 0 7 0;<br>
>> >> #X connect 9 0 8 1;<br>
>> >> #X connect 9 1 14 0;<br>
>> >> #X connect 10 0 8 0;<br>
>> >> #X connect 10 0 39 0;<br>
>> >> #X connect 10 1 16 0;<br>
>> >> #X connect 11 0 13 0;<br>
>> >> #X connect 12 0 11 1;<br>
>> >> #X connect 13 0 3 0;<br>
>> >> #X connect 13 1 12 0;<br>
>> >> #X connect 14 1 15 0;<br>
>> >> #X connect 15 0 16 0;<br>
>> >> #X connect 15 1 28 0;<br>
>> >> #X connect 16 0 11 1;<br>
>> >> #X connect 18 0 19 0;<br>
>> >> #X connect 19 0 34 0;<br>
>> >> #X connect 22 0 33 0;<br>
>> >> #X connect 23 0 24 0;<br>
>> >> #X connect 23 1 24 1;<br>
>> >> #X connect 24 0 11 0;<br>
>> >> #X connect 24 1 5 0;<br>
>> >> #X connect 26 0 27 0;<br>
>> >> #X connect 27 0 10 1;<br>
>> >> #X connect 28 0 10 0;<br>
>> >> #X connect 29 0 2 0;<br>
>> >> #X connect 29 1 35 0;<br>
>> >> #X connect 29 2 37 1;<br>
>> >> #X connect 29 3 5 1;<br>
>> >> #X connect 29 3 8 1;<br>
>> >> #X connect 30 0 29 0;<br>
>> >> #X connect 30 1 31 0;<br>
>> >> #X connect 32 0 7 0;<br>
>> >> #X connect 34 0 28 1;<br>
>> >> #X connect 35 0 37 0;<br>
>> >> #X connect 36 0 35 1;<br>
>> >> #X connect 37 0 23 0;<br>
>> >><br>
>> >><br>
>> >><br>
>> >><br>
>> >> dec2frac.mmb-help.pd:<br>
>> >><br>
>> >> #N canvas 431 22 944 500 10;<br>
>> >> #X obj 25 12 cnv 15 400 35 empty empty dec2frac.mmb 20 12 0 14 -4160<br>
>> >> -203904 0;<br>
>> >> #X obj 25 48 cnv 15 400 70 empty empty empty 20 12 0 14 -203904 -66577<br>
>> >> 0;<br>
>> >> #X text 812 417 .mmb;<br>
>> >> #X text 45 48 Converts a decimal number into its fractional form. The<br>
>> >> accuracy is determined by the argument. Irrational numbers \, such<br>
>> >> as pi \, don't have fractional representations. So you should make<br>
>> >> the argument high enough for as accurate an approximation that suits<br>
>> >> you.;<br>
>> >> #X text 468 49 [dec2frac.mmb max_denominator];<br>
>> >> #X msg 71 172 3.14159;<br>
>> >> #X msg 136 199 3.75;<br>
>> >> #X msg 149 245 -0.625;<br>
>> >> #X obj 113 338 unpack f f;<br>
>> >> #X floatatom 113 364 0 0 0 0 - - -;<br>
>> >> #X floatatom 170 384 0 0 0 0 - - -;<br>
>> >> #X obj 131 423 /;<br>
>> >> #X floatatom 131 450 0 0 0 0 - - -;<br>
>> >> #X floatatom 223 252 5 0 0 0 - - -;<br>
>> >> #X text 263 252 change the maximum denominator value;<br>
>> >> #X text 194 333 outputs a list of <numerator> <denominator>;<br>
>> >> #X text 487 69 arg1 <optional>: the maximum size of the denominator.<br>
>> >> Higher values result in more accurate estimations \, but more<br>
>> >> computation.<br>
>> >> Default is 1000;<br>
>> >> #X floatatom 48 255 0 0 0 0 - - -;<br>
>> >> #X obj 113 296 dec2frac.mmb 1000;<br>
>> >> #X text 526 305 This algorithm is based on best rational approximation<br>
>> >> using continued fractions. It currently does not implement rules for<br>
>> >> decrementing the last value of the continued fraction form \, so it<br>
>> >> is not as accurate as it could be.;<br>
>> >> #X connect 5 0 18 0;<br>
>> >> #X connect 6 0 18 0;<br>
>> >> #X connect 7 0 18 0;<br>
>> >> #X connect 8 0 9 0;<br>
>> >> #X connect 8 1 10 0;<br>
>> >> #X connect 9 0 11 0;<br>
>> >> #X connect 10 0 11 1;<br>
>> >> #X connect 11 0 12 0;<br>
>> >> #X connect 13 0 18 1;<br>
>> >> #X connect 17 0 18 0;<br>
>> >> #X connect 18 0 8 0;<br>
>> >><br>
>> >><br>
>> >><br>
>> >> On Sat, Dec 17, 2011 at 1:34 PM, Alexandre Torres Porres<br>
>> >> <<a href="mailto:porres@gmail.com">porres@gmail.com</a>> wrote:<br>
>> >> > hi there, how do i get the attachments you're sending to the list?<br>
>> >> ><br>
>> >> > thanks<br>
>> >><br>
>> >><br>
>> >><br>
>> >> --<br>
>> >> Mike Moser-Booth<br>
>> >> <a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a><br>
>> ><br>
>> ><br>
>><br>
>><br>
>><br>
>> --<br>
>> Mike Moser-Booth<br>
>> <a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a><br>
><br>
><br>
<br>
<br>
<br>
</div></div><span class="HOEnZb"><font color="#888888">--<br>
Mike Moser-Booth<br>
<a href="mailto:mmoserbooth@gmail.com">mmoserbooth@gmail.com</a><br>
</font></span></blockquote></div><br></div>