diff options
Diffstat (limited to 'abs/pol2cart.pd')
-rw-r--r-- | abs/pol2cart.pd | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/abs/pol2cart.pd b/abs/pol2cart.pd new file mode 100644 index 0000000..0a29882 --- /dev/null +++ b/abs/pol2cart.pd @@ -0,0 +1,35 @@ +#N canvas 437 75 457 368 10; +#X obj 259 82 inlet z; +#X text 295 169 z=z; +#X obj 259 331 outlet z; +#X obj 99 125 unpack 0 0 0; +#X text 294 141 x=r*cos(phi); +#X text 295 156 y=r*sin(phi); +#X obj 99 82 inlet r; +#X obj 179 82 inlet phi; +#X obj 82 331 outlet x; +#X obj 179 331 outlet y; +#X obj 138 160 t f f; +#X obj 138 184 cos; +#X obj 168 184 sin; +#X obj 82 201 t f f; +#X obj 82 237 * 1; +#X obj 112 236 * 0; +#X text 63 26 convert polar to cartesian coordinates; +#X obj 99 105 pack \$1 \$2 \$3; +#X text 341 8 part of zexy; +#X connect 0 0 17 2; +#X connect 3 0 13 0; +#X connect 3 1 10 0; +#X connect 3 2 2 0; +#X connect 6 0 17 0; +#X connect 7 0 17 1; +#X connect 10 0 11 0; +#X connect 10 1 12 0; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 14 0; +#X connect 13 1 15 0; +#X connect 14 0 8 0; +#X connect 15 0 9 0; +#X connect 17 0 3 0; |