~ubuntu-branches/ubuntu/quantal/fftw/quantal

« back to all changes in this revision

Viewing changes to fftw/ftw_5.c

  • Committer: Package Import Robot
  • Author(s): Sylvestre Ledru
  • Date: 2011-11-29 01:48:33 UTC
  • mfrom: (5.1.1 sid)
  • Revision ID: package-import@ubuntu.com-20111129014833-3leawsns2nghyaoj
Tags: 2.1.5-1
* Team upload.
* New upstream release
* Package moved into the Debian Science team (no answer from the previous
  maintainer) and package not maintained.
* Standards-Version updated to version 3.9.2
* Vcs-Browser & Vcs-Svn updated
* Switch to mpi-default-dev (Closes: #571446)
* Get ride of .la files (Closes: #633175)
* Fix lintian warning debhelper-but-no-misc-depends
* Fix lintian warning patch-system-but-direct-changes-in-diff 
* Switch to dpkg-source 3.0 (quilt) format

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/*
2
 
 * Copyright (c) 1997-1999 Massachusetts Institute of Technology
 
2
 * Copyright (c) 1997-1999, 2003 Massachusetts Institute of Technology
3
3
 *
4
4
 * This program is free software; you can redistribute it and/or modify
5
5
 * it under the terms of the GNU General Public License as published by
18
18
 */
19
19
 
20
20
/* This file was automatically generated --- DO NOT EDIT */
21
 
/* Generated on Sun Nov  7 20:44:31 EST 1999 */
22
 
 
23
 
#include <fftw-int.h>
24
 
#include <fftw.h>
25
 
 
26
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 5 */
 
21
/* Generated on Mon Mar 24 02:07:32 EST 2003 */
 
22
 
 
23
#include "fftw-int.h"
 
24
#include "fftw.h"
 
25
 
 
26
/* Generated by: /homee/stevenj/cvs/fftw/gensrc/genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 5 */
27
27
 
28
28
/*
29
29
 * This function contains 40 FP additions, 28 FP multiplications,
30
30
 * (or, 26 additions, 14 multiplications, 14 fused multiply/add),
31
31
 * 26 stack variables, and 20 memory accesses
32
32
 */
33
 
static const fftw_real K250000000 = FFTW_KONST(+0.250000000000000000000000000000000000000000000);
34
 
static const fftw_real K559016994 = FFTW_KONST(+0.559016994374947424102293417182819058860154590);
35
 
static const fftw_real K587785252 = FFTW_KONST(+0.587785252292473129168705954639072768597652438);
36
 
static const fftw_real K951056516 = FFTW_KONST(+0.951056516295153572116439333379382143405698634);
 
33
static const fftw_real K250000000 =
 
34
FFTW_KONST(+0.250000000000000000000000000000000000000000000);
 
35
static const fftw_real K559016994 =
 
36
FFTW_KONST(+0.559016994374947424102293417182819058860154590);
 
37
static const fftw_real K587785252 =
 
38
FFTW_KONST(+0.587785252292473129168705954639072768597652438);
 
39
static const fftw_real K951056516 =
 
40
FFTW_KONST(+0.951056516295153572116439333379382143405698634);
37
41
 
38
42
/*
39
43
 * Generator Id's : 
40
 
 * $Id: exprdag.ml,v 1.41 1999/05/26 15:44:14 fftw Exp $
41
 
 * $Id: fft.ml,v 1.43 1999/05/17 19:44:18 fftw Exp $
42
 
 * $Id: to_c.ml,v 1.25 1999/10/26 21:41:32 stevenj Exp $
 
44
 * $Id: exprdag.ml,v 1.43 2003/03/16 23:43:46 stevenj Exp $
 
45
 * $Id: fft.ml,v 1.44 2003/03/16 23:43:46 stevenj Exp $
 
46
 * $Id: to_c.ml,v 1.26 2003/03/16 23:43:46 stevenj Exp $
43
47
 */
44
48
 
45
 
void fftw_twiddle_5(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
 
49
void fftw_twiddle_5(fftw_complex *A, const fftw_complex *W, int iostride,
 
50
                    int m, int dist)
46
51
{
47
52
     int i;
48
53
     fftw_complex *inout;
179
184
     }
180
185
}
181
186
 
182
 
static const int twiddle_order[] =
183
 
{1, 2, 3, 4};
184
 
fftw_codelet_desc fftw_twiddle_5_desc =
185
 
{
 
187
static const int twiddle_order[] = { 1, 2, 3, 4 };
 
188
fftw_codelet_desc fftw_twiddle_5_desc = {
186
189
     "fftw_twiddle_5",
187
190
     (void (*)()) fftw_twiddle_5,
188
191
     5,