Skip to content
This repository
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

executable file 12 lines (8 sloc) 0.242 kb
1 2 3 4 5 6 7 8 9 10 11
#!/usr/bin/perl -w

use strict;
use Math::GSL::FFT qw/:all/;
use Math::GSL::Errno qw/:all/;
use Data::Dumper;

my $data = [ (0) x 5, (1) x 22, (0) x 5 ];
my ($status, $fft ) = gsl_fft_real_radix2_transform ($data, 1, 32);
print Dumper $fft;

Something went wrong with that request. Please try again.