leto / math--gsl

Perl interface to the GNU Scientific Library — Read more

This URL has Read+Write access

Adding basic FFT example

leto (author)

Sat Oct 11 23:54:20 -0700 2008

math--gsl / examples / fft / forward_real

raw normal view history

9b027261 »	leto	2008-10-11	Adding basic FFT example	1	#!/usr/bin/perl -w
				2
				3	use strict;
				4	use Math::GSL::FFT qw/:all/;
				5	use Math::GSL::Errno qw/:all/;
				6	use Data::Dumper;
				7
				8	my $data = [ (0) x 5, (1) x 22, (0) x 5 ];
				9	my ($status, $fft ) = gsl_fft_real_radix2_transform ($data, 1, 32);
				10	print Dumper $fft;
				11

Pledgie Donations