aboutsummaryrefslogtreecommitdiff
path: root/abs/sph2cart.pd
blob: 682808224239ee472a9de1f567af848d6ae1fbc6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
#N canvas 437 75 580 399 10;
#X obj 276 331 outlet z;
#X obj 99 82 inlet r;
#X obj 179 82 inlet phi;
#X obj 99 331 outlet x;
#X obj 196 331 outlet y;
#X text 63 26 convert spherical to cartesian coordinates;
#X obj 259 82 inlet theta;
#X obj 99 125 unpack 0 0 0;
#X text 285 160 x=r*cos(phi)*cos(theta);
#X text 285 175 y=r*sin(phi)*cos(theta);
#X text 285 190 z=r*sin(theta);
#X obj 178 151 t f f;
#X obj 208 171 sin;
#X obj 178 171 cos;
#X obj 138 192 t f f;
#X obj 168 212 sin;
#X obj 138 212 cos;
#X obj 99 306 * 1;
#X obj 196 307 * 0;
#X obj 276 309 * 0;
#X obj 178 192 t f f;
#X obj 99 259 t f f f;
#X obj 115 284 * 1;
#X obj 212 281 * 0;
#X obj 99 105 pack \$1 \$2 \$3;
#X text 415 20 part of zexy;
#X connect 1 0 24 0;
#X connect 2 0 24 1;
#X connect 6 0 24 2;
#X connect 7 0 21 0;
#X connect 7 1 14 0;
#X connect 7 2 11 0;
#X connect 11 0 13 0;
#X connect 11 1 12 0;
#X connect 12 0 19 1;
#X connect 13 0 20 0;
#X connect 14 0 16 0;
#X connect 14 1 15 0;
#X connect 15 0 23 0;
#X connect 16 0 22 0;
#X connect 17 0 3 0;
#X connect 18 0 4 0;
#X connect 19 0 0 0;
#X connect 20 0 22 1;
#X connect 20 1 23 1;
#X connect 21 0 17 0;
#X connect 21 1 18 0;
#X connect 21 2 19 0;
#X connect 22 0 17 1;
#X connect 23 0 18 1;
#X connect 24 0 7 0;