Mercurial > hg > cavity-tone

comparison CavD5.pd @ 1:88c2acdaa49a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Patches altered to account for additional factor.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Mon, 10 Apr 2017 19:38:33 +0100
parents bb1881a77862
children 36c099597c68
comparison
equal deleted inserted replaced
0:bb1881a77862 1:88c2acdaa49a
1 #N canvas 129 23 1287 823 10; 1 #N canvas 267 25 1287 823 10;
2 #X obj -172 -182 loadbang; 2 #X obj -172 -182 loadbang;
3 #X obj -172 -145 metro 10; 3 #X obj -172 -145 metro 10;
4 #X obj -172 -162 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 4 #X obj -172 -162 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
5 1 1; 5 1 1;
6 #X obj -172 -123 s myMet; 6 #X obj -172 -123 s myMet;
37 #X connect 6 0 9 0; 37 #X connect 6 0 9 0;
38 #X connect 7 0 4 1; 38 #X connect 7 0 4 1;
39 #X connect 7 0 3 1; 39 #X connect 7 0 3 1;
40 #X restore -163 424 pd opLevels; 40 #X restore -163 424 pd opLevels;
41 #X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8 41 #X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8
42 0 10 -262144 -1 -1 15189 1; 42 0 10 -262144 -1 -1 5747 1;
43 #X obj -163 324 r GAIN; 43 #X obj -163 324 r GAIN;
44 #X floatatom -220 425 8 0 0 0 - - -; 44 #X floatatom -220 425 8 0 0 0 - - -;
45 #X obj 436 -178 hsl 100 25 0.0001 10 1 0 empty empty Length 3 13 0 45 #X obj 436 -178 hsl 100 25 0.0001 10 1 0 empty empty Length 3 13 0
46 10 -262144 -1 -1 4905 1; 46 10 -262144 -1 -1 3274 1;
47 #X floatatom 481 -147 0 0 0 0 - - -; 47 #X floatatom 481 -147 0 0 0 0 - - -;
48 #X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 48 #X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10
49 -262144 -1 -1 4905 1; 49 -262144 -1 -1 5501 1;
50 #X floatatom 595 -148 0 0 0 0 - - -; 50 #X floatatom 595 -148 0 0 0 0 - - -;
51 #X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 51 #X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10
52 -262144 -1 -1 4309 1; 52 -262144 -1 -1 2329 1;
53 #X floatatom 712 -149 0 0 0 0 - - -; 53 #X floatatom 712 -149 0 0 0 0 - - -;
54 #X obj -41 -3 delwrite~ varwind 3000; 54 #X obj -41 -3 delwrite~ varwind 3000;
55 #X obj 70 -127 hsl 100 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144 55 #X obj 70 -127 hsl 100 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
56 -1 -1 0 1; 56 -1 -1 0 1;
57 #X obj -39 -83 *~ 1; 57 #X obj -39 -83 *~ 1;
499 #X connect 120 0 53 1; 499 #X connect 120 0 53 1;
500 #X connect 121 0 27 1; 500 #X connect 121 0 27 1;
501 #X restore -47 39 pd rossFreqD1_n=1-4; 501 #X restore -47 39 pd rossFreqD1_n=1-4;
502 #X obj 603 -18 s \$0-Qval; 502 #X obj 603 -18 s \$0-Qval;
503 #X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 503 #X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144
504 -1 -1 3310 1; 504 -1 -1 1940 1;
505 #X obj 603 -77 loadbang; 505 #X obj 603 -77 loadbang;
506 #X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 506 #X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10
507 -262144 -1 -1 2450 1; 507 -262144 -1 -1 2450 1;
508 #X floatatom 501 -12 0 0 0 0 - - -; 508 #X floatatom 501 -12 0 0 0 0 - - -;
509 #X msg 434 -11 \$1 20; 509 #X msg 434 -11 \$1 20;
567 #X connect 15 0 14 0; 567 #X connect 15 0 14 0;
568 #X connect 16 0 11 0; 568 #X connect 16 0 11 0;
569 #X connect 17 0 1 0; 569 #X connect 17 0 1 0;
570 #X connect 18 0 6 0; 570 #X connect 18 0 6 0;
571 #X restore 93 107 pd rangeLimit; 571 #X restore 93 107 pd rangeLimit;
572 #X obj 210 202 *~;
573 #X text 40 -33 Generates the sound associated with the resonant cavity 572 #X text 40 -33 Generates the sound associated with the resonant cavity
574 monopole.; 573 monopole.;
575 #X obj 149 349 outlet~; 574 #X obj 149 349 outlet~;
576 #X obj 149 327 *~; 575 #X obj 149 327 *~;
577 #X obj 315 274 snapshot~; 576 #X obj 315 274 snapshot~;
587 #X connect 7 0 2 0; 586 #X connect 7 0 2 0;
588 #X connect 8 0 12 0; 587 #X connect 8 0 12 0;
589 #X connect 8 0 10 1; 588 #X connect 8 0 10 1;
590 #X connect 8 0 11 1; 589 #X connect 8 0 11 1;
591 #X connect 9 0 7 1; 590 #X connect 9 0 7 1;
592 #X connect 9 0 16 1;
593 #X connect 10 0 11 0; 591 #X connect 10 0 11 0;
594 #X connect 11 0 13 0; 592 #X connect 11 0 7 0;
595 #X connect 12 0 13 1; 593 #X connect 12 0 15 0;
596 #X connect 12 0 16 0; 594 #X connect 15 0 14 0;
597 #X connect 13 0 7 0; 595 #X connect 16 0 17 0;
598 #X connect 16 0 15 0; 596 #X connect 18 0 16 0;
599 #X connect 17 0 18 0;
600 #X connect 19 0 17 0;
601 #X restore 83 508 pd Monopole; 597 #X restore 83 508 pd Monopole;
602 #N canvas 570 67 638 485 Dipoles 0; 598 #N canvas 570 67 638 485 Dipoles 0;
603 #X obj 132 230 *~; 599 #X obj 132 230 *~;
604 #X obj 132 355 throw~ l; 600 #X obj 132 355 throw~ l;
605 #X obj 159 332 throw~ r; 601 #X obj 159 332 throw~ r;
741 #X obj 147 250 r~ \$0-thisCond; 737 #X obj 147 250 r~ \$0-thisCond;
742 #X obj 291 367 snapshot~; 738 #X obj 291 367 snapshot~;
743 #X floatatom 291 387 0 0 0 0 - - -; 739 #X floatatom 291 387 0 0 0 0 - - -;
744 #X obj 291 346 r myMet; 740 #X obj 291 346 r myMet;
745 #X obj 278 407 outlet; 741 #X obj 278 407 outlet;
746 #X obj 147 205 HoweIntensityDipoleD2; 742 #X obj 147 203 HoweIntensityDipoleD2;
747 #X connect 0 0 11 0; 743 #X connect 0 0 11 0;
748 #X connect 3 0 1 0; 744 #X connect 3 0 1 0;
749 #X connect 3 1 2 0; 745 #X connect 3 1 2 0;
750 #X connect 4 0 3 1; 746 #X connect 4 0 3 1;
751 #X connect 5 0 8 0; 747 #X connect 5 0 8 0;
880 #X connect 13 0 4 0; 876 #X connect 13 0 4 0;
881 #X connect 13 0 10 0; 877 #X connect 13 0 10 0;
882 #X connect 14 0 3 0; 878 #X connect 14 0 3 0;
883 #X restore 638 138 pd thickcalc; 879 #X restore 638 138 pd thickcalc;
884 #X obj -82 -128 s gusts; 880 #X obj -82 -128 s gusts;
885 #N canvas 815 537 450 300 IntensityTest 0; 881 #N canvas 752 190 656 557 IntensityTest 0;
886 #N canvas 276 439 681 350 PlotWrt 0; 882 #N canvas 87 229 681 350 PlotWrt 0;
887 #X obj 70 303 textfile; 883 #X obj 70 303 textfile;
888 #X msg 562 196 clear \, rewind; 884 #X msg 562 196 clear \, rewind;
889 #X obj 212 134 snapshot~; 885 #X obj 212 134 snapshot~;
890 #X floatatom 220 157 0 0 0 0 - - -; 886 #X floatatom 220 157 0 0 0 0 - - -;
891 #X obj 212 107 r myMet; 887 #X obj 212 107 r myMet;
904 #X obj 34 136 snapshot~; 900 #X obj 34 136 snapshot~;
905 #X floatatom 42 159 0 0 0 0 - - -; 901 #X floatatom 42 159 0 0 0 0 - - -;
906 #X obj 34 109 r myMet; 902 #X obj 34 109 r myMet;
907 #X obj 21 86 inlet~; 903 #X obj 21 86 inlet~;
908 #X msg 34 180 add2 \$1; 904 #X msg 34 180 add2 \$1;
909 #X msg 419 163 write HoweFull5_060417.txt; 905 #X obj -38 134 snapshot~;
906 #X floatatom -30 157 0 0 0 0 - - -;
907 #X obj -38 107 r myMet;
908 #X obj -51 84 inlet~;
909 #X msg -38 178 add2 \$1;
910 #X msg 419 163 write HoweFull7_090417.txt;
910 #X connect 1 0 0 0; 911 #X connect 1 0 0 0;
911 #X connect 2 0 3 0; 912 #X connect 2 0 3 0;
912 #X connect 2 0 11 0; 913 #X connect 2 0 11 0;
913 #X connect 4 0 2 0; 914 #X connect 4 0 2 0;
914 #X connect 5 0 2 0; 915 #X connect 5 0 2 0;
926 #X connect 17 0 18 0; 927 #X connect 17 0 18 0;
927 #X connect 17 0 21 0; 928 #X connect 17 0 21 0;
928 #X connect 19 0 17 0; 929 #X connect 19 0 17 0;
929 #X connect 20 0 17 0; 930 #X connect 20 0 17 0;
930 #X connect 21 0 0 0; 931 #X connect 21 0 0 0;
931 #X connect 22 0 0 0; 932 #X connect 22 0 23 0;
933 #X connect 22 0 26 0;
934 #X connect 24 0 22 0;
935 #X connect 25 0 22 0;
936 #X connect 26 0 0 0;
937 #X connect 27 0 0 0;
932 #X restore 148 173 pd PlotWrt; 938 #X restore 148 173 pd PlotWrt;
933 #X obj 200 50 HoweIntensity; 939 #X obj 200 50 HoweIntensity;
934 #X obj 208 -49 hsl 100 15 0 20000 0 0 empty empty empty -2 -8 0 10 940 #X obj 208 -49 hsl 100 15 0 20000 0 0 empty empty empty -2 -8 0 10
935 -262144 -1 -1 0 1; 941 -262144 -1 -1 1000 1;
936 #X floatatom 246 -30 0 0 0 0 - - -; 942 #X floatatom 246 -30 0 0 0 0 - - -;
937 #X obj 113 75 snapshot~; 943 #X obj 113 75 snapshot~;
938 #X floatatom 113 95 0 0 0 0 - - -; 944 #X floatatom 113 95 0 0 0 0 - - -;
939 #X obj 113 54 r myMet; 945 #X obj 113 54 r myMet;
940 #X msg 205 -29 \$1 20; 946 #X msg 205 -29 \$1 20;
941 #X obj 171 24 line~; 947 #X obj 171 24 line~;
942 #X obj 70 150 snapshot~; 948 #X obj 70 150 snapshot~;
943 #X floatatom 70 170 0 0 0 0 - - -; 949 #X floatatom 70 170 0 0 0 0 - - -;
944 #X obj 70 129 r myMet; 950 #X obj 70 129 r myMet;
945 #X msg 180 -8 0; 951 #X msg 180 -8 0;
952 #X obj 215 73 HoweIntensityDipoleD2;
953 #X obj 31 105 HoweIntMod;
954 #X obj 234 524 snapshot~;
955 #X floatatom 234 544 0 0 0 0 - - -;
956 #X obj 234 503 r myMet;
957 #X obj 412 43 HoweIntTest;
958 #X msg 87 -1 6000 7000;
946 #X obj 250 26 HoweIntensity; 959 #X obj 250 26 HoweIntensity;
947 #X msg 87 -1 12000 15000;
948 #X obj 223 103 HoweIntensityMonoTest; 960 #X obj 223 103 HoweIntensityMonoTest;
949 #X obj 215 73 HoweIntensityDipoleD2; 961 #X connect 1 0 0 1;
950 #X connect 1 0 0 0;
951 #X connect 1 0 9 0; 962 #X connect 1 0 9 0;
952 #X connect 2 0 3 0; 963 #X connect 2 0 3 0;
953 #X connect 2 0 7 0; 964 #X connect 2 0 7 0;
954 #X connect 4 0 5 0; 965 #X connect 4 0 5 0;
955 #X connect 6 0 4 0; 966 #X connect 6 0 4 0;
956 #X connect 7 0 8 0; 967 #X connect 7 0 8 0;
957 #X connect 8 0 1 0; 968 #X connect 8 0 1 0;
958 #X connect 8 0 0 3; 969 #X connect 8 0 0 4;
959 #X connect 8 0 4 0; 970 #X connect 8 0 4 0;
960 #X connect 8 0 15 0; 971 #X connect 8 0 13 0;
961 #X connect 8 0 16 0; 972 #X connect 8 0 14 0;
973 #X connect 8 0 18 0;
974 #X connect 8 0 21 0;
962 #X connect 9 0 10 0; 975 #X connect 9 0 10 0;
963 #X connect 11 0 9 0; 976 #X connect 11 0 9 0;
964 #X connect 12 0 8 0; 977 #X connect 12 0 8 0;
965 #X connect 14 0 8 0; 978 #X connect 13 0 0 2;
966 #X connect 15 1 0 2; 979 #X connect 14 0 0 0;
967 #X connect 16 0 0 1; 980 #X connect 15 0 16 0;
981 #X connect 17 0 15 0;
982 #X connect 19 0 8 0;
983 #X connect 21 1 0 3;
968 #X restore 609 52 pd IntensityTest; 984 #X restore 609 52 pd IntensityTest;
969 #N canvas 765 502 606 328 AngleTest 0; 985 #N canvas 387 61 1247 749 AngleTest 0;
970 #N canvas 61 95 798 402 PlotWrt 0; 986 #N canvas 61 95 798 402 PlotWrt 0;
971 #X obj 70 303 textfile; 987 #X obj 70 303 textfile;
972 #X msg 574 162 clear \, rewind; 988 #X msg 574 162 clear \, rewind;
973 #X obj 212 134 snapshot~; 989 #X obj 212 134 snapshot~;
974 #X floatatom 220 157 0 0 0 0 - - -; 990 #X floatatom 220 157 0 0 0 0 - - -;
1031 #X connect 27 0 31 0; 1047 #X connect 27 0 31 0;
1032 #X connect 29 0 27 0; 1048 #X connect 29 0 27 0;
1033 #X connect 30 0 27 0; 1049 #X connect 30 0 27 0;
1034 #X connect 31 0 0 0; 1050 #X connect 31 0 0 0;
1035 #X connect 32 0 0 0; 1051 #X connect 32 0 0 0;
1036 #X restore 309 222 pd PlotWrt; 1052 #X restore 309 281 pd PlotWrt;
1037 #N canvas 417 23 740 476 FreqCalc 0; 1053 #N canvas 417 23 740 476 FreqCalc 0;
1038 #X obj 100 113 r~ windSpeed; 1054 #X obj 100 113 r~ windSpeed;
1039 #X obj 189 115 sig~ 0.5; 1055 #X obj 189 115 sig~ 0.5;
1040 #X obj 549 116 r~ thisLen; 1056 #X obj 549 116 r~ thisLen;
1041 #X obj 181 187 /~; 1057 #X obj 181 187 /~;
1096 #X floatatom 78 118 0 0 0 0 - - -; 1112 #X floatatom 78 118 0 0 0 0 - - -;
1097 #X obj 78 77 r myMet; 1113 #X obj 78 77 r myMet;
1098 #X obj 140 97 snapshot~; 1114 #X obj 140 97 snapshot~;
1099 #X floatatom 140 117 0 0 0 0 - - -; 1115 #X floatatom 140 117 0 0 0 0 - - -;
1100 #X obj 140 76 r myMet; 1116 #X obj 140 76 r myMet;
1101 #X obj 385 87 line~; 1117 #X obj 547 82 line~;
1102 #X obj 303 104 HoweDirect; 1118 #X obj 303 104 HoweDirect;
1103 #X msg 366 38 0; 1119 #X msg 577 17 0;
1104 #X obj 393 110 /~ 360; 1120 #X obj 555 105 /~ 360;
1105 #X obj 446 153 outlet~; 1121 #X obj 608 148 outlet~;
1106 #X msg 301 39 180 500; 1122 #X msg 512 18 180 500;
1107 #X obj 316 130 HoweDirect; 1123 #X obj 316 130 HoweDirect;
1108 #X obj 339 173 HoweDirect; 1124 #X obj 339 173 HoweDirect;
1109 #X obj 329 150 HoweDirect; 1125 #X obj 329 150 HoweDirect;
1110 #X obj 353 198 HoweDirect; 1126 #X obj 353 198 HoweDirect;
1111 #X msg 418 49 90; 1127 #X msg 580 44 90;
1128 #X obj 23 354 HoweIntensityDipoleD2;
1129 #X obj 23 397 +~;
1130 #N canvas 60 397 798 402 PlotWrt 0;
1131 #X obj 70 303 textfile;
1132 #X msg 574 162 clear \, rewind;
1133 #X obj 212 134 snapshot~;
1134 #X floatatom 220 157 0 0 0 0 - - -;
1135 #X obj 212 107 r myMet;
1136 #X obj 199 84 inlet~;
1137 #X obj 449 139 snapshot~;
1138 #X floatatom 458 161 0 0 0 0 - - -;
1139 #X obj 449 112 r myMet;
1140 #X obj 436 89 inlet~;
1141 #X msg 449 183 add \$1;
1142 #X msg 212 178 add2 \$1;
1143 #X obj 130 134 snapshot~;
1144 #X floatatom 138 157 0 0 0 0 - - -;
1145 #X obj 130 107 r myMet;
1146 #X obj 117 84 inlet~;
1147 #X msg 130 178 add2 \$1;
1148 #X obj 34 136 snapshot~;
1149 #X floatatom 42 159 0 0 0 0 - - -;
1150 #X obj 34 109 r myMet;
1151 #X obj 21 86 inlet~;
1152 #X msg 34 180 add2 \$1;
1153 #X obj 367 136 snapshot~;
1154 #X floatatom 375 159 0 0 0 0 - - -;
1155 #X obj 367 109 r myMet;
1156 #X obj 354 86 inlet~;
1157 #X msg 367 180 add2 \$1;
1158 #X obj 285 136 snapshot~;
1159 #X floatatom 293 159 0 0 0 0 - - -;
1160 #X obj 285 109 r myMet;
1161 #X obj 272 86 inlet~;
1162 #X msg 285 180 add2 \$1;
1163 #X msg 575 106 write HoweDirD4_090417.txt;
1164 #X connect 1 0 0 0;
1165 #X connect 2 0 3 0;
1166 #X connect 2 0 11 0;
1167 #X connect 4 0 2 0;
1168 #X connect 5 0 2 0;
1169 #X connect 6 0 7 0;
1170 #X connect 6 0 10 0;
1171 #X connect 8 0 6 0;
1172 #X connect 9 0 6 0;
1173 #X connect 10 0 0 0;
1174 #X connect 11 0 0 0;
1175 #X connect 12 0 13 0;
1176 #X connect 12 0 16 0;
1177 #X connect 14 0 12 0;
1178 #X connect 15 0 12 0;
1179 #X connect 16 0 0 0;
1180 #X connect 17 0 18 0;
1181 #X connect 17 0 21 0;
1182 #X connect 19 0 17 0;
1183 #X connect 20 0 17 0;
1184 #X connect 21 0 0 0;
1185 #X connect 22 0 23 0;
1186 #X connect 22 0 26 0;
1187 #X connect 24 0 22 0;
1188 #X connect 25 0 22 0;
1189 #X connect 26 0 0 0;
1190 #X connect 27 0 28 0;
1191 #X connect 27 0 31 0;
1192 #X connect 29 0 27 0;
1193 #X connect 30 0 27 0;
1194 #X connect 31 0 0 0;
1195 #X connect 32 0 0 0;
1196 #X restore 448 538 pd PlotWrt;
1197 #X obj 203 359 HoweIntensityDipoleD2;
1198 #X obj 203 402 +~;
1199 #X obj 372 358 HoweIntensityDipoleD2;
1200 #X obj 372 401 +~;
1201 #X obj 552 363 HoweIntensityDipoleD2;
1202 #X obj 552 406 +~;
1203 #X obj 720 362 HoweIntensityDipoleD2;
1204 #X obj 720 405 +~;
1205 #X obj 218 380 HoweIntensityMonoTest;
1206 #X obj 38 375 HoweIntensityMonoTest;
1207 #X obj 387 379 HoweIntensityMonoTest;
1208 #X obj 567 384 HoweIntensityMonoTest;
1209 #X obj 735 383 HoweIntensityMonoTest;
1112 #X connect 1 0 2 0; 1210 #X connect 1 0 2 0;
1113 #X connect 1 0 18 0; 1211 #X connect 1 0 18 0;
1212 #X connect 1 0 28 0;
1213 #X connect 1 0 40 0;
1114 #X connect 1 1 5 0; 1214 #X connect 1 1 5 0;
1115 #X connect 1 1 23 0; 1215 #X connect 1 1 23 0;
1216 #X connect 1 1 31 0;
1217 #X connect 1 1 39 0;
1116 #X connect 1 2 8 0; 1218 #X connect 1 2 8 0;
1117 #X connect 1 2 25 0; 1219 #X connect 1 2 25 0;
1220 #X connect 1 2 33 0;
1221 #X connect 1 2 41 0;
1118 #X connect 1 3 11 0; 1222 #X connect 1 3 11 0;
1119 #X connect 1 3 24 0; 1223 #X connect 1 3 24 0;
1224 #X connect 1 3 35 0;
1225 #X connect 1 3 42 0;
1120 #X connect 1 4 14 0; 1226 #X connect 1 4 14 0;
1121 #X connect 1 4 26 0; 1227 #X connect 1 4 26 0;
1228 #X connect 1 4 37 0;
1229 #X connect 1 4 43 0;
1122 #X connect 2 0 3 0; 1230 #X connect 2 0 3 0;
1123 #X connect 4 0 2 0; 1231 #X connect 4 0 2 0;
1124 #X connect 5 0 6 0; 1232 #X connect 5 0 6 0;
1125 #X connect 7 0 5 0; 1233 #X connect 7 0 5 0;
1126 #X connect 8 0 9 0; 1234 #X connect 8 0 9 0;
1129 #X connect 13 0 11 0; 1237 #X connect 13 0 11 0;
1130 #X connect 14 0 15 0; 1238 #X connect 14 0 15 0;
1131 #X connect 16 0 14 0; 1239 #X connect 16 0 14 0;
1132 #X connect 17 0 0 5; 1240 #X connect 17 0 0 5;
1133 #X connect 17 0 20 0; 1241 #X connect 17 0 20 0;
1242 #X connect 17 0 30 5;
1134 #X connect 18 0 0 0; 1243 #X connect 18 0 0 0;
1135 #X connect 19 0 17 0; 1244 #X connect 19 0 17 0;
1136 #X connect 20 0 21 0; 1245 #X connect 20 0 21 0;
1137 #X connect 22 0 17 0; 1246 #X connect 22 0 17 0;
1138 #X connect 23 0 0 1; 1247 #X connect 23 0 0 1;
1139 #X connect 24 0 0 3; 1248 #X connect 24 0 0 3;
1140 #X connect 25 0 0 2; 1249 #X connect 25 0 0 2;
1141 #X connect 26 0 0 4; 1250 #X connect 26 0 0 4;
1142 #X connect 27 0 17 0; 1251 #X connect 27 0 17 0;
1252 #X connect 28 0 29 0;
1253 #X connect 29 0 30 0;
1254 #X connect 31 0 32 0;
1255 #X connect 32 0 30 1;
1256 #X connect 33 0 34 0;
1257 #X connect 34 0 30 2;
1258 #X connect 35 0 36 0;
1259 #X connect 36 0 30 3;
1260 #X connect 37 0 38 0;
1261 #X connect 38 0 30 4;
1262 #X connect 39 1 32 1;
1263 #X connect 40 1 29 1;
1264 #X connect 41 1 34 1;
1265 #X connect 42 1 36 1;
1266 #X connect 43 1 38 1;
1143 #X restore 636 111 pd AngleTest; 1267 #X restore 636 111 pd AngleTest;
1144 #X obj 543 506 s speed; 1268 #X obj 543 506 s speed;
1145 #X obj -94 -48 r speed; 1269 #X obj -94 -48 r speed;
1146 #X floatatom -153 -30 0 0 0 0 - - -; 1270 #X floatatom -153 -30 0 0 0 0 - - -;
1147 #X symbolatom 645 472 10 0 0 0 - - -; 1271 #X symbolatom 645 472 10 0 0 0 - - -;
1157 #X obj -102 327 inlet; 1281 #X obj -102 327 inlet;
1158 #X obj -207 485 outlet; 1282 #X obj -207 485 outlet;
1159 #X obj -214 457 outlet; 1283 #X obj -214 457 outlet;
1160 #X obj 480 463 unpack f f f f f s; 1284 #X obj 480 463 unpack f f f f f s;
1161 #X obj 564 486 s GAIN; 1285 #X obj 564 486 s GAIN;
1162 #X msg 684 434 0.4739 0.1016 0.1053 291.55 4 FUGLSANG;
1163 #X msg 684 393 0.03 0.03 0.015 3.43 8500 HOWE; 1286 #X msg 684 393 0.03 0.03 0.015 3.43 8500 HOWE;
1164 #X msg 683 371 0.06 0.06 0.35 40 0.1 ERICKSON; 1287 #X msg 683 371 0.06 0.06 0.35 40 0.1 ERICKSON;
1165 #X text -97 -88 comment; 1288 #X text -97 -88 comment;
1166 #N canvas 505 490 450 300 on/off 0; 1289 #N canvas 505 490 450 300 on/off 0;
1167 #X obj 169 93 inlet~; 1290 #X obj 169 93 inlet~;
1186 #X connect 1 0 2 0; 1309 #X connect 1 0 2 0;
1187 #X connect 2 0 3 0; 1310 #X connect 2 0 3 0;
1188 #X connect 3 0 4 0; 1311 #X connect 3 0 4 0;
1189 #X restore 83 527 pd on/off; 1312 #X restore 83 527 pd on/off;
1190 #X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 1313 #X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034
1191 1 1; 1314 0 1;
1192 #X msg 683 350 0.0191 0.1016 0.0127 308.7 7 AHUJA; 1315 #X msg 683 350 0.0191 0.1016 0.0127 308.7 7 AHUJA;
1193 #X msg 682 295 0.0476 0.1016 0.0127 137.2 7 AHUJA2; 1316 #X msg 682 295 0.0476 0.1016 0.0127 137.2 7 AHUJA2;
1194 #X obj 15 498 snapshot~;
1195 #X floatatom 15 518 0 0 0 0 - - -;
1196 #X obj 15 477 r myMet;
1197 #X msg 683 263 0.15 0.15 0.15 31 7 CHATELLIER; 1317 #X msg 683 263 0.15 0.15 0.15 31 7 CHATELLIER;
1198 #X obj 214 504 snapshot~; 1318 #X obj 214 504 snapshot~;
1199 #X floatatom 214 524 0 0 0 0 - - -; 1319 #X floatatom 214 524 0 0 0 0 - - -;
1200 #X obj 214 483 r myMet; 1320 #X obj 214 483 r myMet;
1201 #X floatatom 7 290 0 0 0 0 - - -; 1321 #X floatatom 7 290 0 0 0 0 - - -;
1349 #X connect 63 0 64 0; 1469 #X connect 63 0 64 0;
1350 #X connect 65 0 63 0; 1470 #X connect 65 0 63 0;
1351 #X restore 634 82 pd newShearThick; 1471 #X restore 634 82 pd newShearThick;
1352 #X msg 723 319 0.03 0.6 0.015 12 7 KOSCHATZKY; 1472 #X msg 723 319 0.03 0.6 0.015 12 7 KOSCHATZKY;
1353 #X msg 844 215 0.03 0.6 0.015 15 7 KOSCHATZKY2; 1473 #X msg 844 215 0.03 0.6 0.015 15 7 KOSCHATZKY2;
1354 #X obj 60 446 HoweIntensityMonoTest;
1355 #X msg -154 370 550; 1474 #X msg -154 370 550;
1356 #X msg 684 414 0.0045 0.06 0.0015 514.5 0.1 ZHENG; 1475 #X msg 684 414 0.0045 0.06 0.0015 514.5 0.1 ZHENG;
1476 #N canvas 632 119 701 487 MonopolePeak 0;
1477 #X obj 152 158 outlet~;
1478 #X obj 167 87 +~;
1479 #X obj 167 112 *~ 4;
1480 #X obj 152 23 sig~ 343;
1481 #X obj 152 133 /~;
1482 #X obj 323 71 *~;
1483 #X obj 323 114 /~ 4;
1484 #X obj 323 134 sqrt~;
1485 #X obj 323 30 r~ thisLen;
1486 #X obj 338 51 r~ thisWid;
1487 #X obj 323 93 *~ 3.14159;
1488 #X obj 182 65 r~ thisDep;
1489 #X connect 1 0 2 0;
1490 #X connect 2 0 4 1;
1491 #X connect 3 0 4 0;
1492 #X connect 4 0 0 0;
1493 #X connect 5 0 10 0;
1494 #X connect 6 0 7 0;
1495 #X connect 7 0 1 0;
1496 #X connect 8 0 5 0;
1497 #X connect 9 0 5 1;
1498 #X connect 10 0 6 0;
1499 #X connect 11 0 1 1;
1500 #X restore 741 75 pd MonopolePeak;
1501 #X obj 342 449 snapshot~;
1502 #X floatatom 342 469 0 0 0 0 - - -;
1503 #X obj 342 428 r myMet;
1504 #X obj 742 99 HoweIntMod;
1505 #X obj 78 456 HoweIntensityMonoTest;
1506 #X msg 684 434 0.4572 0.1016 0.1016 291.55 4 FUGLSANG;
1357 #X connect 0 0 2 0; 1507 #X connect 0 0 2 0;
1358 #X connect 1 0 3 0; 1508 #X connect 1 0 3 0;
1359 #X connect 2 0 1 0; 1509 #X connect 2 0 1 0;
1360 #X connect 8 0 193 0; 1510 #X connect 8 0 188 0;
1361 #X connect 9 0 5 0; 1511 #X connect 9 0 5 0;
1362 #X connect 9 0 148 0; 1512 #X connect 9 0 148 0;
1363 #X connect 9 1 6 0; 1513 #X connect 9 1 6 0;
1364 #X connect 9 1 147 0; 1514 #X connect 9 1 147 0;
1365 #X connect 10 0 9 0; 1515 #X connect 10 0 9 0;
1410 #X connect 57 0 58 0; 1560 #X connect 57 0 58 0;
1411 #X connect 58 0 111 0; 1561 #X connect 58 0 111 0;
1412 #X connect 60 0 61 0; 1562 #X connect 60 0 61 0;
1413 #X connect 61 0 62 0; 1563 #X connect 61 0 62 0;
1414 #X connect 63 0 61 0; 1564 #X connect 63 0 61 0;
1415 #X connect 66 0 155 0; 1565 #X connect 66 0 154 0;
1416 #X connect 67 0 20 0; 1566 #X connect 67 0 20 0;
1417 #X connect 69 0 74 0; 1567 #X connect 69 0 74 0;
1418 #X connect 70 0 73 0; 1568 #X connect 70 0 73 0;
1419 #X connect 70 0 186 0; 1569 #X connect 70 0 182 0;
1420 #X connect 74 0 70 0; 1570 #X connect 74 0 70 0;
1421 #X connect 75 0 20 0; 1571 #X connect 75 0 20 0;
1422 #X connect 76 0 77 0; 1572 #X connect 76 0 77 0;
1423 #X connect 76 0 181 0; 1573 #X connect 76 0 177 0;
1424 #X connect 78 0 79 0; 1574 #X connect 78 0 79 0;
1425 #X connect 78 0 182 0; 1575 #X connect 78 0 178 0;
1426 #X connect 80 0 78 0; 1576 #X connect 80 0 78 0;
1427 #X connect 80 0 101 0; 1577 #X connect 80 0 101 0;
1428 #X connect 80 0 76 0; 1578 #X connect 80 0 76 0;
1429 #X connect 80 0 99 0; 1579 #X connect 80 0 99 0;
1430 #X connect 80 0 103 0; 1580 #X connect 80 0 103 0;
1431 #X connect 80 0 81 0; 1581 #X connect 80 0 81 0;
1432 #X connect 80 0 105 0; 1582 #X connect 80 0 105 0;
1433 #X connect 80 0 83 0; 1583 #X connect 80 0 83 0;
1434 #X connect 81 0 82 0; 1584 #X connect 81 0 82 0;
1435 #X connect 81 0 183 0; 1585 #X connect 81 0 179 0;
1436 #X connect 83 0 84 0; 1586 #X connect 83 0 84 0;
1437 #X connect 83 0 184 0; 1587 #X connect 83 0 180 0;
1438 #X connect 86 0 87 0; 1588 #X connect 86 0 87 0;
1439 #X connect 87 0 91 0; 1589 #X connect 87 0 91 0;
1440 #X connect 88 0 85 0; 1590 #X connect 88 0 85 0;
1441 #X connect 88 0 90 0; 1591 #X connect 88 0 90 0;
1442 #X connect 89 0 88 0; 1592 #X connect 89 0 88 0;
1465 #X connect 111 0 59 0; 1615 #X connect 111 0 59 0;
1466 #X connect 113 0 114 0; 1616 #X connect 113 0 114 0;
1467 #X connect 114 0 116 0; 1617 #X connect 114 0 116 0;
1468 #X connect 115 0 113 0; 1618 #X connect 115 0 113 0;
1469 #X connect 115 0 112 0; 1619 #X connect 115 0 112 0;
1470 #X connect 117 0 152 0; 1620 #X connect 117 0 151 0;
1471 #X connect 118 0 89 0; 1621 #X connect 118 0 89 0;
1472 #X connect 119 0 122 0; 1622 #X connect 119 0 122 0;
1473 #X connect 120 0 157 0; 1623 #X connect 120 0 156 0;
1474 #X connect 121 0 170 0; 1624 #X connect 121 0 166 0;
1475 #X connect 122 0 115 0; 1625 #X connect 122 0 115 0;
1476 #X connect 124 0 109 0; 1626 #X connect 124 0 109 0;
1477 #X connect 125 0 168 0; 1627 #X connect 125 0 164 0;
1478 #X connect 126 0 171 0; 1628 #X connect 126 0 167 0;
1479 #X connect 127 0 169 0; 1629 #X connect 127 0 165 0;
1480 #X connect 128 0 109 0; 1630 #X connect 128 0 109 0;
1481 #X connect 134 0 48 0; 1631 #X connect 134 0 48 0;
1482 #X connect 134 0 135 0; 1632 #X connect 134 0 135 0;
1483 #X connect 137 0 13 0; 1633 #X connect 137 0 13 0;
1484 #X connect 138 0 15 0; 1634 #X connect 138 0 15 0;
1496 #X connect 149 3 133 0; 1646 #X connect 149 3 133 0;
1497 #X connect 149 4 150 0; 1647 #X connect 149 4 150 0;
1498 #X connect 149 5 136 0; 1648 #X connect 149 5 136 0;
1499 #X connect 151 0 149 0; 1649 #X connect 151 0 149 0;
1500 #X connect 152 0 149 0; 1650 #X connect 152 0 149 0;
1501 #X connect 153 0 149 0; 1651 #X connect 154 0 155 0;
1502 #X connect 155 0 156 0; 1652 #X connect 156 0 157 0;
1503 #X connect 157 0 158 0; 1653 #X connect 158 0 149 0;
1504 #X connect 159 0 149 0; 1654 #X connect 159 0 149 0;
1505 #X connect 160 0 149 0; 1655 #X connect 160 0 149 0;
1506 #X connect 161 0 162 0; 1656 #X connect 161 0 162 0;
1507 #X connect 161 0 185 0;
1508 #X connect 163 0 161 0; 1657 #X connect 163 0 161 0;
1509 #X connect 164 0 149 0; 1658 #X connect 168 0 149 0;
1510 #X connect 165 0 166 0; 1659 #X connect 169 0 149 0;
1511 #X connect 167 0 165 0; 1660 #X connect 170 0 149 0;
1661 #X connect 171 0 149 0;
1512 #X connect 172 0 149 0; 1662 #X connect 172 0 149 0;
1513 #X connect 173 0 149 0; 1663 #X connect 173 0 149 0;
1514 #X connect 174 0 149 0; 1664 #X connect 174 0 149 0;
1515 #X connect 175 0 149 0; 1665 #X connect 175 0 149 0;
1516 #X connect 176 0 149 0; 1666 #X connect 176 0 149 0;
1517 #X connect 177 0 149 0; 1667 #X connect 182 0 183 0;
1518 #X connect 178 0 149 0; 1668 #X connect 184 0 182 0;
1519 #X connect 179 0 149 0; 1669 #X connect 186 0 149 0;
1520 #X connect 180 0 149 0; 1670 #X connect 187 0 149 0;
1521 #X connect 186 0 187 0; 1671 #X connect 188 0 10 0;
1522 #X connect 188 0 186 0; 1672 #X connect 189 0 149 0;
1523 #X connect 190 0 149 0; 1673 #X connect 190 0 194 0;
1524 #X connect 191 0 149 0; 1674 #X connect 191 0 192 0;
1525 #X connect 192 0 120 0; 1675 #X connect 191 0 181 0;
1526 #X connect 192 0 161 0; 1676 #X connect 193 0 191 0;
1527 #X connect 192 1 120 1; 1677 #X connect 195 0 191 0;
1528 #X connect 192 1 165 0; 1678 #X connect 195 0 120 0;
1529 #X connect 193 0 10 0; 1679 #X connect 195 1 161 0;
1530 #X connect 194 0 149 0; 1680 #X connect 195 1 120 1;
1681 #X connect 196 0 149 0;