/*
 * Copyright (c) 1997-1999 Massachusetts Institute of Technology
 * Copyright (c) 2000-2001 Stefan Kral
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */

/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue Mar 25 06:39:53 EST 2003 */


/* fnset1/cheap-mode: VECTGRADE_FULL succeeded. (201 steps) */
.section .rodata
	.balign 64
	chs_hi: .double +1.0, -1.0
	PK500000000PK500000000: .double +0.5000000000000000000000000, +0.5000000000000000000000000
	PK866025403NK866025403: .double +0.8660254037844386467637232, -0.8660254037844386467637232
	PK174138601PK174138601: .double +0.1741386011521359050056608, +0.1741386011521359050056608
	PK575140729PK575140729: .double +0.5751407294740031213683855, +0.5751407294740031213683855
	PK300462606PK300462606: .double +0.3004626062886657744266018, +0.3004626062886657744266018
	PK083333333PK083333333: .double +0.0833333333333333333333333, +0.0833333333333333333333333
	PK156891391PK011599105: .double +0.1568913910515846110468327, +0.0115991056057682907216555
	PK256247671PK300238635: .double +0.2562476715829366009586847, +0.3002386359663326414628846
	PK011599105PK156891391: .double +0.0115991056057682907216555, +0.1568913910515846110468327
	NK503537032PK503537032: .double -0.5035370328637666272468739, +0.5035370328637666272468739
	PK300238635PK256247671: .double +0.3002386359663326414628846, +0.2562476715829366009586847
	NK265966249PK265966249: .double -0.2659662492148372875875211, +0.2659662492148372875875211
	PK075902986PK075902986: .double +0.0759029860371938659831029, +0.0759029860371938659831029
	PK258260390PK258260390: .double +0.2582603903117448614204506, +0.2582603903117448614204506
	PK132983124NK132983124: .double +0.1329831246074186437937605, -0.1329831246074186437937605
	PK387390585PK387390585: .double +0.3873905854676172921306760, +0.3873905854676172921306760
	PK251768516NK251768516: .double +0.2517685164318833136234369, -0.2517685164318833136234369
	PK866025403PK866025403: .double +0.8660254037844386467637232, +0.8660254037844386467637232
	PK113854479PK113854479: .double +0.1138544790557907989746543, +0.1138544790557907989746543
	chs_lo: .double -1.0, +1.0
	NK300238635PK256247671: .double -0.3002386359663326414628846, +0.2562476715829366009586847
	NK011599105PK156891391: .double -0.0115991056057682907216555, +0.1568913910515846110468327
	PK2_000000000PK2_000000000: .double +2.0000000000000000000000000, +2.0000000000000000000000000
	PK1_732050807PK1_732050807: .double +1.7320508075688772935274463, +1.7320508075688772935274463
	NK1_732050807PK1_732050807: .double -1.7320508075688772935274463, +1.7320508075688772935274463

	

.text
	.balign 64
	.globl	fftwi_no_twiddle_13
	.type	fftwi_no_twiddle_13, @function
