corrected [mtx_rfft] and [mtx_rifft] memory bugs.

svn path=/trunk/externals/iem/iemmatrix/; revision=10208

2 files changed, 13 insertions, 7 deletions

diff --git a/doc/mtx_rfft-help.pd b/doc/mtx_rfft-help.pd
index 6548a01..5943dc0 100644
--- a/doc/mtx_rfft-help.pd
+++ b/doc/mtx_rfft-help.pd
@@ -13,8 +13,8 @@ has to have 2^k columns \; a N/2+1 columns matrix is the result \;
 #X obj 11 169 mtx_ones;
 #X obj 11 213 mtx_- 1;
 #X obj 49 255 mtx_* 0;
-#X floatatom 172 234 5 0 0 0 - - -;
-#X text 212 232 <-- scroll here to select frequency;
+#X floatatom 140 210 5 0 0 0 - - -;
+#X text 184 208 <-- scroll here to select frequency;
 #X obj 172 255 / 8;
 #X obj 49 306 t a a;
 #X obj 92 306 mtx_print original;
@@ -31,13 +31,14 @@ has to have 2^k columns \; a N/2+1 columns matrix is the result \;
 #X obj 261 438 mtx_rifft;
 #X obj 121 353 mtx_+ 0.5;
 #X obj 49 373 mtx_+ 0.5;
+#X obj 140 231 t b f;
 #X connect 4 0 8 0;
 #X connect 7 0 10 0;
 #X connect 8 0 9 0;
 #X connect 9 0 7 0;
 #X connect 10 0 11 0;
 #X connect 11 0 20 0;
-#X connect 12 0 14 0;
+#X connect 12 0 30 0;
 #X connect 14 0 21 0;
 #X connect 15 0 26 0;
 #X connect 15 1 16 0;
@@ -49,3 +50,5 @@ has to have 2^k columns \; a N/2+1 columns matrix is the result \;
 #X connect 26 1 28 0;
 #X connect 28 0 23 0;
 #X connect 29 0 24 0;
+#X connect 30 0 4 0;
+#X connect 30 1 14 0;
diff --git a/doc/mtx_rifft-help.pd b/doc/mtx_rifft-help.pd
index be8f908..afad9be 100644
--- a/doc/mtx_rifft-help.pd
+++ b/doc/mtx_rifft-help.pd
@@ -8,8 +8,8 @@
 #X obj 11 169 mtx_ones;
 #X obj 11 213 mtx_- 1;
 #X obj 49 255 mtx_* 0;
-#X floatatom 177 234 5 0 0 0 - - -;
-#X obj 177 255 / 8;
+#X floatatom 155 202 5 0 0 0 - - -;
+#X obj 187 255 / 8;
 #X obj 49 278 t a a;
 #X text 266 443 see also:;
 #X text 46 34 real ifft in each matrix row;
@@ -19,7 +19,7 @@ the result \;;
 #X msg 11 147 1 9;
 #X obj 49 307 mtx_cos;
 #X obj 104 307 mtx_sin;
-#X text 217 232 <-- scroll here to select delay;
+#X text 199 203 <-- scroll here to select delay;
 #X obj 49 411 mtx_print rifft;
 #X obj 49 389 mtx_int;
 #X obj 103 255 * -3.14159;
@@ -27,12 +27,13 @@ the result \;;
 #X obj 262 463 mtx_rfft;
 #X obj 49 336 mtx_rifft;
 #X obj 49 362 mtx_+ 0.5;
+#X obj 155 223 t b f;
 #X connect 4 0 15 0;
 #X connect 5 0 7 0;
 #X connect 6 0 5 0;
 #X connect 7 0 8 0;
 #X connect 8 0 11 0;
-#X connect 9 0 10 0;
+#X connect 9 0 26 0;
 #X connect 10 0 21 0;
 #X connect 11 0 16 0;
 #X connect 11 1 17 0;
@@ -43,3 +44,5 @@ the result \;;
 #X connect 21 0 8 1;
 #X connect 24 0 25 0;
 #X connect 25 0 20 0;
+#X connect 26 0 4 0;
+#X connect 26 1 10 0;