Pretty printing of main.ml.
[Faustine.git] / dsp_files / fft2d.dsp
index 15ba841..3498eba 100644 (file)
@@ -1,5 +1,5 @@
-import ( "fft.lib.dsp" ) ;
-import ( "complex.lib" ) ;
+import ( "mrfaustlib/fft.lib" ) ;
+import ( "mrfaustlib/complex.lib" ) ;
 
 GREY_MAX = 256;
 
 
 GREY_MAX = 256;
 
@@ -39,6 +39,11 @@ output(n, m) = serialize;
 //fft2d(x, y) = matricize(x, y) : output(x, y);
 fft2d(x, y) = normalize(GREY_MAX) : matricize(x, y) : lines_fft(x, y) : matrix_transpose(x, y) : lines_fftc(y, x) : matrix_transpose(y, x) : norm_out(x, y);
 
 //fft2d(x, y) = matricize(x, y) : output(x, y);
 fft2d(x, y) = normalize(GREY_MAX) : matricize(x, y) : lines_fft(x, y) : matrix_transpose(x, y) : lines_fftc(y, x) : matrix_transpose(y, x) : norm_out(x, y);
 
+new_fft2d(x, y) = normalize(GREY_MAX) : vectorize(x) : lines_fft(x, y) : matrix_transpose(x, y) : lines_fftc(y, x) : matrix_transpose(y, x) : norm_out(x, y);
+
 //safer with x=y because tests and zero padding are still to implement
 //safer with x=y because tests and zero padding are still to implement
-process = fft2d(32,32);
+//process = fft2d(32,32);
+process = new_fft2d(32,32);
+
+