Using the sqrt(r^2-x^2) formula I get the same results as with the [sin],
[cos]. Maybe I'm just implementing it wrong, but I can't figure out why it's
not plotting the correct y values...

Here's the patch I sent before with my implementation of the sqrt(r^2 - x^2)

On Sun, Apr 10, 2011 at 8:52 AM, Mathieu Bouchard <ma...@artengine.ca>wrote:

> On Sun, 10 Apr 2011, Tyler Leavitt wrote:
>
>  I've not had any real success using the formulas with [sin] and [cos]...
>>
>
> I don't know why, but I had assumed that you wanted to plot something
> "parametrically", such as a path drawn from x(t) and y(t) functions, instead
> of a y(x) function. I was reading too fast.
>
> For a y(x) function, sqrt(r*r-x*x) is the formula to use.
>
> That is related to the fact that sqrt(1-x*x) = sin(acos(x)) = cos(asin(x))
> where asin is anti-sin and acos is anti-cos.
>
> It's also related to Pythagoras' theorem x*x + y*y = r*r which is also
> sin(t)*sin(t) + cos(t)*cos(t) = 1.
>
>
>  _______________________________________________________________________
> | Mathieu Bouchard ---- tél: +1.514.383.3801 ---- Villeray, Montréal, QC
>
#N canvas 638 7 732 664 10;
#X obj 171 35 tabwrite array1;
#X obj 31 -34 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array1 1000 float 3;
#A 0 1000 -1.11659e-06 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 999.848 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 999.391 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
998.63 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 997.564 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 996.195 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 994.522 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 992.546 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
990.268 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 987.688 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 984.808 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 981.627 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 978.148 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 974.37
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 970.296 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 965.926 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 961.262 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 956.305 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 951.056 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 945.518 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 939.693
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 933.58 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
927.184 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 920.505 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 913.545 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 906.308 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 898.794 0 0 0 0 0 0 0 0 0 0 0 0 0 0 891.006 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 882.947 0 0 0 0 0 0 0 0 0 0 0 0 0 0 874.62 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 866.025 0 0 0 0 0 0 0 0 0 0 0 0 0 0 857.167
0 0 0 0 0 0 0 0 0 0 0 0 0 848.048 0 0 0 0 0 0 0 0 0 0 0 0 0 0 838.67
0 0 0 0 0 0 0 0 0 0 0 0 0 0 829.037 0 0 0 0 0 0 0 0 0 0 0 0 0 819.152
0 0 0 0 0 0 0 0 0 0 0 0 0 809.017 0 0 0 0 0 0 0 0 0 0 0 0 0 798.635
0 0 0 0 0 0 0 0 0 0 0 0 0 788.01 0 0 0 0 0 0 0 0 0 0 0 0 0 777.146
0 0 0 0 0 0 0 0 0 0 0 0 766.044 0 0 0 0 0 0 0 0 0 0 0 0 0 754.709 0
0 0 0 0 0 0 0 0 0 0 0 743.145 0 0 0 0 0 0 0 0 0 0 0 731.353 0 0 0 0
0 0 0 0 0 0 0 0 719.339 0 0 0 0 0 0 0 0 0 0 0 0 707.106 0 0 0 0 0 0
0 0 0 0 0 694.658 0 0 0 0 0 0 0 0 0 0 0 681.998 0 0 0 0 0 0 0 0 0 0
0 669.13 0 0 0 0 0 0 0 0 0 0 656.059 0 0 0 0 0 0 0 0 0 0 0 642.787
0 0 0 0 0 0 0 0 0 0 629.32 0 0 0 0 0 0 0 0 0 0 615.661 0 0 0 0 0 0
0 0 0 601.815 0 0 0 0 0 0 0 0 0 0 587.785 0 0 0 0 0 0 0 0 0 573.576
0 0 0 0 0 0 0 0 0 559.192 0 0 0 0 0 0 0 0 544.638 0 0 0 0 0 0 0 0 0
529.919 0 0 0 0 0 0 0 0 515.037 0 0 0 0 0 0 0 0 499.999 0 0 0 0 0 0
0 484.809 0 0 0 0 0 0 0 469.471 0 0 0 0 0 0 0 0 453.99 0 0 0 0 0 0
438.37 0 0 0 0 0 0 0 422.618 0 0 0 0 0 0 406.736 0 0 0 0 0 0 390.73
0 0 0 0 0 0 374.606 0 0 0 0 0 358.367 0 0 0 0 0 342.019 0 0 0 0 0 325.567
0 0 0 0 0 309.016 0 0 0 0 292.371 0 0 0 0 275.637 0 0 0 258.818 0 0
0 0 241.921 0 0 0 224.95 0 0 0 207.911 0 0 190.808 0 0 173.647 0 0
156.434 0 0 139.172 0 121.868 0 104.527 0 87.1547 69.7554 52.3349 -0.00111659
;
#X coords 0 0 1000 1000 200 200 1;
#X restore 151 115 graph;
#X obj 31 -13 for++ 0 90 20;
#X floatatom 31 10 0 0 0 0 - - -;
#X obj 31 50 * 6.28319;
#X obj 31 30 / 360;
#X floatatom 31 70 0 0 0 0 - - -;
#X obj 31 90 s radians;
#X obj 174 -62 r radians;
#X obj 213 -31 sin;
#X obj 172 -33 cos;
#X obj 172 -7 * 1000;
#X obj 234 -6 * 1000;
#X obj 414 -57 r radians;
#X obj 429 -24 sin;
#X obj 388 -26 cos;
#X obj 388 43 tabwrite array2;
#X obj 451 2 * 100;
#X obj 389 1 * 100;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array2 100 float 3;
#A 0 100 99.9848 0 99.9391 0 99.863 99.7564 0 99.6195 0 99.4522 0 99.2546
99.0268 0 98.7688 0 98.4808 0 98.1627 97.8148 0 97.437 0 97.0296 96.5926
0 96.1262 0 95.6305 95.1056 0 94.5518 0 93.9693 93.358 0 92.7184 0
92.0505 91.3545 0 90.6308 89.8794 0 89.1006 88.2947 0 87.462 0 86.6025
85.7167 84.8048 0 83.867 82.9037 0 81.9152 80.9017 0 79.8635 78.801
77.7146 0 76.6044 75.4709 74.3145 0 73.1353 71.9339 70.7106 69.4658
0 68.1998 66.913 65.6059 64.2787 62.932 61.5661 60.1814 58.7785 57.3576
55.9192 54.4638 52.9919 51.5037 49.9999 48.4809 46.9471 43.837 42.2618
40.6736 37.4606 34.2019 32.5567 29.2371 25.8818 20.7911 15.6434 -0.000111659
;
#X coords 0 0 100 100 200 200 1;
#X restore 374 117 graph;
#X obj 594 -49 r radians;
#X obj 635 -19 sin;
#X obj 594 -21 cos;
#X obj 658 7 * 10;
#X obj 596 6 * 10;
#X obj 595 34 tabwrite array3;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array3 10 float 3;
#A 0 9.96195 9.81627 9.56305 9.20505 8.7462 8.09017 7.19339 6.01815
4.3837 -1.11659e-05;
#X coords 0 0 10 10 200 200 1;
#X restore 588 120 graph;
#X obj 31 -59 loadbang;
#X obj 980 -9 r radians;
#X obj 1021 21 sin;
#X obj 980 19 cos;
#X obj 981 74 tabwrite array4;
#X obj 982 46 * 50;
#X obj 1044 47 * 50;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array4 50 float 3;
#A 0 49.9924 49.9695 49.9315 49.8782 49.8097 49.7261 49.5134 49.3844
49.2404 49.0814 48.9074 48.7185 48.2963 48.0631 47.8152 47.5528 47.2759
46.679 46.3592 46.0252 45.6773 44.9397 44.5503 44.1474 43.731 42.8584
42.4024 41.4519 40.9576 40.4508 39.4005 38.8573 37.7355 37.1572 35.967
34.7329 34.0999 32.8029 31.466 30.0907 28.6788 27.2319 25.7519 24.2404
21.9185 20.3368 17.101 14.6185 10.3955 -5.58297e-05;
#X coords 0 0 50 50 200 200 1;
#X restore 896 203 graph;
#X floatatom 187 420 5 0 0 0 - - -;
#X text 78 401 radius;
#X text 189 393 x;
#X obj 58 565 tabwrite array5;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array5 1000 float 3;
#A 0 1000 315.556 316.111 316.667 317.222 423 423 423 423 423 423 423
423 423 423 423 422.75 422.5 422.25 422 421.75 421.5 421.25 421 420.75
420.5 420.25 420 419.75 419.5 419.25 419 418.75 418.5 418.25 418 417.5
417 416.5 416 415.5 415 414.5 414 999 413 412.5 412 411.5 411 410.5
410 409.5 409 408.5 408 407.667 407.333 407 406.667 406.333 406 405.667
998 405 404.667 404.333 404 403.667 403.333 403 402.75 402.5 402.25
402 401.75 401.5 997 401 400.75 400.5 400.25 400 399.75 399.5 399.25
399 398.75 398.5 996 398 398 398 398 398 398 398 398 398 995 398 398
398 398 398 398 398 398 398 994 398 398 398 398 398 398 398 398 993
398 398 398 398 398 398 398 992 398 398 398 398 398 398 991 398 398
398 398 398 398 398 990 398 398 398 398 398 989 398 398 398 398 398
398 988 398 398 398 398 398 987 398 398 398 398 398 986 398 398 398
398 398 985 398 398 398 398 398 984 398 398 398.333 398.667 983 399.333
399.667 400 400.333 982 401 401.333 401.667 402 402.333 981 403 403
403 980 403 403 403 403 979 403 403 403 403 978 403 403 403 403 977
403 403 403.2 976 403.6 403.8 404 404.2 975 404.6 404.8 405 974 405.4
405.6 405.8 973 406.2 406.4 406.6 972 407 407.2 407.4 407.6 971 408
408 408 970 408 408 408 969 408 408 968 408 408 408 967 408 408 408
966 408 408 408.167 965 408.5 408.667 964 409 409.167 409.334 963 409.667
409.834 410 962 410.333 410.5 961 410.833 411 411.167 960 411.5 411.667
959 412 412.167 958 412.5 412.667 412.833 957 413 413 956 413 413 955
413 413 954 413 413 953 413 413 413 952 413 413 951 413 413 950 413
413 949 413.167 413.334 948 413.667 413.834 947 414.167 414.334 946
414.667 414.834 945 415.167 944 415.5 415.667 943 416 416.167 942 416.5
416.667 941 417 417.167 940 417.5 939 417.833 418 938 418 418 937 418
418 936 418 935 418 418 934 418 933 418 418 932 418 418 931 418 930
418 418 929 418 928 418 418 927 418.143 926 418.429 925 418.714 418.857
924 419.143 923 419.429 419.572 922 419.857 921 420.143 920 420.429
420.572 919 420.857 918 421.143 917 421.429 421.571 916 421.857 915
422.143 914 422.429 913 422.714 422.857 912 423.143 911 423.429 910
423.714 909 424 908 424.286 424.429 907 424.714 906 425 905 425.286
904 425.572 903 425.857 902 426.143 901 426.429 900 426.714 899 427
898 427.286 427.429 897 427.714 896 428 895 428.25 894 428.5 893 428.75
892 429 891 890 429.375 889 429.625 888 429.875 887 430.125 886 430.375
885 430.625 884 430.875 883 431.125 882 431.375 881 880 431.75 879
432 878 432.25 877 432.5 876 432.75 875 874 433.125 873 433.375 872
433.625 871 433.875 870 869 434.25 868 434.5 867 434.75 866 865 435.125
864 435.375 863 862 435.75 861 436 860 859 436.375 858 436.625 857
856 437 855 437.25 854 853 437.625 852 437.875 851 850 438.286 849
848 438.714 847 439 846 845 439.429 844 843 439.857 842 440.143 841
840 440.572 839 838 441 837 836 441.429 835 834 441.857 833 832 442.286
831 830 442.714 829 828 443.125 827 826 443.5 825 824 443.875 823 822
821 444.375 820 819 444.75 818 817 445.125 816 815 814 445.625 813
812 446 811 810 809 446.5 808 807 806 447 805 804 803 447.5 802 801
447.875 800 799 798 797 448 796 795 794 448 793 792 791 448 790 789
788 787 448 786 785 784 448 783 782 781 780 448 779 778 777 776 775
448 774 773 772 771 448.4 770 769 768 767 766 449.6 765 764 763 762
761 760 451 759 758 757 756 755 754 452.4 753 752 751 750 749 748 747
746 453 745 744 743 742 741 740 739 738 737 736 453 735 734 733 732
731 730 729 728 727 726 725 724 723 722 721 720 453 719 718 717 716
715 714 713 712 711 710 709 708 707 706 705 704 703 702 701 700 699
698 697 696 695 693 692 691 690 689 688 687 686 685 684 683 682 681
680 679 678 676 675 674 673 672 671 670 669 668 667 665 664 663 662
661 660 659 658 656 655 654 653 652 651 649 648 647 646 645 644 642
641 640 639 638 636 635 634 633 631 630 629 628 627 625 624 623 622
620 619 618 616 615 614 613 611 610 609 607 606 605 603 602 601 600
598 597 595 594 593 591 590 589 587 586 585 583 582 580 579 578 576
575 573 572 570 569 568 566 565 563 562 560 559 557 556 554 553 551
550 548 547 545 544 542 541 539 537 536 534 533 531 529 528 526 525
523 521 520 518 516 515 513 511 510 508 506 505 503 501 500 498 496
494 493 491 489 487 485 484 482 480 478 476 474 473 471 469 467 465
463 461 459 457 455 454 452 450 448 446 444 442 439 437 435 433 431
429 427 425 423 421 418 416 414 412 410 407 405 403 401 398 396 394
391 389 387 384 382 379 377 375 372 370 367 365 362 359 357 354 352
349 346 343 341 338 335 332 329 327 324 321 318 315 312 309 306 302
299 296 293 290 286 283 280 276 273 269 265 262 258 254 250 247 243
239 234 230 226 222 217 213 208 203 198 194 188 183 178 172 166 160
154 147 141 133 126 118 109 99 89 77 63 44;
#X coords 0 0 1000 1000 200 200 1;
#X restore 396 372 graph;
#X obj 81 452 pack f f;
#X obj 139 424 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 226 547 5 0 0 0 - - -;
#X obj 88 484 expr sqrt($f1 * $f1 - $f2 * $f2);
#X obj 141 530 i;
#X obj 216 357 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 216 378 for++ 0 1000 20;
#X msg 41 403 1000;
#X obj 41 353 loadbang;
#X connect 1 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 9 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 12 0 0 0;
#X connect 13 0 0 1;
#X connect 14 0 15 0;
#X connect 14 0 16 0;
#X connect 15 0 18 0;
#X connect 16 0 19 0;
#X connect 18 0 17 1;
#X connect 19 0 17 0;
#X connect 21 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 24 0;
#X connect 23 0 25 0;
#X connect 24 0 26 1;
#X connect 25 0 26 0;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 34 0;
#X connect 31 0 33 0;
#X connect 33 0 32 0;
#X connect 34 0 32 1;
#X connect 36 0 41 1;
#X connect 36 0 42 0;
#X connect 36 0 39 0;
#X connect 41 0 44 0;
#X connect 42 0 41 0;
#X connect 44 0 43 0;
#X connect 44 0 45 0;
#X connect 45 0 39 1;
#X connect 46 0 47 0;
#X connect 47 0 36 0;
#X connect 48 0 41 0;
#X connect 49 0 48 0;
#X connect 49 0 46 0;
_______________________________________________
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management -> 
http://lists.puredata.info/listinfo/pd-list

Reply via email to