blob: f0455814e0de38378f885423077de1aadca79968 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
#N canvas 263 0 849 390 10;
#N canvas 0 0 450 300 (subpatch) 0;
#X array phon_curve 31 float 1;
#A 0 84.0263 70.2655 58.8035 49.2594 41.3145 34.7019 29.1992 24.6203
20.8105 17.6404 15.0023 12.8061 10.9765 9.44971 8.17099 7.09068 6.15842
5.31097 4.44516 3.36343 1.71908 -0.748856 -2.90756 -1.44298 2.53035
4.39339 6.70128 12.6629 27.8308 66.0912 162.329;
#X coords 0 120 30 0 200 140 1;
#X restore 36 187 graph;
#N canvas 0 0 450 300 mtx2tablemsg 0;
#X obj 155 57 inlet;
#X obj 220 253 outlet;
#X obj 157 79 list split 3;
#X obj 198 98 t l l;
#X obj 232 141 change;
#X msg 235 164 resize \$1;
#X obj 198 218 list prepend 0;
#X obj 230 119 list length;
#X connect 0 0 2 0;
#X connect 2 1 3 0;
#X connect 3 0 6 0;
#X connect 3 1 7 0;
#X connect 4 0 5 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 4 0;
#X restore 247 230 pd mtx2tablemsg;
#X obj 356 210 loadbang;
#X obj 247 125 mtx_logspace;
#X text 30 331 20;
#X text 70 331 80;
#X text 105 331 340;
#X msg 247 103 20 20000 31;
#X text 144 331 1360;
#X text 186 331 5440;
#X text 226 331 21760;
#X msg 356 230 bounds 0 120 30 0 \, xticks 0 1 3 \, yticks 0 20 1 \,
ylabel 0 0 20 40 60 80 100 120;
#X floatatom 246 48 5 0 0 0 - - -;
#X obj 247 66 t b f f;
#X obj 413 142 - 100;
#X obj 247 186 mtx_+ -100;
#X text 290 47 dial Phon-curve;
#X obj 247 275 s phon_curve;
#X text 482 26 part of iemmatrix;
#X text 469 113 inletA: row/col frequency vector;
#X text 469 131 inletB: phon value;
#X text 470 155 outletA: row/col vector with phone curve at specified
frequencies;
#X text 385 258 note: the "0" phon curve corresponds to the absolute
threshold of hearing;
#X text 44 32 [mtx_phon_curve];
#X obj 247 145 mtx_phon_curve 0;
#X obj 247 165 mtx_powtodb;
#X connect 1 0 17 0;
#X connect 2 0 11 0;
#X connect 3 0 24 0;
#X connect 7 0 3 0;
#X connect 11 0 17 0;
#X connect 12 0 13 0;
#X connect 13 0 7 0;
#X connect 13 1 24 1;
#X connect 13 2 14 0;
#X connect 14 0 15 1;
#X connect 15 0 1 0;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
|
