aboutsummaryrefslogtreecommitdiff
path: root/examples/coordinates.pd
diff options
context:
space:
mode:
Diffstat (limited to 'examples/coordinates.pd')
-rw-r--r--examples/coordinates.pd83
1 files changed, 83 insertions, 0 deletions
diff --git a/examples/coordinates.pd b/examples/coordinates.pd
new file mode 100644
index 0000000..0004931
--- /dev/null
+++ b/examples/coordinates.pd
@@ -0,0 +1,83 @@
+#N canvas 114 89 754 537 10;
+#X text 122 40 convert between SPHeric \, POLar and CARTesian coordinates
+;
+#X obj 99 305 cart2sph;
+#X floatatom 150 286 5 0 0 0 z - -;
+#X floatatom 124 268 5 0 0 0 y - -;
+#X floatatom 99 248 5 0 0 0 x - -;
+#X floatatom 150 366 5 0 0 0 theta - -;
+#X floatatom 124 348 5 0 0 0 phi - -;
+#X floatatom 99 328 5 0 0 0 r - -;
+#X floatatom 150 116 5 0 0 0 z - -;
+#X floatatom 124 98 5 0 0 0 y - -;
+#X floatatom 99 78 5 0 0 0 x - -;
+#X floatatom 150 196 5 0 0 0 z - -;
+#X floatatom 124 178 5 0 0 0 phi - -;
+#X floatatom 99 158 5 0 0 0 r - -;
+#X obj 99 135 cart2pol;
+#X floatatom 353 116 5 0 0 0 z - -;
+#X floatatom 331 98 5 0 0 0 phi - -;
+#X floatatom 309 78 5 0 0 0 r - -;
+#X floatatom 353 196 5 0 0 0 theta - -;
+#X floatatom 331 178 5 0 0 0 phi - -;
+#X floatatom 309 158 5 0 0 0 r - -;
+#X floatatom 360 286 5 0 0 0 z - -;
+#X floatatom 334 268 5 0 0 0 phi - -;
+#X floatatom 309 248 5 0 0 0 r - -;
+#X floatatom 360 366 5 0 0 0 z - -;
+#X floatatom 334 348 5 0 0 0 y - -;
+#X floatatom 309 328 5 0 0 0 x - -;
+#X floatatom 573 286 5 0 0 0 theta - -;
+#X floatatom 551 268 5 0 0 0 phi - -;
+#X floatatom 529 248 5 0 0 0 r - -;
+#X floatatom 573 366 5 0 0 0 z - -;
+#X floatatom 551 348 5 0 0 0 phi - -;
+#X floatatom 529 328 5 0 0 0 r - -;
+#X obj 529 305 sph2pol;
+#X floatatom 580 116 5 0 0 0 theta - -;
+#X floatatom 554 98 5 0 0 0 phi - -;
+#X floatatom 529 78 5 0 0 0 r - -;
+#X floatatom 580 196 5 0 0 0 z - -;
+#X floatatom 554 178 5 0 0 0 y - -;
+#X floatatom 529 158 5 0 0 0 x - -;
+#X obj 529 135 sph2cart;
+#X obj 309 135 pol2sph;
+#X obj 309 305 pol2cart;
+#X text 112 450 angles are given in RADian \, if you want DEGree you
+might want to use [deg2rad] and [rad2deg];
+#X connect 1 0 7 0;
+#X connect 1 1 6 0;
+#X connect 1 2 5 0;
+#X connect 2 0 1 2;
+#X connect 3 0 1 1;
+#X connect 4 0 1 0;
+#X connect 8 0 14 2;
+#X connect 9 0 14 1;
+#X connect 10 0 14 0;
+#X connect 14 0 13 0;
+#X connect 14 1 12 0;
+#X connect 14 2 11 0;
+#X connect 15 0 41 2;
+#X connect 16 0 41 1;
+#X connect 17 0 41 0;
+#X connect 21 0 42 2;
+#X connect 22 0 42 1;
+#X connect 23 0 42 0;
+#X connect 27 0 33 2;
+#X connect 28 0 33 1;
+#X connect 29 0 33 0;
+#X connect 33 0 32 0;
+#X connect 33 1 31 0;
+#X connect 33 2 30 0;
+#X connect 34 0 40 2;
+#X connect 35 0 40 1;
+#X connect 36 0 40 0;
+#X connect 40 0 39 0;
+#X connect 40 1 38 0;
+#X connect 40 2 37 0;
+#X connect 41 0 20 0;
+#X connect 41 1 19 0;
+#X connect 41 2 18 0;
+#X connect 42 0 26 0;
+#X connect 42 1 25 0;
+#X connect 42 2 24 0;