Юкио Сато "Обработка сигналов", Подозреваю ошибку в алгоритме БПФ Опции

[ZhekSooN]

Всем добрый день.
Решил скопировать алгоритм БПФ из книги Юкио Сато "Обработка сигналов" как самый простой и прозрачный из всех мною виданных.
В книге он написан на языке Basic, я же переписал его на Pascal`е. Переписал точно, ошибок вроде не нашел, но.. алгоритм не работает. В тестовой программе на выходе получается бред вместо исходной волны. Может ли кто-нибудь хорошо понимающий в алгоритмах БПФ сказать, где же ошибка в книге и/или у меня?
Прикрепляю страницу из книги и свой исходник

Эскизы прикрепленных изображений

 

Прикрепленные файлы

 FFT.zip ( 929 байт ) Кол-во скачиваний: 44

 

[ivan219]

http://alglib.sources.ru/fasttransforms/

[ZhekSooN]

http://alglib.sources.ru/fasttransforms/

Спасибо, алглибовские сырцы уже смотрел, но в первую очередь инетерсуюсь прозрачными "монолитными" алгоритмами без лишнего мусора в виде кучи функций и заточки под определенный язык.

[bahurin]

Спасибо, алглибовские сырцы уже смотрел, но в первую очередь инетерсуюсь прозрачными "монолитными" алгоритмами без лишнего мусора в виде кучи функций и заточки под определенный язык.

если вам нужно использовать бпф в своем приложении возьмите бибилиотеку там есть БПФ. Если хотите потренироваться, то флаг вам в руки. Когда напишете алгоритм опять таки возьмите указанную библиотеку и сравните быстродействие если ваш алгоритм будет быстрее считайте, что вы добились успехов в написании БПФ.

PS в библиотеке алгоритм кули тьюки по основанию 2. Все у кого есть свои собственные функции БПФ предлагаю сравнить быстродействие с указанной библиотекой

Сообщение отредактировал bahurin - Aug 29 2010, 15:51