#N canvas 1 53 686 438 10;
#X obj 397 395 outlet z;
#X obj 267 12 inlet phi;
#X obj 14 391 outlet x;
#X obj 207 395 outlet y;
#X obj 107 99 purepd/float_argument \$1;
#X obj 267 99 purepd/float_argument \$2;
#X obj 427 99 purepd/float_argument \$3;
#X obj 17 12 inlet r;
#X obj 427 12 inlet theta;
#X obj 316 56 loadbang;
#X obj 107 169 pack float float float;
#X obj 107 190 trigger anything anything anything;
#X obj 14 338 expr $f1 * sin($f2) * cos($f3);
#X obj 397 338 expr $f1 * cos($f2);
#X obj 207 338 expr $f1 * sin($f2) * sin($f3);
#X obj 397 314 unpack float float float;
#X obj 427 125 mapping/mapping2radians;
#X obj 267 125 mapping/mapping2radians;
#X text 390 413 released under the GNU GPL;
#X text 43 413 (C) Copyright 2008 Hans-Christoph Steiner <hans@at.or.at>
;
#X connect 1 0 5 0;
#X connect 4 0 10 0;
#X connect 5 0 17 0;
#X connect 6 0 16 0;
#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 15 0;
#X connect 12 0 2 0;
#X connect 13 0 0 0;
#X connect 14 0 3 0;
#X connect 15 0 13 0;
#X connect 15 1 13 1;
#X connect 16 0 10 2;
#X connect 17 0 10 1;