diff options
author | Julien Pommier <pommier@pianoteq.com> | 2011-11-20 10:58:07 +0100 |
---|---|---|
committer | Julien Pommier <pommier@pianoteq.com> | 2011-11-20 10:58:07 +0100 |
commit | 836bc4bdd75a5750f1f3ba1c0e69fca6dbfc58ab (patch) | |
tree | 5e0f6bc2f3763637ac93057e9dbc8b550b3e6eb4 /fftpack.c | |
parent | 370d2099e358fb7955a08275822570ee278226f8 (diff) | |
download | pffft-836bc4bdd75a5750f1f3ba1c0e69fca6dbfc58ab.tar.gz |
benchmarks added
Diffstat (limited to 'fftpack.c')
-rw-r--r-- | fftpack.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -76,7 +76,7 @@ static void passfb(integer *nac, integer ido, integer ip, integer l1, integer id c1_offset, c2_offset, ch2_offset; /* Local variables */ - integer i, j, k, l, jc, lc, ik, nt, idj, idl, inc, idp; + integer i, j, k, l, jc, lc, ik, idj, idl, inc, idp; real wai, war; integer ipp2, idij, idlj, idot, ipph; @@ -102,7 +102,6 @@ static void passfb(integer *nac, integer ido, integer ip, integer l1, integer id /* Function Body */ idot = ido / 2; - nt = ip * idl1; ipp2 = ip + 2; ipph = (ip + 1) / 2; idp = ip * ido; |