Home
last modified time | relevance | path

Searched refs:wn4r (Results 1 – 2 of 2) sorted by relevance

/external/fft2d/src/fft2d/fft2d/
Dfftsg.f576 real*8 w(0 : nw - 1), delta, wn4r, wk1r, wk1i, wk3r, wk3i local
582 wn4r = cos(delta * nwh)
584 w(1) = wn4r
604 w(nw1 + 1) = wn4r
1601 real*8 wn4r, csc1, csc3, wk1r, wk1i, wk3r, wk3i local
1626 wn4r = w(1)
1732 wk1r = csc1 * (wd1r + wn4r)
1733 wk1i = csc1 * (wd1i + wn4r)
1734 wk3r = csc3 * (wd3r - wn4r)
1735 wk3i = csc3 * (wd3i - wn4r)
[all …]
Dfftsg.c647 double delta, wn4r, wk1r, wk1i, wk3r, wk3i; in makewt() local
654 wn4r = cos(delta * nwh); in makewt()
656 w[1] = wn4r; in makewt()
676 w[nw1 + 1] = wn4r; in makewt()
1787 double wn4r, csc1, csc3, wk1r, wk1i, wk3r, wk3i, in cftf1st() local
1813 wn4r = w[1]; in cftf1st()
1919 wk1r = csc1 * (wd1r + wn4r); in cftf1st()
1920 wk1i = csc1 * (wd1i + wn4r); in cftf1st()
1921 wk3r = csc3 * (wd3r - wn4r); in cftf1st()
1922 wk3i = csc3 * (wd3i - wn4r); in cftf1st()
[all …]