Anonymous user
Fast Fourier transform: Difference between revisions
m
→{{header|REXX}}: changed comment about the pi function result (used as a maximal value for DIGITS). -- ~~~~
m (→{{header|REXX}}: changed the way REXX sets NUMERIC DIGITS (based on "size" of pi). -- ~~~~) |
m (→{{header|REXX}}: changed comment about the pi function result (used as a maximal value for DIGITS). -- ~~~~) |
||
Line 1,102:
<br>This is called zero-padding.
<lang rexx>/*REXX pgm does a fast Fourier transform (FFT) on a set of complex nums.*/
numeric digits length( pi() ) - 1 /*limited by PI function
arg data; if data='' then data='1 1 1 1 0' /*no data? Then use default*/
data=translate(data, 'J', "I") /*allow use of i as well as j */
| |||