2
* Copyright (c) 2003, 2006 Matteo Frigo
3
* Copyright (c) 2003, 2006 Massachusetts Institute of Technology
5
* This program is free software; you can redistribute it and/or modify
6
* it under the terms of the GNU General Public License as published by
7
* the Free Software Foundation; either version 2 of the License, or
8
* (at your option) any later version.
10
* This program is distributed in the hope that it will be useful,
11
* but WITHOUT ANY WARRANTY; without even the implied warranty of
12
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13
* GNU General Public License for more details.
15
* You should have received a copy of the GNU General Public License
16
* along with this program; if not, write to the Free Software
17
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21
/* This file was automatically generated --- DO NOT EDIT */
22
/* Generated on Sat Jul 1 22:50:01 EDT 2006 */
28
/* cheap-mode: VECTGRADE_FULL succeeded. (136 steps) */
29
/* Generated by: ../../../genfft-k7/gen_twiddle -no-randomized-cse -dif -n 8 -name f1k7_8 */
33
* $Id: algsimp.ml,v 1.4 2006-01-05 03:04:27 stevenj Exp $
34
* $Id: fft.ml,v 1.4 2006-01-05 03:04:27 stevenj Exp $
35
* $Id: gen_twiddle.ml,v 1.14 2005-12-24 21:08:49 athena Exp $
38
/* The following asm code is Copyright (c) 2000-2001 Stefan Kral */
41
chs_lo: .long 0x80000000, 0x00000000
42
KP707106781KP707106781: .float +0.707106781186547524400844362104849039284835938, +0.707106781186547524400844362104849039284835938
43
chs_hi: .long 0x00000000, 0x80000000
63
/* promise simd cell size = 8 */
64
movq (%ecx,%edx,4), %mm0
66
leal (%edx,%edx,2), %edi
67
movq (%ecx,%edx,2), %mm4
68
movq (%ecx,%edi,2), %mm3
69
leal (%edi,%edx,4), %ebp
70
movq (%ecx,%edi), %mm6
73
leal (%edx,%edx,4), %edi
75
movq (%ecx,%ebp), %mm7
76
leal (%edx,%edx,2), %ebp
84
movq (%ecx,%edi), %mm2
85
leal (%ebp,%edx,4), %edi
88
movq (%ecx,%edx), %mm4
111
pfmul KP707106781KP707106781, %mm2
118
pfmul KP707106781KP707106781, %mm4
162
/* simd data load/store barrier */
163
movq %mm4, (%ecx,%ebp)
167
movq %mm6, (%ecx,%edi)
169
movq %mm2, (%ecx,%edx)
179
movq %mm0, (%ecx,%edx,2)
180
movq %mm1, (%ecx,%ebp,2)
181
leal (%edx,%edx,4), %ebp
183
movq %mm3, (%ecx,%ebp)
185
movq %mm6, (%ecx,%edx,4)
213
.long fftwf_kdft_ct_k7_mgenus
224
.globl fftwf_codelet_f1k7_8
225
fftwf_codelet_f1k7_8:
232
call fftwf_kdft_dif_register