Fast Fourier transform: Difference between revisions
Content added Content deleted
m (Added GolfScript example) |
m (un-capitalized 's' in Golfscript) |
||
Line 1,088: | Line 1,088: | ||
</pre> |
</pre> |
||
=={{header| |
=={{header|Golfscript}}== |
||
<lang |
<lang Golfscript>#Cooley-Tukey |
||
{.,.({[\.2%fft\(;2%fft@-1?-1\?-2?:w;.,,{w\?}%[\]zip{{*}*}%]zip.{{+}*}%\{{-}*}%+}{;}if}:fft; |
{.,.({[\.2%fft\(;2%fft@-1?-1\?-2?:w;.,,{w\?}%[\]zip{{*}*}%]zip.{{+}*}%\{{-}*}%+}{;}if}:fft; |