#N canvas 536 22 580 359 10;
#X obj 397 295 outlet z;
#X obj 267 12 inlet phi;
#X obj 9 291 outlet x;
#X obj 207 295 outlet y;
#X obj 107 89 purepd/float_argument \$1;
#X obj 267 89 purepd/float_argument \$2;
#X obj 427 89 purepd/float_argument \$3;
#X obj 47 12 inlet r;
#X obj 427 18 inlet theta;
#X obj 300 44 loadbang;
#X obj 107 129 pack float float float;
#X obj 107 150 trigger anything anything anything;
#X obj 14 268 expr $f1 * sin($f2) * cos($f3);
#X obj 397 268 expr $f1 * cos($f2);
#X obj 207 268 expr $f1 * sin($f2) * sin($f3);
#X connect 1 0 5 0;
#X connect 4 0 10 0;
#X connect 5 0 10 1;
#X connect 6 0 10 2;
#X connect 7 0 10 0;
#X connect 8 0 6 0;
#X connect 9 0 5 0;
#X connect 9 0 6 0;
#X connect 9 0 4 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 14 0;
#X connect 11 2 13 0;
#X connect 12 0 2 0;
#X connect 13 0 0 0;
#X connect 14 0 3 0;