From 8f21bdb35a25511e5fb2af38afaf79726c2536a3 Mon Sep 17 00:00:00 2001 From: Franz Zotter Date: Tue, 19 Dec 2006 10:16:47 +0000 Subject: mtx_sfread.pd: zexy list replaced by list length mtx_phon_curve.pd: calculation of phon curve magnitudes at given frequency vectors/matrices svn path=/trunk/externals/iem/iemmatrix/; revision=6967 --- abs/mtx_phon_curve-help.pd | 69 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 69 insertions(+) create mode 100644 abs/mtx_phon_curve-help.pd (limited to 'abs/mtx_phon_curve-help.pd') diff --git a/abs/mtx_phon_curve-help.pd b/abs/mtx_phon_curve-help.pd new file mode 100644 index 0000000..ab92144 --- /dev/null +++ b/abs/mtx_phon_curve-help.pd @@ -0,0 +1,69 @@ +#N canvas 276 123 849 390 10; +#X obj 247 206 mtx_* 0.5; +#N canvas 0 0 450 300 (subpatch) 0; +#X array phon_curve 31 float 1; +#A 0 83.0956 69.3994 57.9927 48.4958 40.591 34.0127 28.5391 23.985 +20.1961 17.0438 14.4208 12.2374 10.4185 8.90086 7.62984 6.55604 5.62926 +4.78645 3.92454 2.8461 1.20451 -1.26109 -3.41784 -1.95161 2.02311 3.88731 +6.19619 12.1587 27.3273 65.5882 161.827; +#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 165 mtx_rmstodb; +#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 connect 0 0 2 0; +#X connect 2 0 19 0; +#X connect 3 0 13 0; +#X connect 4 0 17 0; +#X connect 5 0 26 0; +#X connect 9 0 5 0; +#X connect 13 0 19 0; +#X connect 14 0 15 0; +#X connect 15 0 9 0; +#X connect 15 1 26 1; +#X connect 15 2 16 0; +#X connect 16 0 17 1; +#X connect 17 0 0 0; +#X connect 26 0 4 0; -- cgit v1.2.1