#N canvas 549 17 647 652 12;
#X obj 42 505 expr acos($f1/$f3) * 180 / 3.1415 * $f2;
#X obj 323 366 expr sqrt($f1);
#X obj 323 338 + 0;
#X obj 78 313 * 0;
#X obj 343 276 * 0;
#X msg 460 505 0;
#X msg 233 265 -1;
#X msg 268 265 1;
#X obj 42 249 expr ($f1-0.5)/0.5;
#X obj 233 145 expr ($f1-0.5)/0.5;
#X obj 42 16 inlet;
#X obj 42 570 outlet;
#X obj 488 569 outlet;
#X obj 407 431 expr 90 - ($f1*90.0);
#X obj 460 479 moses 0;
#X obj 233 238 moses 0;
#X obj 42 279 t f f f;
#X obj 233 179 t f f f;
#X obj 42 99 unpack f f;
#X msg 42 67 \$2 \$1;
#X text 101 66 reverse order;
#X text 101 16 float x \, float y;
#X obj 323 393 t f f;
#X connect 0 0 11 0;
#X connect 1 0 22 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 2 1;
#X connect 5 0 12 0;
#X connect 6 0 0 1;
#X connect 7 0 0 1;
#X connect 8 0 16 0;
#X connect 9 0 17 0;
#X connect 10 0 19 0;
#X connect 13 0 14 0;
#X connect 14 0 5 0;
#X connect 14 1 12 0;
#X connect 15 0 6 0;
#X connect 15 1 7 0;
#X connect 16 0 0 0;
#X connect 16 1 3 0;
#X connect 16 2 3 1;
#X connect 17 0 15 0;
#X connect 17 1 4 0;
#X connect 17 2 4 1;
#X connect 18 0 8 0;
#X connect 18 1 9 0;
#X connect 19 0 18 0;
#X connect 22 0 0 2;
#X connect 22 1 13 0;