fftwi_no_twiddle_13:
	/* promise simd cell size = 16 */ 
	subl $16, %esp
	movl 28(%esp), %ecx
	movl 20(%esp), %eax
	movl %esi, 8(%esp)
	movl %edi, 4(%esp)
	movl %ebx, 12(%esp)
	movl %ebp, 0(%esp)
	sall $4, %ecx
	leal (%ecx,%ecx,4), %edx
	leal (%ecx,%ecx,2), %esi
	movapd (%eax,%ecx,8), %xmm1
	movapd (%eax,%ecx,2), %xmm3
	leal (%ecx,%ecx,8), %ebp
	leal (%edx,%ecx,2), %edi
	leal (%ecx,%edx,2), %ebx
	movapd (%eax,%edx), %xmm0
	movapd (%eax,%esi,2), %xmm7
	movapd %xmm1, %xmm2
	movapd %xmm3, %xmm4
	movapd (%eax,%edi), %xmm5
	movapd (%eax,%ebx), %xmm6
	subpd %xmm0, %xmm2
	addpd %xmm0, %xmm1
	movapd %xmm7, %xmm0
	shufpd $9, %xmm2, %xmm2
	movapd %xmm1, fftw_stackcell_4
	subpd %xmm5, %xmm4
	subpd %xmm6, %xmm0
	movapd %xmm4, %xmm1
	addpd %xmm5, %xmm3
	addpd %xmm6, %xmm7
	addpd %xmm0, %xmm1
	movapd %xmm3, %xmm5
	subpd %xmm0, %xmm4
	movapd (%eax,%edx,2), %xmm0
	movl 24(%esp), %edx
	shufpd $9, %xmm1, %xmm1
	subpd %xmm7, %xmm5
	addpd %xmm3, %xmm7
	mulpd chs_hi, %xmm4
	movapd (%eax,%ecx,4), %xmm3
	shufpd $9, %xmm5, %xmm5
	movapd %xmm1, %xmm6
	movapd %xmm7, fftw_stackcell_3
	mulpd PK500000000PK500000000, %xmm7
	movapd %xmm4, fftw_stackcell_0
	mulpd PK500000000PK500000000, %xmm6
	movapd %xmm7, fftw_stackcell_2
	mulpd PK866025403NK866025403, %xmm5
	movapd (%eax,%ebp), %xmm7
	movapd %xmm3, %xmm4
	subpd %xmm0, %xmm3
	movapd %xmm6, fftw_stackcell_5
	movapd (%eax,%esi), %xmm6
	addpd %xmm0, %xmm4
	movapd %xmm5, fftw_stackcell_1
	movapd (%eax,%ecx), %xmm0
	movl 32(%esp), %ecx
	movapd %xmm6, %xmm5
	subpd %xmm7, %xmm6
	sall $4, %ecx
	leal (%ecx,%ecx,4), %ebx
	leal (%ecx,%ecx,8), %edi
	addpd %xmm7, %xmm5
	movapd %xmm0, %xmm7
	addpd %xmm5, %xmm7
	mulpd PK500000000PK500000000, %xmm5
	leal (%edi,%ecx,2), %ebp
	movapd %xmm7, fftw_stackcell_7
	movapd %xmm4, %xmm7
	subpd %xmm5, %xmm0
	movapd (%eax,%esi,4), %xmm5
	leal (%ebx,%ecx,2), %esi
	mulpd PK500000000PK500000000, %xmm7
	movapd %xmm0, fftw_stackcell_6
	movapd %xmm5, %xmm0
	addpd %xmm4, %xmm5
	movapd %xmm2, %xmm4
	addpd fftw_stackcell_5, %xmm2
	subpd %xmm7, %xmm0
	movapd fftw_stackcell_7, %xmm7
	subpd %xmm1, %xmm4
	movapd %xmm6, %xmm1
	addpd %xmm3, %xmm6
	subpd %xmm3, %xmm1
	movapd %xmm4, %xmm3
	mulpd PK174138601PK174138601, %xmm4
	movapd %xmm2, fftw_stackcell_8
	movapd %xmm7, %xmm2
	addpd %xmm5, %xmm7
	shufpd $9, %xmm6, %xmm6
	mulpd PK575140729PK575140729, %xmm3
	subpd %xmm5, %xmm2
	mulpd chs_hi, %xmm1
	shufpd $9, %xmm2, %xmm2
	movapd %xmm2, %xmm5
	mulpd PK575140729PK575140729, %xmm2
	mulpd PK174138601PK174138601, %xmm5
	addpd %xmm2, %xmm4
	movapd fftw_stackcell_4, %xmm2
	subpd %xmm5, %xmm3
	movapd %xmm4, fftw_stackcell_11
	movapd %xmm7, %xmm4
	movapd %xmm2, %xmm5
	mulpd chs_hi, %xmm3
	subpd fftw_stackcell_2, %xmm2
	addpd fftw_stackcell_3, %xmm5
	movapd %xmm3, fftw_stackcell_9
	movapd fftw_stackcell_6, %xmm3
	subpd %xmm5, %xmm7
	addpd %xmm5, %xmm4
	movapd %xmm3, %xmm5
	addpd %xmm0, %xmm3
	mulpd PK300462606PK300462606, %xmm7
	subpd %xmm0, %xmm5
	movapd %xmm4, fftw_stackcell_13
	movapd fftw_stackcell_1, %xmm0
	mulpd PK083333333PK083333333, %xmm4
	shufpd $9, %xmm5, %xmm5
	movapd %xmm7, fftw_stackcell_10
	movapd %xmm4, fftw_stackcell_12
	movapd %xmm5, %xmm7
	addpd %xmm0, %xmm5
	movapd %xmm5, %xmm4
	mulpd PK156891391PK011599105, %xmm5
	subpd %xmm0, %xmm7
	movapd %xmm3, %xmm0
	addpd %xmm2, %xmm3
	mulpd PK256247671PK300238635, %xmm4
	subpd %xmm2, %xmm0
	movapd %xmm5, fftw_stackcell_16
	movapd %xmm7, %xmm5
	mulpd PK011599105PK156891391, %xmm7
	movapd %xmm3, %xmm2
	mulpd NK503537032PK503537032, %xmm3
	mulpd PK300238635PK256247671, %xmm5
	movapd %xmm4, fftw_stackcell_17
	movapd %xmm0, %xmm4
	movapd %xmm7, fftw_stackcell_14
	movapd fftw_stackcell_0, %xmm7
	mulpd NK265966249PK265966249, %xmm0
	mulpd PK075902986PK075902986, %xmm2
	movapd %xmm5, fftw_stackcell_15
	mulpd PK258260390PK258260390, %xmm4
	movapd %xmm7, %xmm5
	addpd %xmm1, %xmm7
	subpd %xmm1, %xmm5
	movapd %xmm5, %xmm1
	mulpd PK132983124NK132983124, %xmm5
	mulpd PK387390585PK387390585, %xmm1
	addpd %xmm5, %xmm4
	movapd %xmm6, %xmm5
	mulpd PK866025403NK866025403, %xmm6
	addpd %xmm0, %xmm1
	movapd %xmm7, %xmm0
	mulpd PK251768516NK251768516, %xmm7
	mulpd PK866025403PK866025403, %xmm5
	mulpd PK113854479PK113854479, %xmm0
	addpd %xmm7, %xmm2
	movapd fftw_stackcell_8, %xmm7
	addpd %xmm3, %xmm0
	movapd %xmm2, fftw_stackcell_20
	movapd %xmm7, %xmm3
	addpd %xmm6, %xmm7
	mulsd chs_lo, %xmm3
	movapd %xmm7, %xmm2
	mulpd PK256247671PK300238635, %xmm7
	mulpd PK156891391PK011599105, %xmm2
	addpd %xmm3, %xmm5
	movapd fftw_stackcell_17, %xmm3
	addpd fftw_stackcell_16, %xmm7
	movapd %xmm5, %xmm6
	mulpd NK300238635PK256247671, %xmm5
	subpd %xmm2, %xmm3
	movapd fftw_stackcell_15, %xmm2
	mulpd NK011599105PK156891391, %xmm6
	addpd fftw_stackcell_14, %xmm5
	mulpd chs_hi, %xmm3
	movapd %xmm7, fftw_stackcell_18
	movapd %xmm1, %xmm7
	subpd %xmm6, %xmm2
	movapd %xmm3, %xmm6
	addpd %xmm0, %xmm7
	movapd %xmm5, fftw_stackcell_19
	mulsd chs_lo, %xmm2
	movapd (%eax), %xmm5
	subpd %xmm1, %xmm0
	movapd %xmm7, fftw_stackcell_25
	movapd %xmm4, %xmm1
	/* simd data load/store barrier */ 
	leal (%ecx,%ecx,2), %eax
	mulpd chs_hi, %xmm0
	subpd %xmm2, %xmm6
	mulpd PK2_000000000PK2_000000000, %xmm1
	addpd %xmm2, %xmm3
	movapd fftw_stackcell_11, %xmm2
	mulpd PK1_732050807PK1_732050807, %xmm6
	movapd %xmm0, fftw_stackcell_22
	movapd %xmm5, %xmm7
	subpd fftw_stackcell_12, %xmm5
	movapd %xmm2, %xmm0
	addpd fftw_stackcell_13, %xmm7
	movapd %xmm6, fftw_stackcell_21
	movapd fftw_stackcell_10, %xmm6
	addpd %xmm3, %xmm0
	mulpd PK2_000000000PK2_000000000, %xmm3
	movapd %xmm0, fftw_stackcell_23
	movapd fftw_stackcell_20, %xmm0
	movapd %xmm7, (%edx)
	movapd %xmm6, %xmm7
	addpd %xmm1, %xmm6
	movapd %xmm5, %xmm1
	subpd %xmm3, %xmm2
	subpd %xmm4, %xmm7
	movapd fftw_stackcell_19, %xmm4
	subpd %xmm0, %xmm1
	mulpd PK2_000000000PK2_000000000, %xmm0
	mulsd chs_lo, %xmm2
	movapd %xmm1, %xmm3
	subpd %xmm7, %xmm1
	addpd %xmm0, %xmm5
	movapd fftw_stackcell_18, %xmm0
	addpd %xmm7, %xmm3
	movapd %xmm4, %xmm7
	movapd %xmm3, fftw_stackcell_24
	subpd %xmm0, %xmm4
	addpd %xmm0, %xmm7
	movapd fftw_stackcell_9, %xmm0
	movapd %xmm4, %xmm3
	mulpd NK1_732050807PK1_732050807, %xmm7
	mulpd PK2_000000000PK2_000000000, %xmm3
	movapd %xmm7, fftw_stackcell_26
	movapd %xmm0, %xmm7
	addpd %xmm3, %xmm0
	movapd %xmm6, %xmm3
	subpd %xmm4, %xmm7
	addpd %xmm5, %xmm3
	subpd %xmm6, %xmm5
	movapd %xmm3, %xmm4
	subpd %xmm0, %xmm3
	movapd %xmm5, %xmm6
	subpd %xmm2, %xmm5
	addpd %xmm0, %xmm4
	movapd fftw_stackcell_26, %xmm0
	movapd %xmm3, (%edx,%eax,4)
	addpd %xmm2, %xmm6
	movapd fftw_stackcell_25, %xmm2
	movapd %xmm5, (%edx,%ecx,8)
	movapd %xmm4, (%edx,%ecx)
	movapd fftw_stackcell_23, %xmm4
	movapd fftw_stackcell_24, %xmm5
	movapd %xmm6, (%edx,%ebx)
	movapd %xmm1, %xmm3
	subpd %xmm0, %xmm1
	movapd %xmm2, %xmm6
	addpd %xmm0, %xmm3
	addpd %xmm4, %xmm6
	movapd %xmm5, %xmm0
	subpd %xmm2, %xmm4
	movapd %xmm3, %xmm2
	mulsd chs_lo, %xmm6
	subpd %xmm7, %xmm5
	addpd %xmm7, %xmm0
	movapd fftw_stackcell_21, %xmm7
	mulpd chs_hi, %xmm4
	addpd %xmm6, %xmm2
	subpd %xmm6, %xmm3
	movapd fftw_stackcell_22, %xmm6
	movapd %xmm2, (%edx,%ecx,2)
	movapd %xmm7, %xmm2
	movapd %xmm3, (%edx,%esi)
	movapd %xmm5, %xmm3
	movl 8(%esp), %esi
	subpd %xmm6, %xmm2
	addpd %xmm7, %xmm6
	movapd %xmm0, %xmm7
	addpd %xmm2, %xmm5
	subpd %xmm6, %xmm7
	addpd %xmm6, %xmm0
	movapd %xmm1, %xmm6
	movapd %xmm5, (%edx,%ebx,2)
	movl 12(%esp), %ebx
	subpd %xmm2, %xmm3
	movapd %xmm7, (%edx,%eax)
	addpd %xmm4, %xmm1
	movapd %xmm0, (%edx,%edi)
	movl 4(%esp), %edi
	subpd %xmm4, %xmm6
	movapd %xmm3, (%edx,%ecx,4)
	movapd %xmm1, (%edx,%ebp)
	movl 0(%esp), %ebp
	addl $16, %esp
	movapd %xmm6, (%edx,%eax,2)
	ret 


.section .rodata

	.globl fftwi_no_twiddle_13_desc
	.balign 32
fftwi_no_twiddle_13_desc:
	/* descr_str_ptr */	.long .LC0
	/* codelet_ptr */	.long fftwi_no_twiddle_13
	/* n */			.long 13
	/* cdir_int */		.long 1
	/* ctype_int */		.long 0
	/* signature */		.long 298
	/* num_twiddles */	.long 0
	/* twiddle_order */	.long 0
.LC0:	.string "fftwi_no_twiddle_13"
