From a7e6303e3e7e87bf90b21821d2e419ed4799783c Mon Sep 17 00:00:00 2001 From: musil Date: Fri, 28 Jun 2013 17:25:22 +0000 Subject: initial check in of double precision library of iem svn path=/trunk/externals/iem/iem_dp/; revision=17167 --- *~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ +~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ -~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ add~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ delread~~-help.pd | 36 ++++++++++++++ delwrite~~-help.pd | 36 ++++++++++++++ div~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ max~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ min~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ mul~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ phasor~~-help.pd | 56 ++++++++++++++++++++++ samphold~~-help.pd | 66 ++++++++++++++++++++++++++ sub~~-help.pd | 101 +++++++++++++++++++++++++++++++++++++++ tabread4~~-help.pd | 136 +++++++++++++++++++++++++++++++++++++++++++++++++++++ tabread~~-help.pd | 63 +++++++++++++++++++++++++ tabwrite~~-help.pd | 44 +++++++++++++++++ vd~~-help.pd | 36 ++++++++++++++ vline~~-help.pd | 98 ++++++++++++++++++++++++++++++++++++++ wrap~~-help.pd | 48 +++++++++++++++++++ 19 files changed, 1528 insertions(+) create mode 100755 *~~-help.pd create mode 100755 +~~-help.pd create mode 100755 -~~-help.pd create mode 100755 add~~-help.pd create mode 100644 delread~~-help.pd create mode 100644 delwrite~~-help.pd create mode 100755 div~~-help.pd create mode 100644 max~~-help.pd create mode 100644 min~~-help.pd create mode 100755 mul~~-help.pd create mode 100755 phasor~~-help.pd create mode 100755 samphold~~-help.pd create mode 100755 sub~~-help.pd create mode 100755 tabread4~~-help.pd create mode 100755 tabread~~-help.pd create mode 100755 tabwrite~~-help.pd create mode 100644 vd~~-help.pd create mode 100755 vline~~-help.pd create mode 100755 wrap~~-help.pd (limited to '*~~-help.pd') diff --git a/*~~-help.pd b/*~~-help.pd new file mode 100755 index 0000000..0d5fce2 --- /dev/null +++ b/*~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 936 537 10; +#X symbolatom 194 348 25 0 0 0 - - -; +#X text 134 493 IEM KUG; +#X text 118 481 musil; +#X text 155 481 @; +#X text 164 481 iem.at; +#X text 117 503 Graz \, Austria; +#X text 177 455 @; +#X text 186 455 iem.at; +#X text 118 455 zmoelnig; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X text 14 12 *~~; +#X text 70 13 double precision signal multiplication; +#X obj 194 203 *~~ #######; +#X text 386 348 product displayed via a symbol; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X msg 320 94 "1.111111; +#X msg 99 51 "1.111111; +#X text 117 366 should be "1.234567654321; +#X text 406 105 = symbol selector of an anything; +#X text 396 94 double precision number beginning with a "double quote" +=; +#X text 183 62 = symbol selector of an anything; +#X text 173 51 double precision number beginning with a "double quote" +=; +#X text 16 32 mul~~; +#X obj 292 203 mul~~; +#X text 374 13 15 digits accurate; +#X text 69 442 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 69 470 (c) Thomas Musil 2000 - 2013; +#X obj 99 74 symtodp; +#X obj 320 115 symtodp; +#X obj 440 256 *~~ 100 0; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 516 255 mul~~ 100 0; +#X connect 9 0 17 1; +#X connect 10 0 17 0; +#X connect 11 0 17 3; +#X connect 12 0 17 2; +#X connect 14 0 13 0; +#X connect 17 0 19 0; +#X connect 17 1 19 1; +#X connect 19 0 0 0; +#X connect 20 0 33 0; +#X connect 21 0 32 0; +#X connect 32 0 10 0; +#X connect 32 1 9 0; +#X connect 33 0 12 0; +#X connect 33 1 11 0; +#X connect 34 0 36 0; +#X connect 34 1 36 1; +#X connect 36 0 35 0; +#X connect 37 0 34 0; +#X connect 38 0 37 0; diff --git a/+~~-help.pd b/+~~-help.pd new file mode 100755 index 0000000..5042d3c --- /dev/null +++ b/+~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 860 543 10; +#X symbolatom 196 376 25 0 0 0 - - -; +#X text 133 473 IEM KUG; +#X text 117 461 musil; +#X text 154 461 @; +#X text 163 461 iem.at; +#X text 116 483 Graz \, Austria; +#X text 176 435 @; +#X text 185 435 iem.at; +#X text 117 435 zmoelnig; +#X text 388 376 sum displayed via a symbol; +#X text 14 12 +~~; +#X text 70 13 double precision signal addition; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X obj 194 203 +~~ #######; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 452 106 = symbol selector of an anything; +#X text 442 95 double precision number beginning with a "double quote" +=; +#X text 230 60 = symbol selector of an anything; +#X text 220 49 double precision number beginning with a "double quote" +=; +#X msg 99 48 "1.2345678765432; +#X msg 320 94 "8.7654321234567; +#X text 119 392 should be "9.9999999999999; +#X text 14 34 add~~; +#X obj 287 201 add~~; +#X text 68 422 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 450 (c) Thomas Musil 2000 - 2013; +#X text 314 13 15 digits accurate; +#X obj 99 72 symtodp; +#X obj 320 115 symtodp; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 440 256 +~~ 100 0; +#X obj 516 255 add~~ 100 0; +#X connect 12 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 16 3; +#X connect 15 0 16 2; +#X connect 16 0 19 0; +#X connect 16 1 19 1; +#X connect 18 0 17 0; +#X connect 19 0 0 0; +#X connect 24 0 32 0; +#X connect 25 0 33 0; +#X connect 32 0 13 0; +#X connect 32 1 12 0; +#X connect 33 0 15 0; +#X connect 33 1 14 0; +#X connect 35 0 34 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 35 0; +#X connect 38 1 35 1; diff --git a/-~~-help.pd b/-~~-help.pd new file mode 100755 index 0000000..0c4edcf --- /dev/null +++ b/-~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 856 539 10; +#X symbolatom 196 376 25 0 0 0 - - -; +#X text 133 473 IEM KUG; +#X text 117 461 musil; +#X text 154 461 @; +#X text 163 461 iem.at; +#X text 116 483 Graz \, Austria; +#X text 176 435 @; +#X text 185 435 iem.at; +#X text 117 435 zmoelnig; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 14 12 -~~; +#X text 70 13 double precision signal subtraction; +#X obj 194 202 -~~ #######; +#X text 383 376 difference displayed via a symbol; +#X text 119 391 should be "1.2345678765432; +#X msg 99 48 "9.9999999999999; +#X msg 320 94 "8.7654321234567; +#X text 452 105 = symbol selector of an anything; +#X text 442 94 double precision number beginning with a "double quote" +=; +#X text 231 60 = symbol selector of an anything; +#X text 221 49 double precision number beginning with a "double quote" +=; +#X text 14 34 sub~~; +#X obj 282 202 sub~~; +#X text 355 12 15 digits accurate; +#X text 68 422 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 450 (c) Thomas Musil 2000 - 2013; +#X obj 99 72 symtodp; +#X obj 319 115 symtodp; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 440 256 -~~ 100 0; +#X obj 517 255 sub~~ 100 0; +#X connect 9 0 18 1; +#X connect 10 0 18 0; +#X connect 11 0 18 3; +#X connect 12 0 18 2; +#X connect 14 0 13 0; +#X connect 15 0 0 0; +#X connect 18 0 15 0; +#X connect 18 1 15 1; +#X connect 21 0 32 0; +#X connect 22 0 33 0; +#X connect 32 0 10 0; +#X connect 32 1 9 0; +#X connect 33 0 12 0; +#X connect 33 1 11 0; +#X connect 35 0 34 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 35 0; +#X connect 38 1 35 1; diff --git a/add~~-help.pd b/add~~-help.pd new file mode 100755 index 0000000..97e5e66 --- /dev/null +++ b/add~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 860 543 10; +#X symbolatom 196 376 25 0 0 0 - - -; +#X text 133 473 IEM KUG; +#X text 117 461 musil; +#X text 154 461 @; +#X text 163 461 iem.at; +#X text 116 483 Graz \, Austria; +#X text 176 435 @; +#X text 185 435 iem.at; +#X text 117 435 zmoelnig; +#X text 388 376 sum displayed via a symbol; +#X text 14 12 +~~; +#X text 70 13 double precision signal addition; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X obj 194 203 +~~ #######; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 452 106 = symbol selector of an anything; +#X text 442 95 double precision number beginning with a "double quote" +=; +#X text 230 60 = symbol selector of an anything; +#X text 220 49 double precision number beginning with a "double quote" +=; +#X msg 99 48 "1.2345678765432; +#X msg 320 94 "8.7654321234567; +#X text 119 392 should be "9.9999999999999; +#X text 14 34 add~~; +#X obj 287 201 add~~; +#X text 68 422 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 450 (c) Thomas Musil 2000 - 2013; +#X text 314 13 15 digits accurate; +#X obj 99 72 symtodp; +#X obj 320 115 symtodp; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 440 256 +~~ 100 0; +#X obj 516 255 add~~ 100 0; +#X connect 12 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 16 3; +#X connect 15 0 16 2; +#X connect 16 0 19 0; +#X connect 16 1 19 1; +#X connect 18 0 17 0; +#X connect 19 0 0 0; +#X connect 24 0 32 0; +#X connect 25 0 33 0; +#X connect 32 0 13 0; +#X connect 32 1 12 0; +#X connect 33 0 15 0; +#X connect 33 1 14 0; +#X connect 35 0 34 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 35 0; +#X connect 38 1 35 1; diff --git a/delread~~-help.pd b/delread~~-help.pd new file mode 100644 index 0000000..243f685 --- /dev/null +++ b/delread~~-help.pd @@ -0,0 +1,36 @@ +#N canvas 248 216 633 323 10; +#X obj 32 25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X msg 33 48 \; pd dsp \$1; +#X obj 175 65 sig~; +#X floatatom 174 40 5 0 0 0 - - -; +#X obj 178 197 delread~~ abc 1234 0; +#X obj 178 224 unsig~; +#X floatatom 178 248 5 0 0 0 - - -; +#X obj 176 91 delwrite~~ abc 9876 0; +#X msg 221 166 2345 0; +#X msg 242 145 3456 0; +#X floatatom 163 148 5 0 0 0 - - -; +#X floatatom 310 144 5 0 0 0 - - -; +#X obj 390 226 unsig~; +#X floatatom 390 250 5 0 0 0 - - -; +#X floatatom 382 122 5 0 0 0 - - -; +#X floatatom 437 122 5 0 0 0 - - -; +#X obj 390 199 vd~~ abc; +#X obj 382 141 sig~; +#X obj 436 144 sig~; +#X connect 0 0 1 0; +#X connect 2 0 7 0; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 8 0 4 0; +#X connect 9 0 4 0; +#X connect 10 0 4 0; +#X connect 11 0 4 1; +#X connect 12 0 13 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 12 0; +#X connect 17 0 16 0; +#X connect 18 0 16 1; diff --git a/delwrite~~-help.pd b/delwrite~~-help.pd new file mode 100644 index 0000000..243f685 --- /dev/null +++ b/delwrite~~-help.pd @@ -0,0 +1,36 @@ +#N canvas 248 216 633 323 10; +#X obj 32 25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X msg 33 48 \; pd dsp \$1; +#X obj 175 65 sig~; +#X floatatom 174 40 5 0 0 0 - - -; +#X obj 178 197 delread~~ abc 1234 0; +#X obj 178 224 unsig~; +#X floatatom 178 248 5 0 0 0 - - -; +#X obj 176 91 delwrite~~ abc 9876 0; +#X msg 221 166 2345 0; +#X msg 242 145 3456 0; +#X floatatom 163 148 5 0 0 0 - - -; +#X floatatom 310 144 5 0 0 0 - - -; +#X obj 390 226 unsig~; +#X floatatom 390 250 5 0 0 0 - - -; +#X floatatom 382 122 5 0 0 0 - - -; +#X floatatom 437 122 5 0 0 0 - - -; +#X obj 390 199 vd~~ abc; +#X obj 382 141 sig~; +#X obj 436 144 sig~; +#X connect 0 0 1 0; +#X connect 2 0 7 0; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 8 0 4 0; +#X connect 9 0 4 0; +#X connect 10 0 4 0; +#X connect 11 0 4 1; +#X connect 12 0 13 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 12 0; +#X connect 17 0 16 0; +#X connect 18 0 16 1; diff --git a/div~~-help.pd b/div~~-help.pd new file mode 100755 index 0000000..1f8686e --- /dev/null +++ b/div~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 944 545 10; +#X symbolatom 194 388 25 0 0 0 - - -; +#X text 134 493 IEM KUG; +#X text 118 481 musil; +#X text 155 481 @; +#X text 164 481 iem.at; +#X text 117 503 Graz \, Austria; +#X text 177 455 @; +#X text 186 455 iem.at; +#X text 118 455 zmoelnig; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 13 84 \; pd dsp \$1; +#X obj 13 64 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X text 70 13 double precision signal multiplication; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 14 12 /~~; +#X obj 194 203 /~~ #######; +#X text 117 406 should be "1.111111; +#X text 406 105 = symbol selector of an anything; +#X text 396 94 double precision number beginning with a "double quote" +=; +#X text 225 63 = symbol selector of an anything; +#X text 215 52 double precision number beginning with a "double quote" +=; +#X msg 320 94 "1.111111; +#X msg 99 51 "1.234567654321; +#X text 386 388 quotient displayed via a symbol; +#X text 13 38 div~~; +#X obj 297 203 div~~; +#X text 374 13 15 digits accurate; +#X text 69 442 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 69 470 (c) Thomas Musil 2000 - 2013; +#X obj 99 72 symtodp; +#X obj 320 115 symtodp; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 440 256 /~~ 100 0; +#X obj 516 255 div~~ 100 0; +#X connect 9 0 18 1; +#X connect 10 0 18 0; +#X connect 11 0 18 3; +#X connect 12 0 18 2; +#X connect 14 0 13 0; +#X connect 16 0 0 0; +#X connect 18 0 16 0; +#X connect 18 1 16 1; +#X connect 24 0 33 0; +#X connect 25 0 32 0; +#X connect 32 0 10 0; +#X connect 32 1 9 0; +#X connect 33 0 12 0; +#X connect 33 1 11 0; +#X connect 35 0 34 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 35 0; +#X connect 38 1 35 1; diff --git a/max~~-help.pd b/max~~-help.pd new file mode 100644 index 0000000..89e6836 --- /dev/null +++ b/max~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 860 543 10; +#X symbolatom 196 386 25 0 0 0 - - -; +#X text 133 493 IEM KUG; +#X text 117 481 musil; +#X text 154 481 @; +#X text 163 481 iem.at; +#X text 116 503 Graz \, Austria; +#X text 176 455 @; +#X text 185 455 iem.at; +#X text 117 455 zmoelnig; +#X text 388 386 sum displayed via a symbol; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 452 106 = symbol selector of an anything; +#X text 442 95 double precision number beginning with a "double quote" +=; +#X text 230 60 = symbol selector of an anything; +#X text 220 49 double precision number beginning with a "double quote" +=; +#X text 14 12 max~~; +#X text 70 13 double precision comparsion \, output the greater value +; +#X obj 194 203 max~~ ######; +#X msg 99 48 "1.111111112; +#X msg 320 94 "1.111111113; +#X text 132 401 should be "1.111111113; +#X text 450 14 15 digits accurate; +#X text 68 442 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 470 (c) Thomas Musil 2000 - 2013; +#X obj 99 72 symtodp; +#X obj 320 115 symtodp; +#X obj 496 228 sig~; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 496 282 pd sunsig~~; +#X symbolatom 496 307 25 0 0 0 - - -; +#X obj 496 254 max~~ 10 0; +#X floatatom 496 207 5 0 0 0 - - -; +#X floatatom 557 207 5 0 0 0 - - -; +#X connect 10 0 23 1; +#X connect 11 0 23 0; +#X connect 12 0 23 3; +#X connect 13 0 23 2; +#X connect 15 0 14 0; +#X connect 16 0 0 0; +#X connect 23 0 16 0; +#X connect 23 1 16 1; +#X connect 24 0 30 0; +#X connect 25 0 31 0; +#X connect 30 0 11 0; +#X connect 30 1 10 0; +#X connect 31 0 13 0; +#X connect 31 1 12 0; +#X connect 32 0 35 0; +#X connect 33 0 34 0; +#X connect 35 0 33 0; +#X connect 35 1 33 1; +#X connect 36 0 32 0; +#X connect 37 0 35 2; diff --git a/min~~-help.pd b/min~~-help.pd new file mode 100644 index 0000000..f00aaf0 --- /dev/null +++ b/min~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 860 543 10; +#X symbolatom 196 386 25 0 0 0 - - -; +#X text 133 483 IEM KUG; +#X text 117 471 musil; +#X text 154 471 @; +#X text 163 471 iem.at; +#X text 116 493 Graz \, Austria; +#X text 176 445 @; +#X text 185 445 iem.at; +#X text 117 445 zmoelnig; +#X text 388 386 sum displayed via a symbol; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 452 106 = symbol selector of an anything; +#X text 442 95 double precision number beginning with a "double quote" +=; +#X text 230 60 = symbol selector of an anything; +#X text 220 49 double precision number beginning with a "double quote" +=; +#X msg 99 48 "1.111111112; +#X msg 320 94 "1.111111113; +#X text 14 11 min~~; +#X text 70 13 double precision comparsion \, output the less value +; +#X obj 194 203 min~~ ######; +#X text 132 402 should be "1.111111112; +#X text 450 14 15 digits accurate; +#X text 68 432 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 460 (c) Thomas Musil 2000 - 2013; +#X obj 99 72 symtodp; +#X obj 320 115 symtodp; +#X obj 462 220 sig~; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 462 274 pd sunsig~~; +#X symbolatom 462 299 25 0 0 0 - - -; +#X floatatom 462 199 5 0 0 0 - - -; +#X floatatom 523 199 5 0 0 0 - - -; +#X obj 462 246 min~~ 10 0; +#X connect 10 0 25 1; +#X connect 11 0 25 0; +#X connect 12 0 25 3; +#X connect 13 0 25 2; +#X connect 15 0 14 0; +#X connect 16 0 0 0; +#X connect 21 0 30 0; +#X connect 22 0 31 0; +#X connect 25 0 16 0; +#X connect 25 1 16 1; +#X connect 30 0 11 0; +#X connect 30 1 10 0; +#X connect 31 0 13 0; +#X connect 31 1 12 0; +#X connect 32 0 37 0; +#X connect 33 0 34 0; +#X connect 35 0 32 0; +#X connect 36 0 37 2; +#X connect 37 0 33 0; +#X connect 37 1 33 1; diff --git a/mul~~-help.pd b/mul~~-help.pd new file mode 100755 index 0000000..0d5fce2 --- /dev/null +++ b/mul~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 936 537 10; +#X symbolatom 194 348 25 0 0 0 - - -; +#X text 134 493 IEM KUG; +#X text 118 481 musil; +#X text 155 481 @; +#X text 164 481 iem.at; +#X text 117 503 Graz \, Austria; +#X text 177 455 @; +#X text 186 455 iem.at; +#X text 118 455 zmoelnig; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X text 14 12 *~~; +#X text 70 13 double precision signal multiplication; +#X obj 194 203 *~~ #######; +#X text 386 348 product displayed via a symbol; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X msg 320 94 "1.111111; +#X msg 99 51 "1.111111; +#X text 117 366 should be "1.234567654321; +#X text 406 105 = symbol selector of an anything; +#X text 396 94 double precision number beginning with a "double quote" +=; +#X text 183 62 = symbol selector of an anything; +#X text 173 51 double precision number beginning with a "double quote" +=; +#X text 16 32 mul~~; +#X obj 292 203 mul~~; +#X text 374 13 15 digits accurate; +#X text 69 442 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 69 470 (c) Thomas Musil 2000 - 2013; +#X obj 99 74 symtodp; +#X obj 320 115 symtodp; +#X obj 440 256 *~~ 100 0; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 516 255 mul~~ 100 0; +#X connect 9 0 17 1; +#X connect 10 0 17 0; +#X connect 11 0 17 3; +#X connect 12 0 17 2; +#X connect 14 0 13 0; +#X connect 17 0 19 0; +#X connect 17 1 19 1; +#X connect 19 0 0 0; +#X connect 20 0 33 0; +#X connect 21 0 32 0; +#X connect 32 0 10 0; +#X connect 32 1 9 0; +#X connect 33 0 12 0; +#X connect 33 1 11 0; +#X connect 34 0 36 0; +#X connect 34 1 36 1; +#X connect 36 0 35 0; +#X connect 37 0 34 0; +#X connect 38 0 37 0; diff --git a/phasor~~-help.pd b/phasor~~-help.pd new file mode 100755 index 0000000..c196465 --- /dev/null +++ b/phasor~~-help.pd @@ -0,0 +1,56 @@ +#N canvas 50 82 859 466 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 text 639 34 see also:; +#X text 592 211 IEM KUG; +#X text 576 199 musil; +#X text 613 199 @; +#X text 622 199 iem.at; +#X text 575 221 Graz \, Austria; +#X text 635 173 @; +#X text 644 173 iem.at; +#X text 576 173 zmoelnig; +#X text 13 -11 phasor~~; +#X obj 719 35 phasor~; +#N canvas 0 22 450 300 (subpatch) 0; +#X array array99 100 float 0; +#X coords 0 1 100 -1 200 100 1; +#X restore 413 12 graph; +#X obj 54 382 metro 500; +#X floatatom 39 117 0 0 0 0 - - -; +#X obj 39 141 sig~ 890; +#X text 91 114 <-- specify frequency; +#X text 106 140 <-- convert it to audio signal; +#X text 177 404 <-- graph the output; +#X text 149 195 <-- right inlet resets phase; +#X obj 38 406 tabwrite~ array99; +#X obj 54 357 loadbang; +#X obj 120 357 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 39 226 phasor~~; +#X floatatom 90 199 5 0 0 0 - - -; +#X floatatom 91 285 0 0 0 0 - - -; +#X obj 91 262 unsig~; +#X text 97 246 fine out; +#X text 45 325 coarse out; +#X msg 91 179 0.5; +#X text 80 -10 - sawtooth generator with double precision output; +#X text 527 160 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 527 188 (c) Thomas Musil 2000 - 2013; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 16 0 23 0; +#X connect 17 0 18 0; +#X connect 18 0 26 0; +#X connect 24 0 16 0; +#X connect 24 0 16 0; +#X connect 25 0 16 0; +#X connect 26 0 23 0; +#X connect 26 1 29 0; +#X connect 27 0 26 1; +#X connect 29 0 28 0; +#X connect 32 0 27 0; diff --git a/samphold~~-help.pd b/samphold~~-help.pd new file mode 100755 index 0000000..a19c566 --- /dev/null +++ b/samphold~~-help.pd @@ -0,0 +1,66 @@ +#N canvas 404 97 682 587 10; +#X obj 30 19 tgl 15 0 empty empty empty 20 8 0 10 -262144 -1 -1 0 1 +; +#X floatatom 30 86 5 0 0 0 - - -; +#X floatatom 46 64 3 0 0 0 - - -; +#X obj 30 41 dsp; +#X text 516 25 see also:; +#X text 468 119 IEM KUG; +#X text 452 107 musil; +#X text 489 107 @; +#X text 498 107 iem.at; +#X text 451 129 Graz \, Austria; +#X text 511 81 @; +#X text 520 81 iem.at; +#X text 452 81 zmoelnig; +#X obj 30 518 snapshot~; +#X floatatom 30 541 5 0 0 0 - - -; +#X obj 40 467 metro 100; +#X obj 40 442 loadbang; +#X text 11 -2 samphold~~; +#X obj 588 25 samphold~; +#X obj 30 419 samphold~~; +#X obj 96 308 sig~; +#X obj 259 311 sig~; +#X floatatom 96 283 3 0 0 0 - - -; +#X floatatom 259 286 3 0 0 0 - - -; +#X msg 48 232 reset; +#X text 127 162 set output to a number; +#X text 134 283 sample signal; +#X text 302 284 control signal; +#X text 161 187 reset previous value; +#X text 111 243 to force the next sample; +#X text 160 201 for control inlet; +#X text 110 229 reset to default 1e+20; +#X msg 35 163 set 34 0.34; +#X msg 43 195 reset 10 0.1; +#X obj 108 335 *~ 0.01; +#X obj 271 339 *~ 0.01; +#X text 107 -1 - double precision sample and hold unit; +#X text 403 68 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 403 96 (c) Thomas Musil 2000 - 2013; +#X obj 64 494 t b b; +#X obj 129 520 snapshot~; +#X floatatom 129 543 9 0 0 0 - - -; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 13 0 14 0; +#X connect 15 0 39 0; +#X connect 16 0 15 0; +#X connect 19 0 13 0; +#X connect 19 1 40 0; +#X connect 20 0 34 0; +#X connect 20 0 19 0; +#X connect 21 0 35 0; +#X connect 21 0 19 2; +#X connect 22 0 20 0; +#X connect 23 0 21 0; +#X connect 24 0 19 0; +#X connect 32 0 19 0; +#X connect 33 0 19 0; +#X connect 34 0 19 1; +#X connect 35 0 19 3; +#X connect 39 0 13 0; +#X connect 39 1 40 0; +#X connect 40 0 41 0; diff --git a/sub~~-help.pd b/sub~~-help.pd new file mode 100755 index 0000000..0c4edcf --- /dev/null +++ b/sub~~-help.pd @@ -0,0 +1,101 @@ +#N canvas 291 113 856 539 10; +#X symbolatom 196 376 25 0 0 0 - - -; +#X text 133 473 IEM KUG; +#X text 117 461 musil; +#X text 154 461 @; +#X text 163 461 iem.at; +#X text 116 483 Graz \, Austria; +#X text 176 435 @; +#X text 185 435 iem.at; +#X text 117 435 zmoelnig; +#X obj 139 97 sig~; +#X obj 99 97 sig~; +#X obj 360 144 sig~; +#X obj 320 144 sig~; +#X msg 11 91 \; pd dsp \$1; +#X obj 11 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 195 260 pd sunsig~~; +#X text 14 12 -~~; +#X text 70 13 double precision signal subtraction; +#X obj 194 202 -~~ #######; +#X text 383 376 difference displayed via a symbol; +#X text 119 391 should be "1.2345678765432; +#X msg 99 48 "9.9999999999999; +#X msg 320 94 "8.7654321234567; +#X text 452 105 = symbol selector of an anything; +#X text 442 94 double precision number beginning with a "double quote" +=; +#X text 231 60 = symbol selector of an anything; +#X text 221 49 double precision number beginning with a "double quote" +=; +#X text 14 34 sub~~; +#X obj 282 202 sub~~; +#X text 355 12 15 digits accurate; +#X text 68 422 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 68 450 (c) Thomas Musil 2000 - 2013; +#X obj 99 72 symtodp; +#X obj 319 115 symtodp; +#X symbolatom 439 307 25 0 0 0 - - -; +#N canvas 0 22 330 356 sunsig~~ 0; +#X obj 22 195 snapshot~; +#X obj 47 103 metro 300; +#X obj 46 81 loadbang; +#X obj 22 18 inlet~; +#X obj 122 18 inlet~; +#X obj 122 195 snapshot~; +#X obj 47 136 t b b; +#X obj 36 277 outlet; +#X obj 35 248 dptosym; +#X connect 0 0 8 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 8 1; +#X connect 6 0 0 0; +#X connect 6 1 5 0; +#X connect 8 0 7 0; +#X restore 439 281 pd sunsig~~; +#X obj 440 226 sig~; +#X floatatom 439 206 5 0 0 0 - - -; +#X obj 440 256 -~~ 100 0; +#X obj 517 255 sub~~ 100 0; +#X connect 9 0 18 1; +#X connect 10 0 18 0; +#X connect 11 0 18 3; +#X connect 12 0 18 2; +#X connect 14 0 13 0; +#X connect 15 0 0 0; +#X connect 18 0 15 0; +#X connect 18 1 15 1; +#X connect 21 0 32 0; +#X connect 22 0 33 0; +#X connect 32 0 10 0; +#X connect 32 1 9 0; +#X connect 33 0 12 0; +#X connect 33 1 11 0; +#X connect 35 0 34 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 35 0; +#X connect 38 1 35 1; diff --git a/tabread4~~-help.pd b/tabread4~~-help.pd new file mode 100755 index 0000000..23dfbfc --- /dev/null +++ b/tabread4~~-help.pd @@ -0,0 +1,136 @@ +#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; diff --git a/tabread~~-help.pd b/tabread~~-help.pd new file mode 100755 index 0000000..c4483b0 --- /dev/null +++ b/tabread~~-help.pd @@ -0,0 +1,63 @@ +#N canvas 78 22 896 636 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 408 27 loadbang; +#X text 417 231 see also:; +#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 obj 41 523 snapshot~; +#X obj 176 507 metro 200; +#X obj 40 408 sig~; +#X floatatom 41 549 0 0 0 0 - - -; +#X obj 176 462 loadbang; +#X obj 176 486 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 40 369 0 0 0 0 - - -; +#X obj 408 50 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 43 350 hsl 101 15 1 11 0 0 empty empty empty -2 -6 0 8 -262144 +-1 -1 0 1; +#X text 498 548 IEM KUG; +#X text 482 536 musil; +#X text 519 536 @; +#X text 528 536 iem.at; +#X text 481 558 Graz \, Austria; +#X text 541 510 @; +#X text 550 510 iem.at; +#X text 482 510 zmoelnig; +#X msg 408 72 \; 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; +#X obj 484 230 tabread~; +#X obj 41 488 tabread~~ array99; +#X obj 84 427 sig~; +#X text 71 408 first part of float inlet sum; +#X text 113 426 second part of float inlet sum; +#X text 13 -15 tabread~~; +#X text 434 497 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 433 525 (c) Thomas Musil 2000 - 2013; +#X text 117 -13 non-interpolating table lookup with double precision +index (15 digits accurate); +#X text 118 -37; +#X text 44 272 tabread is used to build samplers and other table lookup +algorithms. The interpolation scheme is rounding down integer.; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 14 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 26 0; +#X connect 11 0 12 0; +#X connect 12 0 8 0; +#X connect 13 0 9 0; +#X connect 14 0 24 0; +#X connect 15 0 13 0; +#X connect 26 0 7 0; +#X connect 27 0 26 1; diff --git a/tabwrite~~-help.pd b/tabwrite~~-help.pd new file mode 100755 index 0000000..f091d3b --- /dev/null +++ b/tabwrite~~-help.pd @@ -0,0 +1,44 @@ +#N canvas 78 22 863 399 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 text 420 277 see also:; +#X text 658 295 IEM KUG; +#X text 642 283 musil; +#X text 679 283 @; +#X text 688 283 iem.at; +#X text 641 305 Graz \, Austria; +#X text 701 257 @; +#X text 710 257 iem.at; +#X text 642 257 zmoelnig; +#X obj 479 276 tabwrite~; +#X msg 47 210 bang; +#N canvas 0 22 450 300 (subpatch) 0; +#X array array99 1000 float 0; +#X coords 0 1 999 -1 200 100 1; +#X restore 390 77 graph; +#X text 190 318 creation argument initializes array name; +#X msg 45 288 set array99; +#X msg 48 260 stop; +#X text 153 261 stop recording; +#X text 175 234 start in middle of table; +#X obj 27 187 phasor~ 200; +#X text 148 209 start recording; +#X text 149 286 set destination array; +#X text 15 -11 tabwrite~~; +#X obj 28 318 tabwrite~~ array99; +#X msg 47 236 start 500 5; +#X text 593 244 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 593 272 (c) Thomas Musil 2000 - 2013; +#X text 109 -12 - write a signal in an array with a double precision +start onset; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 14 0 25 0; +#X connect 17 0 25 0; +#X connect 18 0 25 0; +#X connect 21 0 25 0; +#X connect 26 0 25 0; diff --git a/vd~~-help.pd b/vd~~-help.pd new file mode 100644 index 0000000..243f685 --- /dev/null +++ b/vd~~-help.pd @@ -0,0 +1,36 @@ +#N canvas 248 216 633 323 10; +#X obj 32 25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X msg 33 48 \; pd dsp \$1; +#X obj 175 65 sig~; +#X floatatom 174 40 5 0 0 0 - - -; +#X obj 178 197 delread~~ abc 1234 0; +#X obj 178 224 unsig~; +#X floatatom 178 248 5 0 0 0 - - -; +#X obj 176 91 delwrite~~ abc 9876 0; +#X msg 221 166 2345 0; +#X msg 242 145 3456 0; +#X floatatom 163 148 5 0 0 0 - - -; +#X floatatom 310 144 5 0 0 0 - - -; +#X obj 390 226 unsig~; +#X floatatom 390 250 5 0 0 0 - - -; +#X floatatom 382 122 5 0 0 0 - - -; +#X floatatom 437 122 5 0 0 0 - - -; +#X obj 390 199 vd~~ abc; +#X obj 382 141 sig~; +#X obj 436 144 sig~; +#X connect 0 0 1 0; +#X connect 2 0 7 0; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 8 0 4 0; +#X connect 9 0 4 0; +#X connect 10 0 4 0; +#X connect 11 0 4 1; +#X connect 12 0 13 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 12 0; +#X connect 17 0 16 0; +#X connect 18 0 16 1; diff --git a/vline~~-help.pd b/vline~~-help.pd new file mode 100755 index 0000000..3c351dd --- /dev/null +++ b/vline~~-help.pd @@ -0,0 +1,98 @@ +#N canvas 84 36 1151 705 10; +#X obj 30 19 tgl 15 0 empty empty empty 20 8 0 10 -262144 -1 -1 0 1 +; +#X floatatom 30 86 5 0 0 0 - - -; +#X floatatom 46 64 3 0 0 0 - - -; +#X obj 30 41 dsp; +#X text 416 24 see also:; +#X text 381 117 IEM KUG; +#X text 365 105 musil; +#X text 402 105 @; +#X text 411 105 iem.at; +#X text 364 127 Graz \, Austria; +#X text 424 79 @; +#X text 433 79 iem.at; +#X text 365 79 zmoelnig; +#X obj 489 25 vline~; +#X text 15 -10 vline~~; +#X obj 35 579 snapshot~; +#X floatatom 35 602 5 0 0 0 - - -; +#X obj 45 552 metro 100; +#X msg 87 477 stop; +#X text 189 185 ramp up; +#X text 198 204 ramp down; +#X text 115 148 jump down; +#X text 130 476 "stop" message freezes vline~ at its current value +; +#X obj 45 527 loadbang; +#X msg 66 149 0 0.1; +#X obj 35 504 vline~~ #####; +#X msg 60 130 1 0.1; +#X text 109 129 jump up; +#X text 275 290 delayed ramp up; +#X text 284 309 delayed ramp down; +#X msg 81 185 1 0.1 2000 20; +#X msg 89 204 0 0.1 2000 20; +#X msg 114 290 1 0.1 2000 20 1000 10; +#X msg 122 309 0 0.1 2000 20 1000 10; +#X text 242 238 delayed jump up; +#X text 251 257 delayed jump down; +#X msg 123 258 0 0.1 0 0 1000 10; +#X text 133 330 ramp up \, stay at top \, jump down \, ramp up again +\, stay top \, ramp down; +#X msg 115 238 1 0.1 0 0 1000 10; +#X msg 130 358 1 0.1 2000 20 0 0 \, 0 0.1 0 0 2500 25 \, 1 0.1 2000 +20 2500 25 \, 0 0.1 2000 20 5000 50; +#X msg 136 422 1 0.1 2000 20 0 0 \, 0 0.1 0 0 2000 20 \, 1 0.1 2000 +20 2000 20 \, 0 0.1 2000 20 4000 40; +#X text 135 402 ramp up \, jump down \, ramp up again \, ramp down +; +#X obj 1002 61 loadbang; +#N canvas 0 22 450 300 (subpatch) 0; +#X array array99 200 float 0; +#X coords 0 1.1 199 -0.1 250 200 1; +#X restore 664 35 graph; +#X obj 691 422 vline~~; +#X obj 657 455 tabwrite~ array99; +#X obj 656 325 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 656 349 t b b; +#X msg 690 396 \$1 0 \$2 0 \$3 0; +#X msg 689 372 1 1 0 \, 0 0 1.3 \, 1 1 1.6 \, 0 1 2.8; +#X text 800 397 add to each parameter the fine offset of zero; +#X msg 1001 84 \; array99 const 0 \; array99 resize 200 \; array99 +bounds 0 1.1 199 -0.1 \; array99 xticks 0 5 4 \; array99 yticks 0 0.1 +1 \; array99 xlabel -0.15 0 20 40 60 80 100 120 140 160 180 200 \; +array99 ylabel -9 0 0.2 0.4 0.6 0.8 1; +#X text 82 -11 - double precision audio ramp generator; +#X text 316 67 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 316 94 (c) Thomas Musil 2000 - 2013; +#X obj 139 579 snapshot~; +#X floatatom 139 602 9 0 0 0 - - -; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 15 0 16 0; +#X connect 17 0 15 0; +#X connect 18 0 25 0; +#X connect 23 0 17 0; +#X connect 24 0 25 0; +#X connect 25 0 15 0; +#X connect 25 1 55 0; +#X connect 26 0 25 0; +#X connect 30 0 25 0; +#X connect 31 0 25 0; +#X connect 32 0 25 0; +#X connect 33 0 25 0; +#X connect 36 0 25 0; +#X connect 38 0 25 0; +#X connect 39 0 25 0; +#X connect 40 0 25 0; +#X connect 42 0 51 0; +#X connect 44 0 45 0; +#X connect 46 0 47 0; +#X connect 47 0 45 0; +#X connect 47 1 49 0; +#X connect 48 0 44 0; +#X connect 49 0 48 0; +#X connect 55 0 56 0; diff --git a/wrap~~-help.pd b/wrap~~-help.pd new file mode 100755 index 0000000..bbd3097 --- /dev/null +++ b/wrap~~-help.pd @@ -0,0 +1,48 @@ +#N canvas 78 22 598 414 10; +#X obj 30 19 tgl 15 0 empty empty empty 20 8 0 10 -262144 -1 -1 0 1 +; +#X floatatom 30 86 5 0 0 0 - - -; +#X floatatom 46 64 3 0 0 0 - - -; +#X obj 30 41 dsp; +#X text 290 39 see also:; +#X text 360 283 IEM KUG; +#X text 344 271 musil; +#X text 381 271 @; +#X text 390 271 iem.at; +#X text 343 293 Graz \, Austria; +#X text 403 245 @; +#X text 412 245 iem.at; +#X text 344 245 zmoelnig; +#X obj 357 40 wrap~; +#X obj 145 292 metro 500; +#X floatatom 34 116 0 0 0 0 - - -; +#X floatatom 36 360 0 0 0 0 - - -; +#X obj 36 327 snapshot~; +#X obj 34 142 sig~; +#X text 86 -9 - remainder modulo 1; +#X text 65 115 <-- shift-drag here to get non-integers to try; +#X text 15 -10 wrap~~; +#X obj 145 267 loadbang; +#X obj 34 221 wrap~~; +#X text 83 208 <-- fine inlet; +#X text 83 237 <-- fine outlet; +#X obj 72 182 *~ 0.01; +#X floatatom 104 360 0 0 0 0 - - -; +#X obj 104 327 snapshot~; +#X text 295 232 (c) IOhannes m zmoelnig 1999 - 2013; +#X text 295 260 (c) Thomas Musil 2000 - 2013; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 14 0 17 0; +#X connect 14 0 28 0; +#X connect 15 0 18 0; +#X connect 17 0 16 0; +#X connect 18 0 23 0; +#X connect 18 0 26 0; +#X connect 22 0 14 0; +#X connect 22 0 14 0; +#X connect 23 0 17 0; +#X connect 23 1 28 0; +#X connect 26 0 23 1; +#X connect 28 0 27 0; -- cgit v1.2.1