Subversion Repositories shark

Compare Revisions

Ignore whitespace Rev 106 → Rev 107

/shark/trunk/ports/fftw/include/conffftw.h
0,0 → 1,142
/* -*- C -*- */
/*
* Copyright (c) 1997-1999 Massachusetts Institute of Technology
*
* 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
*
*/
 
/* fftw.h -- system-wide definitions */
/* $Id: conffftw.h,v 1.1 2003-03-24 11:14:54 pj Exp $ */
 
/* configuration options (guessed by configure) */
 
/* Define to empty if the keyword does not work. */
/* #undef const */
 
/* Define if you have the gettimeofday function. */
#undef HAVE_GETTIMEOFDAY
 
/* Define if you have the BSDgettimeofday function. */
#undef HAVE_BSDGETTIMEOFDAY
 
/* Define if you have the <sys/time.h> header file. */
#undef HAVE_SYS_TIME_H
 
/* Define if you have the <unistd.h> header file. */
#undef HAVE_UNISTD_H
 
/* Define if you have the <getopt.h> header file. */
#undef HAVE_GETOPT_H
 
/* Define if you have the <malloc.h> header file */
#undef HAVE_MALLOC_H
 
/* Define if you have gethrtime() a la Solaris 2 */
#undef HAVE_GETHRTIME
 
/* Define if you have getopt() */
#undef HAVE_GETOPT
 
/* Define if you have getopt_long() */
#undef HAVE_GETOPT_LONG
 
/* Define if you have isnan() */
#undef HAVE_ISNAN
 
/* Define for enabling the high resolution Pentium timer */
#undef FFTW_ENABLE_PENTIUM_TIMER
#define _HARTIK
 
/*
* When using FFTW_ENABLE_PENTIUM_TIMER, set FFTW_CYCLES_PER_SEC
* to your real CPU clock speed!
*/
/* This is for 200 MHz */
#define FFTW_CYCLES_PER_SEC 133000000L
 
/*
* Define to enable a gcc/x86 specific hack that aligns
* the stack to an 8-byte boundary
*/
/* #undef FFTW_ENABLE_I386_HACKS */
 
/* Define to enable extra runtime checks for debugging. */
/* #undef FFTW_DEBUG */
 
/*
* Define to enable extra runtime checks for the alignment of variables
* in the codelets (causes coredump for misaligned double on x86).
*/
/* #undef FFTW_DEBUG_ALIGNMENT */
 
#define FFTW_VERSION "2.1.2"
 
/* Use Win32 high-resolution timer */
#if defined(__WIN32__) || defined(WIN32) || defined(_WINDOWS)
#define HAVE_WIN32_TIMER
#define HAVE_WIN32
#endif
 
/* Use MacOS Time Manager timer */
#if defined(MAC) || defined(macintosh)
#define HAVE_MAC_TIMER
#define HAVE_MACOS
 
/* Define to use nanosecond timer on PCI PowerMacs: */
/* #undef HAVE_MAC_PCI_TIMER */
#endif
 
/* define if you have alloca.h: */
/* #undef HAVE_ALLOCA_H */
 
/* define if you have the alloca function: */
/* #undef HAVE_ALLOCA */
 
/************************** threads configuration ************************/
 
/* The following preprocessor symbols select which threads library
to use when compiling the FFTW threads parallel libraries: */
 
/* #undef FFTW_USING_SOLARIS_THREADS */
/* #undef FFTW_USING_POSIX_THREADS */
/* #undef FFTW_USING_BEOS_THREADS */
/* #undef FFTW_USING_MACH_THREADS */
 
/* #undef HAVE_MACH_CTHREADS_H */
/* #undef HAVE_CTHREADS_H */
/* #undef HAVE_CTHREAD_H */
 
#ifdef HAVE_WIN32
#define FFTW_USING_WIN32_THREADS
#endif
 
#ifdef HAVE_MACOS
#define FFTW_USING_MACOS_THREADS
#endif
 
/*********************** fortran wrapper configuration *********************/
 
/* These symbols select how to mangle function names so that they will
be recognized by the linker. If none of them are defined, then
Fortran wrappers will not be compiled. */
 
/* #undef FFTW_FORTRANIZE_LOWERCASE */
/* #undef FFTW_FORTRANIZE_LOWERCASE_UNDERSCORE */
/* #undef FFTW_FORTRANIZE_UPPERCASE */
/* #undef FFTW_FORTRANIZE_UPPERCASE_UNDERSCORE */
 
/* define the following if names with an underscore get an extra one: */
/* #undef FFTW_FORTRANIZE_EXTRA_UNDERSCORE */
/shark/trunk/ports/fftw/include/fftw-int.h
0,0 → 1,489
/*
* Copyright (c) 1997-1999 Massachusetts Institute of Technology
*
* 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
*
*/
 
/* fftw.h -- system-wide definitions */
/* $Id: fftw-int.h,v 1.1 2003-03-24 11:14:54 pj Exp $ */
 
#ifndef FFTW_INT_H
#define FFTW_INT_H
#include <conffftw.h>
#include <fftw.h>
 
#ifdef __cplusplus
extern "C" {
#else
#endif /* __cplusplus */
 
/****************************************************************************/
/* Private Functions */
/****************************************************************************/
 
extern fftw_twiddle *fftw_create_twiddle(int n, const fftw_codelet_desc *d);
extern void fftw_destroy_twiddle(fftw_twiddle *tw);
 
extern void fftw_strided_copy(int, fftw_complex *, int, fftw_complex *);
extern void fftw_executor_simple(int, const fftw_complex *, fftw_complex *,
fftw_plan_node *, int, int);
 
extern fftwnd_plan fftwnd_create_plan_aux(int rank, const int *n,
fftw_direction dir, int flags);
extern fftw_plan *fftwnd_new_plan_array(int rank);
extern fftw_plan *fftwnd_create_plans_generic(fftw_plan *plans,
int rank, const int *n,
fftw_direction dir, int flags);
extern fftw_plan *fftwnd_create_plans_specific(fftw_plan *plans,
int rank, const int *n,
const int *n_after,
fftw_direction dir, int flags,
fftw_complex *in, int istride,
fftw_complex *out, int ostride);
extern int fftwnd_work_size(int rank, const int *n, int flags, int ncopies);
 
extern void fftwnd_aux(fftwnd_plan p, int cur_dim,
fftw_complex *in, int istride,
fftw_complex *out, int ostride,
fftw_complex *work);
extern void fftwnd_aux_howmany(fftwnd_plan p, int cur_dim,
int howmany,
fftw_complex *in, int istride, int idist,
fftw_complex *out, int ostride, int odist,
fftw_complex *work);
 
/* wisdom prototypes */
enum fftw_wisdom_category {
FFTW_WISDOM, RFFTW_WISDOM
};
 
extern int fftw_wisdom_lookup(int n, int flags, fftw_direction dir,
enum fftw_wisdom_category category,
int istride, int ostride,
enum fftw_node_type *type,
int *signature, int replace_p);
extern void fftw_wisdom_add(int n, int flags, fftw_direction dir,
enum fftw_wisdom_category cat,
int istride, int ostride,
enum fftw_node_type type,
int signature);
 
/* Private planner functions: */
extern double fftw_estimate_node(fftw_plan_node *p);
extern fftw_plan_node *fftw_make_node_notw(int size,
const fftw_codelet_desc *config);
extern fftw_plan_node *fftw_make_node_real2hc(int size,
const fftw_codelet_desc *config);
extern fftw_plan_node *fftw_make_node_hc2real(int size,
const fftw_codelet_desc *config);
extern fftw_plan_node *fftw_make_node_twiddle(int n,
const fftw_codelet_desc *config,
fftw_plan_node *recurse,
int flags);
extern fftw_plan_node *fftw_make_node_hc2hc(int n,
fftw_direction dir,
const fftw_codelet_desc *config,
fftw_plan_node *recurse,
int flags);
extern fftw_plan_node *fftw_make_node_generic(int n, int size,
fftw_generic_codelet *codelet,
fftw_plan_node *recurse,
int flags);
extern fftw_plan_node *fftw_make_node_rgeneric(int n, int size,
fftw_direction dir,
fftw_rgeneric_codelet * codelet,
fftw_plan_node *recurse,
int flags);
extern int fftw_factor(int n);
extern fftw_plan_node *fftw_make_node(void);
extern fftw_plan fftw_make_plan(int n, fftw_direction dir,
fftw_plan_node *root, int flags,
enum fftw_node_type wisdom_type,
int wisdom_signature);
extern void fftw_use_plan(fftw_plan p);
extern void fftw_use_node(fftw_plan_node *p);
extern void fftw_destroy_plan_internal(fftw_plan p);
extern fftw_plan fftw_pick_better(fftw_plan p1, fftw_plan p2);
extern fftw_plan fftw_lookup(fftw_plan *table, int n, int flags);
extern void fftw_insert(fftw_plan *table, fftw_plan this_plan, int n);
extern void fftw_make_empty_table(fftw_plan *table);
extern void fftw_destroy_table(fftw_plan *table);
extern void fftw_complete_twiddle(fftw_plan_node *p, int n);
 
extern fftw_plan_node *fftw_make_node_rader(int n, int size,
fftw_direction dir,
fftw_plan_node *recurse,
int flags);
extern fftw_rader_data *fftw_rader_top;
 
/****************************************************************************/
/* Floating Point Types */
/****************************************************************************/
 
/*
* We use these definitions to make it easier for people to change
* FFTW to use long double and similar types. You shouldn't have to
* change this just to use float or double.
*/
 
/*
* Change this if your floating-point constants need to be expressed
* in a special way. For example, if fftw_real is long double, you
* will need to append L to your fp constants to make them of the
* same precision. Do this by changing "x" below to "x##L".
*/
#define FFTW_KONST(x) ((fftw_real) x)
 
#define FFTW_TRIG_SIN sin
#define FFTW_TRIG_COS cos
typedef double FFTW_TRIG_REAL; /* the argument type for sin and cos */
 
#define FFTW_K2PI FFTW_KONST(6.2831853071795864769252867665590057683943388)
 
/****************************************************************************/
/* gcc/x86 hacks */
/****************************************************************************/
 
/*
* gcc 2.[78].x and x86 specific hacks. These macros align the stack
* pointer so that the double precision temporary variables in the
* codelets will be aligned to a multiple of 8 bytes (*way* faster on
* pentium and pentiumpro)
*/
#ifdef __GNUC__
#ifdef __i386__
#ifdef FFTW_ENABLE_I386_HACKS
#ifndef FFTW_ENABLE_FLOAT
#define FFTW_USING_I386_HACKS
#define HACK_ALIGN_STACK_EVEN() { \
if ((((long) (__builtin_alloca(0))) & 0x7)) __builtin_alloca(4); \
}
 
#define HACK_ALIGN_STACK_ODD() { \
if (!(((long) (__builtin_alloca(0))) & 0x7)) __builtin_alloca(4); \
}
 
#ifdef FFTW_DEBUG_ALIGNMENT
#define ASSERT_ALIGNED_DOUBLE() { \
double __foo; \
if ((((long) &__foo) & 0x7)) abort(); \
}
#endif
 
#endif
#endif
#endif
#endif
 
#ifndef HACK_ALIGN_STACK_EVEN
#define HACK_ALIGN_STACK_EVEN()
#endif
#ifndef HACK_ALIGN_STACK_ODD
#define HACK_ALIGN_STACK_ODD()
#endif
#ifndef ASSERT_ALIGNED_DOUBLE
#define ASSERT_ALIGNED_DOUBLE()
#endif
 
/****************************************************************************/
/* Timers */
/****************************************************************************/
 
/*
* Here, you can use all the nice timers available in your machine.
*/
 
/*
*
Things you should define to include your own clock:
 
fftw_time -- the data type used to store a time
 
extern fftw_time fftw_get_time(void);
-- a function returning the current time. (We have
implemented this as a macro in most cases.)
 
extern fftw_time fftw_time_diff(fftw_time t1, fftw_time t2);
-- returns the time difference (t1 - t2).
If t1 < t2, it may simply return zero (although this
is not required). (We have implemented this as a macro
in most cases.)
 
extern double fftw_time_to_sec(fftw_time t);
-- returns the time t expressed in seconds, as a double.
(Implemented as a macro in most cases.)
 
FFTW_TIME_MIN -- a double-precision macro holding the minimum
time interval (in seconds) for accurate time measurements.
This should probably be at least 100 times the precision of
your clock (we use even longer intervals, to be conservative).
This will determine how long the planner takes to measure
the speeds of different possible plans.
 
Bracket all of your definitions with an appropriate #ifdef so that
they will be enabled on your machine. If you do add your own
high-precision timer code, let us know (at fftw@theory.lcs.mit.edu).
 
Only declarations should go in this file. Any function definitions
that you need should go into timer.c.
*/
 
/*
* define a symbol so that we know that we have the fftw_time_diff
* function/macro (it did not exist prior to FFTW 1.2)
*/
#define FFTW_HAS_TIME_DIFF
 
/**********************************************
* SOLARIS
**********************************************/
#if defined(HAVE_GETHRTIME)
 
/* we use the nanosecond virtual timer */
#ifdef HAVE_SYS_TIME_H
#include <sys/time.h>
#endif
 
typedef hrtime_t fftw_time;
 
#define fftw_get_time() gethrtime()
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) ((double) t / 1.0e9)
 
/*
* a measurement is valid if it runs for at least
* FFTW_TIME_MIN seconds.
*/
#define FFTW_TIME_MIN (1.0e-4) /* for Solaris nanosecond timer */
#define FFTW_TIME_REPEAT 8
 
/**********************************************
* Pentium time stamp counter
**********************************************/
#elif defined(__GNUC__) && defined(__i386__) && defined(FFTW_ENABLE_PENTIUM_TIMER)
 
/*
* Use internal Pentium register (time stamp counter). Resolution
* is 1/FFTW_CYCLES_PER_SEC seconds (e.g. 5 ns for Pentium 200 MHz).
* (This code was contributed by Wolfgang Reimer)
*/
 
#ifndef FFTW_CYCLES_PER_SEC
#error "Must define FFTW_CYCLES_PER_SEC in fftw/config.h to use the Pentium cycle counter"
#endif
 
typedef unsigned long long fftw_time;
 
static __inline__ fftw_time read_tsc()
{
struct {
long unsigned lo, hi;
} counter;
long unsigned sav_eax, sav_edx;
__asm__("movl %%eax,%0":"=m"(sav_eax));
__asm__("movl %%edx,%0":"=m"(sav_edx));
__asm__("rdtsc");
__asm__("movl %%eax,%0":"=m"(counter.lo));
__asm__("movl %%edx,%0":"=m"(counter.hi));
__asm__("movl %0,%%eax": : "m"(sav_eax):"eax");
__asm__("movl %0,%%edx": : "m"(sav_edx):"edx");
return *(fftw_time *) & counter;
}
 
#define fftw_get_time() read_tsc()
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) (((double) (t)) / FFTW_CYCLES_PER_SEC)
#define FFTW_TIME_MIN (1.0e-4) /* for Pentium TSC register */
 
/************* generic systems having gettimeofday ************/
#elif defined(HAVE_GETTIMEOFDAY) || defined(HAVE_BSDGETTIMEOFDAY)
#ifdef HAVE_SYS_TIME_H
#include <sys/time.h>
#endif
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#define FFTW_USE_GETTIMEOFDAY
 
typedef struct timeval fftw_time;
 
extern fftw_time fftw_gettimeofday_get_time(void);
extern fftw_time fftw_gettimeofday_time_diff(fftw_time t1, fftw_time t2);
#define fftw_get_time() fftw_gettimeofday_get_time()
#define fftw_time_diff(t1, t2) fftw_gettimeofday_time_diff(t1, t2)
#define fftw_time_to_sec(t) ((double)(t).tv_sec + (double)(t).tv_usec * 1.0E-6)
 
#ifndef FFTW_TIME_MIN
/* this should be fine on any system claiming a microsecond timer */
#define FFTW_TIME_MIN (1.0e-2)
#endif
 
/**********************************************
* MACINTOSH
**********************************************/
#elif defined(HAVE_MAC_TIMER)
 
/*
* By default, use the microsecond-timer in the Mac Time Manager.
* Alternatively, by changing the following #if 1 to #if 0, you
* can use the nanosecond timer available *only* on PCI PowerMacs.
*/
#ifndef HAVE_MAC_PCI_TIMER /* use time manager */
 
/*
* Use Macintosh Time Manager routines (maximum resolution is about 20
* microseconds).
*/
typedef struct fftw_time_struct {
unsigned long hi, lo;
} fftw_time;
 
extern fftw_time get_Mac_microseconds(void);
 
#define fftw_get_time() get_Mac_microseconds()
 
/* define as a function instead of a macro: */
extern fftw_time fftw_time_diff(fftw_time t1, fftw_time t2);
 
#define fftw_time_to_sec(t) ((t).lo * 1.0e-6 + 4294967295.0e-6 * (t).hi)
 
/* very conservative, since timer should be accurate to 20e-6: */
/* (although this seems not to be the case in practice) */
#define FFTW_TIME_MIN (5.0e-2) /* for MacOS Time Manager timer */
 
#else /* use nanosecond timer */
 
/* Use the nanosecond timer available on PCI PowerMacs. */
 
#include <DriverServices.h>
 
typedef AbsoluteTime fftw_time;
#define fftw_get_time() UpTime()
#define fftw_time_diff(t1,t2) SubAbsoluteFromAbsolute(t1,t2)
#define fftw_time_to_sec(t) (AbsoluteToNanoseconds(t).lo * 1.0e-9)
 
/* Extremely conservative minimum time: */
/* for MacOS PCI PowerMac nanosecond timer */
#define FFTW_TIME_MIN (5.0e-3)
 
#endif /* use nanosecond timer */
 
/**********************************************
* WINDOWS
**********************************************/
#elif defined(HAVE_WIN32_TIMER)
 
#include <time.h>
 
typedef unsigned long fftw_time;
extern unsigned long GetPerfTime(void);
extern double GetPerfSec(double ticks);
 
#define fftw_get_time() GetPerfTime()
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) GetPerfSec(t)
 
#define FFTW_TIME_MIN (5.0e-2) /* for Win32 timer */
 
/**********************************************
* CRAY
**********************************************/
#elif defined(_CRAYMPP) /* Cray MPP system */
 
double SECONDR(void); /*
* I think you have to link with -lsci to
* get this
*/
 
typedef double fftw_time;
#define fftw_get_time() SECONDR()
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) (t)
 
#define FFTW_TIME_MIN (1.0e-1) /* for Cray MPP SECONDR timer */
 
 
 
/**********************************************
* HARTIK
**********************************************/
#elif defined(_HARTIK) /* Hartik RT system */
 
#include <kernel/kern.h>
 
typedef TIME fftw_time;
 
#define fftw_get_time() sys_gettime(NULL)
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) ((double) t / 1.0e6)
 
/*
* a measurement is valid if it runs for at least
* FFTW_TIME_MIN seconds.
*/
#define FFTW_TIME_MIN (1.0e-6)
#define FFTW_TIME_REPEAT 8
 
/**********************************************
* VANILLA UNIX/ISO C SYSTEMS
**********************************************/
/* last resort: use good old Unix clock() */
#else
 
#include <time.h>
 
typedef clock_t fftw_time;
 
#ifndef CLOCKS_PER_SEC
#ifdef sun
/* stupid sunos4 prototypes */
#define CLOCKS_PER_SEC 1000000
extern long clock(void);
#else /* not sun, we don't know CLOCKS_PER_SEC */
#error Please define CLOCKS_PER_SEC
#endif
#endif
 
#define fftw_get_time() clock()
#define fftw_time_diff(t1,t2) ((t1) - (t2))
#define fftw_time_to_sec(t) (((double) (t)) / CLOCKS_PER_SEC)
 
/*
* ***VERY*** conservative constant: this says that a
* measurement must run for 200ms in order to be valid.
* You had better check the manual of your machine
* to discover if it can do better than this
*/
#define FFTW_TIME_MIN (2.0e-1) /* for default clock() timer */
 
#endif /* UNIX clock() */
 
/* take FFTW_TIME_REPEAT measurements... */
#ifndef FFTW_TIME_REPEAT
#define FFTW_TIME_REPEAT 4
#endif
 
/* but do not run for more than TIME_LIMIT seconds while measuring one FFT */
#ifndef FFTW_TIME_LIMIT
#define FFTW_TIME_LIMIT 2.0
#endif
 
#ifdef __cplusplus
} /* extern "C" */
 
#endif /* __cplusplus */
 
#endif /* FFTW_INT_H */
/shark/trunk/ports/fftw/include/f77_func.h
0,0 → 1,61
/*
* Copyright (c) 1997-1999 Massachusetts Institute of Technology
*
* 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
*
*/
 
#ifndef F77_FUNC_H
#define F77_FUNC_H
 
#include <ports/fftw-int.h>
 
/* Define a macro to mangle function names so that they can be
recognized by the Fortran linker. Specifically, F77_FUNC_
is designed to mangle identifiers containing an underscore. */
 
#ifdef FFTW_FORTRANIZE_LOWERCASE
# ifdef FFTW_FORTRANIZE_EXTRA_UNDERSCORE
# define F77_FUNC_(x,X) x ## _
# else
# define F77_FUNC_(x,X) x
# endif
#endif
 
#ifdef FFTW_FORTRANIZE_LOWERCASE_UNDERSCORE
# ifdef FFTW_FORTRANIZE_EXTRA_UNDERSCORE
# define F77_FUNC_(x,X) x ## __
# else
# define F77_FUNC_(x,X) x ## _
# endif
#endif
 
#ifdef FFTW_FORTRANIZE_UPPERCASE
# ifdef FFTW_FORTRANIZE_EXTRA_UNDERSCORE
# define F77_FUNC_(x,X) X ## _
# else
# define F77_FUNC_(x,X) X
# endif
#endif
 
#ifdef FFTW_FORTRANIZE_UPPERCASE_UNDERSCORE
# ifdef FFTW_FORTRANIZE_EXTRA_UNDERSCORE
# define F77_FUNC_(x,X) X ## __
# else
# define F77_FUNC_(x,X) X ## _
# endif
#endif
 
#endif /* F77_FUNC_H */
/shark/trunk/ports/fftw/include/fftw.h
0,0 → 1,413
/* -*- C -*- */
/*
* Copyright (c) 1997-1999 Massachusetts Institute of Technology
*
* 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
*
*/
 
/* fftw.h -- system-wide definitions */
/* $Id: fftw.h,v 1.1 2003-03-24 11:14:55 pj Exp $ */
 
#ifndef FFTW_H
#define FFTW_H
 
#include <stdlib.h>
//#include <stdio.h>
//#include "halsa.h"
 
#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */
 
/* Define for using single precision */
/*
* If you can, use configure --enable-float instead of changing this
* flag directly
*/
/* #undef FFTW_ENABLE_FLOAT */
 
/* our real numbers */
#ifdef FFTW_ENABLE_FLOAT
typedef float fftw_real;
#else
typedef double fftw_real;
#endif
 
/*********************************************
* Complex numbers and operations
*********************************************/
typedef struct {
fftw_real re, im;
} fftw_complex;
 
#define c_re(c) ((c).re)
#define c_im(c) ((c).im)
 
typedef enum {
FFTW_FORWARD = -1, FFTW_BACKWARD = 1
} fftw_direction;
 
/* backward compatibility with FFTW-1.3 */
typedef fftw_complex FFTW_COMPLEX;
typedef fftw_real FFTW_REAL;
 
#ifndef FFTW_1_0_COMPATIBILITY
#define FFTW_1_0_COMPATIBILITY 0
#endif
 
#if FFTW_1_0_COMPATIBILITY
/* backward compatibility with FFTW-1.0 */
#define REAL fftw_real
#define COMPLEX fftw_complex
#endif
 
/*********************************************
* Success or failure status
*********************************************/
 
typedef enum {
FFTW_SUCCESS = 0, FFTW_FAILURE = -1
} fftw_status;
 
/*********************************************
* Codelets
*********************************************/
typedef void (fftw_notw_codelet)
(const fftw_complex *, fftw_complex *, int, int);
typedef void (fftw_twiddle_codelet)
(fftw_complex *, const fftw_complex *, int,
int, int);
typedef void (fftw_generic_codelet)
(fftw_complex *, const fftw_complex *, int,
int, int, int);
typedef void (fftw_real2hc_codelet)
(const fftw_real *, fftw_real *, fftw_real *,
int, int, int);
typedef void (fftw_hc2real_codelet)
(const fftw_real *, const fftw_real *,
fftw_real *, int, int, int);
typedef void (fftw_hc2hc_codelet)
(fftw_real *, const fftw_complex *,
int, int, int);
typedef void (fftw_rgeneric_codelet)
(fftw_real *, const fftw_complex *, int,
int, int, int);
 
/*********************************************
* Configurations
*********************************************/
/*
* A configuration is a database of all known codelets
*/
 
enum fftw_node_type {
FFTW_NOTW, FFTW_TWIDDLE, FFTW_GENERIC, FFTW_RADER,
FFTW_REAL2HC, FFTW_HC2REAL, FFTW_HC2HC, FFTW_RGENERIC
};
 
/* description of a codelet */
typedef struct {
const char *name; /* name of the codelet */
void (*codelet) (); /* pointer to the codelet itself */
int size; /* size of the codelet */
fftw_direction dir; /* direction */
enum fftw_node_type type; /* TWIDDLE or NO_TWIDDLE */
int signature; /* unique id */
int ntwiddle; /* number of twiddle factors */
const int *twiddle_order; /*
* array that determines the order
* in which the codelet expects
* the twiddle factors
*/
} fftw_codelet_desc;
 
/* On Win32, you need to do funny things to access global variables
in shared libraries. Thanks to Andrew Sterian for this hack. */
#if defined(__WIN32__) || defined(WIN32) || defined(_WINDOWS)
# if defined(BUILD_FFTW_DLL)
# define DL_IMPORT(type) __declspec(dllexport) type
# elif defined(USE_FFTW_DLL)
# define DL_IMPORT(type) __declspec(dllimport) type
# else
# define DL_IMPORT(type) type
# endif
#else
# define DL_IMPORT(type) type
#endif
 
extern DL_IMPORT(const char *) fftw_version;
 
/*****************************
* Plans
*****************************/
/*
* A plan is a sequence of reductions to compute a FFT of
* a given size. At each step, the FFT algorithm can:
*
* 1) apply a notw codelet, or
* 2) recurse and apply a twiddle codelet, or
* 3) apply the generic codelet.
*/
 
/* structure that contains twiddle factors */
typedef struct fftw_twiddle_struct {
int n;
const fftw_codelet_desc *cdesc;
fftw_complex *twarray;
struct fftw_twiddle_struct *next;
int refcnt;
} fftw_twiddle;
 
typedef struct fftw_rader_data_struct {
struct fftw_plan_struct *plan;
fftw_complex *omega;
int g, ginv;
int p, flags, refcount;
struct fftw_rader_data_struct *next;
fftw_codelet_desc *cdesc;
} fftw_rader_data;
 
typedef void (fftw_rader_codelet)
(fftw_complex *, const fftw_complex *, int,
int, int, fftw_rader_data *);
 
/* structure that holds all the data needed for a given step */
typedef struct fftw_plan_node_struct {
enum fftw_node_type type;
 
union {
/* nodes of type FFTW_NOTW */
struct {
int size;
fftw_notw_codelet *codelet;
const fftw_codelet_desc *codelet_desc;
} notw;
 
/* nodes of type FFTW_TWIDDLE */
struct {
int size;
fftw_twiddle_codelet *codelet;
fftw_twiddle *tw;
struct fftw_plan_node_struct *recurse;
const fftw_codelet_desc *codelet_desc;
} twiddle;
 
/* nodes of type FFTW_GENERIC */
struct {
int size;
fftw_generic_codelet *codelet;
fftw_twiddle *tw;
struct fftw_plan_node_struct *recurse;
} generic;
 
/* nodes of type FFTW_RADER */
struct {
int size;
fftw_rader_codelet *codelet;
fftw_rader_data *rader_data;
fftw_twiddle *tw;
struct fftw_plan_node_struct *recurse;
} rader;
 
/* nodes of type FFTW_REAL2HC */
struct {
int size;
fftw_real2hc_codelet *codelet;
const fftw_codelet_desc *codelet_desc;
} real2hc;
 
/* nodes of type FFTW_HC2REAL */
struct {
int size;
fftw_hc2real_codelet *codelet;
const fftw_codelet_desc *codelet_desc;
} hc2real;
 
/* nodes of type FFTW_HC2HC */
struct {
int size;
fftw_direction dir;
fftw_hc2hc_codelet *codelet;
fftw_twiddle *tw;
struct fftw_plan_node_struct *recurse;
const fftw_codelet_desc *codelet_desc;
} hc2hc;
 
/* nodes of type FFTW_RGENERIC */
struct {
int size;
fftw_direction dir;
fftw_rgeneric_codelet *codelet;
fftw_twiddle *tw;
struct fftw_plan_node_struct *recurse;
} rgeneric;
} nodeu;
 
int refcnt;
} fftw_plan_node;
 
struct fftw_plan_struct {
int n;
int refcnt;
fftw_direction dir;
int flags;
int wisdom_signature;
enum fftw_node_type wisdom_type;
struct fftw_plan_struct *next;
fftw_plan_node *root;
double cost;
};
 
/* a plan is just an array of instructions */
typedef struct fftw_plan_struct *fftw_plan;
 
/* flags for the planner */
#define FFTW_ESTIMATE (0)
#define FFTW_MEASURE (1)
 
#define FFTW_OUT_OF_PLACE (0)
#define FFTW_IN_PLACE (8)
#define FFTW_USE_WISDOM (16)
 
#define FFTW_THREADSAFE (128) /* guarantee plan is read-only so that the
same plan can be used in parallel by
multiple threads */
 
#define FFTWND_FORCE_BUFFERED (256) /* internal, undocumented flag */
 
extern fftw_plan fftw_create_plan_specific(int n, fftw_direction dir,
int flags,
fftw_complex *in, int istride,
fftw_complex *out, int ostride);
#define FFTW_HAS_PLAN_SPECIFIC
extern fftw_plan fftw_create_plan(int n, fftw_direction dir, int flags);
extern void fftw_print_plan(fftw_plan plan);
extern void fftw_destroy_plan(fftw_plan plan);
extern void fftw(fftw_plan plan, int howmany, fftw_complex *in, int istride,
int idist, fftw_complex *out, int ostride, int odist);
extern void fftw_one(fftw_plan plan, fftw_complex *in, fftw_complex *out);
extern void fftw_die(const char *s);
extern void *fftw_malloc(size_t n);
extern void fftw_free(void *p);
extern void fftw_check_memory_leaks(void);
extern void fftw_print_max_memory_usage(void);
 
typedef void *(*fftw_malloc_type_function) (size_t n);
typedef void (*fftw_free_type_function) (void *p);
typedef void (*fftw_die_type_function) (const char *errString);
extern DL_IMPORT(fftw_malloc_type_function) fftw_malloc_hook;
extern DL_IMPORT(fftw_free_type_function) fftw_free_hook;
extern DL_IMPORT(fftw_die_type_function) fftw_die_hook;
 
extern size_t fftw_sizeof_fftw_real(void);
 
/* Wisdom: */
/*
* define this symbol so that users know we are using a version of FFTW
* with wisdom
*/
//#define FFTW_HAS_WISDOM
extern void fftw_forget_wisdom(void);
extern void fftw_export_wisdom(void (*emitter) (char c, void *), void *data);
extern fftw_status fftw_import_wisdom(int (*g) (void *), void *data);
//extern void fftw_export_wisdom_to_file(FILE *output_file);
//extern fftw_status fftw_import_wisdom_from_file(FILE *input_file);
extern char *fftw_export_wisdom_to_string(void);
extern fftw_status fftw_import_wisdom_from_string(const char *input_string);
 
/*
* define symbol so we know this function is available (it is not in
* older FFTWs)
*/
//#define FFTW_HAS_FPRINT_PLAN
//extern void fftw_fprint_plan(FILE *f, fftw_plan plan);
 
/*****************************
* N-dimensional code
*****************************/
typedef struct {
int is_in_place; /* 1 if for in-place FFTs, 0 otherwise */
 
int rank; /*
* the rank (number of dimensions) of the
* array to be FFTed
*/
int *n; /*
* the dimensions of the array to the
* FFTed
*/
fftw_direction dir;
 
int *n_before; /*
* n_before[i] = product of n[j] for j < i
*/
int *n_after; /* n_after[i] = product of n[j] for j > i */
 
fftw_plan *plans; /* 1d fftw plans for each dimension */
 
int nbuffers, nwork;
fftw_complex *work; /*
* work array big enough to hold
* nbuffers+1 of the largest dimension
* (has nwork elements)
*/
} fftwnd_data;
 
typedef fftwnd_data *fftwnd_plan;
 
/* Initializing the FFTWND plan: */
extern fftwnd_plan fftw2d_create_plan(int nx, int ny, fftw_direction dir,
int flags);
extern fftwnd_plan fftw3d_create_plan(int nx, int ny, int nz,
fftw_direction dir, int flags);
extern fftwnd_plan fftwnd_create_plan(int rank, const int *n,
fftw_direction dir,
int flags);
 
extern fftwnd_plan fftw2d_create_plan_specific(int nx, int ny,
fftw_direction dir,
int flags,
fftw_complex *in, int istride,
fftw_complex *out, int ostride);
extern fftwnd_plan fftw3d_create_plan_specific(int nx, int ny, int nz,
fftw_direction dir, int flags,
fftw_complex *in, int istride,
fftw_complex *out, int ostride);
extern fftwnd_plan fftwnd_create_plan_specific(int rank, const int *n,
fftw_direction dir,
int flags,
fftw_complex *in, int istride,
fftw_complex *out, int ostride);
 
/* Freeing the FFTWND plan: */
extern void fftwnd_destroy_plan(fftwnd_plan plan);
 
/* Printing the plan: */
//extern void fftwnd_fprint_plan(FILE *f, fftwnd_plan p);
extern void fftwnd_print_plan(fftwnd_plan p);
#define FFTWND_HAS_PRINT_PLAN
 
/* Computing the N-Dimensional FFT */
extern void fftwnd(fftwnd_plan plan, int howmany,
fftw_complex *in, int istride, int idist,
fftw_complex *out, int ostride, int odist);
extern void fftwnd_one(fftwnd_plan p, fftw_complex *in, fftw_complex *out);
 
#ifdef __cplusplus
} /* extern "C" */
 
#endif /* __cplusplus */
#endif /* FFTW_H */
/shark/trunk/ports/fftw/include/rfftw.h
0,0 → 1,98
/*
* Copyright (c) 1997-1999 Massachusetts Institute of Technology
*
* 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
*
*/
 
/* rfftw.h -- system-wide definitions for rfftw */
#ifndef RFFTW_H
#define RFFTW_H
 
#include <fftw.h>
 
#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */
 
/****************************************************************************/
 
#define RFFTW_V2
 
typedef fftw_plan rfftw_plan;
typedef fftwnd_plan rfftwnd_plan;
 
#define FFTW_REAL_TO_COMPLEX FFTW_FORWARD
#define FFTW_COMPLEX_TO_REAL FFTW_BACKWARD
 
extern void rfftw(rfftw_plan plan, int howmany, fftw_real *in, int istride,
int idist, fftw_real *out, int ostride, int odist);
extern void rfftw_one(rfftw_plan plan, fftw_real *in, fftw_real *out);
 
extern rfftw_plan rfftw_create_plan_specific(int n, fftw_direction dir,
int flags,
fftw_real *in, int istride,
fftw_real *out, int ostride);
 
extern rfftw_plan rfftw_create_plan(int n, fftw_direction dir, int flags);
extern void rfftw_destroy_plan(rfftw_plan plan);
 
//extern void rfftw_fprint_plan(FILE *f, rfftw_plan p);
//extern void rfftw_print_plan(rfftw_plan p);
 
extern void rfftw_executor_simple(int n, fftw_real *in,
fftw_real *out,
fftw_plan_node *p,
int istride,
int ostride);
 
extern rfftwnd_plan rfftwnd_create_plan_specific(int rank, const int *n,
fftw_direction dir, int flags,
fftw_real *in, int istride,
fftw_real *out, int ostride);
extern rfftwnd_plan rfftw2d_create_plan_specific(int nx, int ny,
fftw_direction dir, int flags,
fftw_real *in, int istride,
fftw_real *out, int ostride);
extern rfftwnd_plan rfftw3d_create_plan_specific(int nx, int ny, int nz,
fftw_direction dir, int flags,
fftw_real *in, int istride,
fftw_real *out, int ostride);
extern rfftwnd_plan rfftwnd_create_plan(int rank, const int *n,
fftw_direction dir, int flags);
extern rfftwnd_plan rfftw2d_create_plan(int nx, int ny,
fftw_direction dir, int flags);
extern rfftwnd_plan rfftw3d_create_plan(int nx, int ny, int nz,
fftw_direction dir, int flags);
extern void rfftwnd_destroy_plan(rfftwnd_plan plan);
//extern void rfftwnd_fprint_plan(FILE *f, rfftwnd_plan plan);
extern void rfftwnd_print_plan(rfftwnd_plan plan);
extern void rfftwnd_real_to_complex(rfftwnd_plan p, int howmany,
fftw_real *in, int istride, int idist,
fftw_complex *out, int ostride, int odist);
extern void rfftwnd_complex_to_real(rfftwnd_plan p, int howmany,
fftw_complex *in, int istride, int idist,
fftw_real *out, int ostride, int odist);
extern void rfftwnd_one_real_to_complex(rfftwnd_plan p,
fftw_real *in, fftw_complex *out);
extern void rfftwnd_one_complex_to_real(rfftwnd_plan p,
fftw_complex *in, fftw_real *out);
 
/****************************************************************************/
 
#ifdef __cplusplus
} /* extern "C" */
#endif /* __cplusplus */
#endif /* RFFTW_H */
/shark/trunk/ports/fftw/rfftw/rgeneric.c
22,8 → 22,8
* rgeneric.c -- "generic" rfftw codelets. They work for all n (and
* they are slow)
*/
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
/* this code assumes that r and m are both odd */
void fftw_hc2hc_forward_generic(fftw_real *A, const fftw_complex *W,
/shark/trunk/ports/fftw/rfftw/frc_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: frc_6.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_6.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_6.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_6.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_6.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_6.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_6(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:34 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 8 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: frc_8.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_8.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_8.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_8.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_8.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_8.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_8(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_11.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:36 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 11 */
 
43,9 → 43,9
 
/*
* Generator Id's :
* $Id: frc_11.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_11.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_11.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_11.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_11.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_11.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_11(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_13.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:36 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 13 */
 
53,9 → 53,9
 
/*
* Generator Id's :
* $Id: frc_13.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_13.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_13.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_13.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_13.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_13.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_13(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:39 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 32 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: frc_32.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_32.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_32.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_32.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_32.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_32.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_32(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_15.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:39 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 15 */
 
43,9 → 43,9
 
/*
* Generator Id's :
* $Id: frc_15.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_15.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_15.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_15.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_15.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_15.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_15(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fcr_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:04 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fcr_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_2.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_2.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_2.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_2(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:05 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 4 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: fcr_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_4.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_4.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_4.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_4(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:05 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fcr_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_6.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_6.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_6.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_6(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fhb_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:06 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 10 */
 
42,9 → 42,9
 
/*
* Generator Id's :
* $Id: fhb_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_10.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_10.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_10.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2hc_backward_10(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fcr_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:06 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 8 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fcr_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_8.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_8.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_8.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_8(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fhf_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:36 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fhf_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_10.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_10.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_10.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_forward_10(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/frc_128.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:41 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 128 */
 
64,9 → 64,9
 
/*
* Generator Id's :
* $Id: frc_128.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_128.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_128.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_128.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_128.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_128.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_128(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fhb_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:08 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 16 */
 
44,9 → 44,9
 
/*
* Generator Id's :
* $Id: fhb_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_16.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_16.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_16.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2hc_backward_16(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/rexec.c
21,12 → 21,12
* rexec.c -- execute the fft
*/
 
/* $Id: rexec.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $ */
/* $Id: rexec.c,v 1.2 2003-03-24 11:14:59 pj Exp $ */
//#include <ports/stdio.h>
#include <stdlib.h>
 
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
void rfftw_strided_copy(int n, fftw_real *in, int ostride,
fftw_real *out)
/shark/trunk/ports/fftw/rfftw/fhf_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:39 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 16 */
 
42,9 → 42,9
 
/*
* Generator Id's :
* $Id: fhf_16.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_16.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_16.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_16.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_16.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_16.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_forward_16(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fcr_11.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:07 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 11 */
 
44,9 → 44,9
 
/*
* Generator Id's :
* $Id: fcr_11.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_11.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_11.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_11.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_11.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_11.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_11(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_13.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:08 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 13 */
 
52,9 → 52,9
 
/*
* Generator Id's :
* $Id: fcr_13.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_13.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_13.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_13.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_13.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_13.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_13(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:12 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 32 */
 
41,9 → 41,9
 
/*
* Generator Id's :
* $Id: fcr_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_32.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_32.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_32.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_32(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_15.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:11 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 15 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: fcr_15.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_15.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_15.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_15.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_15.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_15.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_15(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fhb_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:57 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 2 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: fhb_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_2.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_2.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_2.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2hc_backward_2(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:58 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 4 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fhb_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_4.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_4.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_4.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_4(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/frc_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:40 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 64 */
 
48,9 → 48,9
 
/*
* Generator Id's :
* $Id: frc_64.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_64.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_64.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_64.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_64.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_64.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_64(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fhf_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:28 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fhf_2.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_2.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_2.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_2.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_2.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_2.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_forward_2(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:00 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 6 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fhb_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_6.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_6.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_6.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_6(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhf_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:29 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 4 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: fhf_4.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_4.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_4.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_4.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_4.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_4.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_4(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:04 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 8 */
 
38,9 → 38,9
 
/*
* Generator Id's :
* $Id: fhb_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_8.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_8.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_8.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_8(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/rexec2.c
17,7 → 17,7
*
*/
 
/* $Id: rexec2.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $ */
/* $Id: rexec2.c,v 1.2 2003-03-24 11:14:59 pj Exp $ */
/*
* rexec2.c -- alternate rfftw executor, specifically designed for the
* multidimensional transforms. Given an extra work array,
25,8 → 25,8
* not destroy the input in hc2real transforms.
*/
 
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
/* copies halfcomplex array in (contiguous) to fftw_complex array out. */
void rfftw_hc2c(int n, fftw_real *in, fftw_complex *out, int ostride)
/shark/trunk/ports/fftw/rfftw/fhf_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:31 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fhf_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_6.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_6.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_6.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_6.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_6(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/frc_1.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 1 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: frc_1.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_1.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_1.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_1.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_1.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_1.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_1(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fhf_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:34 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 8 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: fhf_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_8.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_8.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_8.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_8.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_8(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/makefile
10,6 → 10,8
 
OBJS_PATH = $(BASE)/ports/fftw/rfftw
 
OTHERINCL += -I$(BASE)/ports/fftw/include
 
OBJS = frc_1.o frc_2.o frc_3.o frc_4.o frc_5.o frc_6.o frc_7.o frc_8.o \
frc_9.o frc_10.o frc_11.o frc_12.o frc_13.o frc_14.o frc_15.o \
frc_16.o frc_32.o frc_64.o frc_128.o fhf_2.o fhf_3.o fhf_4.o \
/shark/trunk/ports/fftw/rfftw/frc_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: frc_3.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_3.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_3.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_3.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_3.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_3.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_3(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: frc_5.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_5.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_5.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_5.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_5.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_5.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_5(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:34 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: frc_7.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_7.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_7.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_7.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_7.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_7.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_7(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:35 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 9 */
 
47,9 → 47,9
 
/*
* Generator Id's :
* $Id: frc_9.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_9.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_9.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_9.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_9.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_9.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_9(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fcr_128.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:15 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 128 */
 
65,9 → 65,9
 
/*
* Generator Id's :
* $Id: fcr_128.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_128.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_128.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_128.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_128.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_128.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_128(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/frc_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:35 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: frc_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_10.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_10.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_10.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_10.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_10(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/rfftwnd.c
17,10 → 17,10
*
*/
 
/* $Id: rfftwnd.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $ */
/* $Id: rfftwnd.c,v 1.2 2003-03-24 11:14:59 pj Exp $ */
 
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
/********************** prototypes for rexec2 routines **********************/
 
/shark/trunk/ports/fftw/rfftw/frc_12.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:36 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 12 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: frc_12.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_12.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_12.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_12.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_12.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_12.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_12(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_14.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:38 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 14 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: frc_14.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_14.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_14.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: frc_14.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_14.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: frc_14.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_real2hc_14(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/frc_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:39 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 16 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: frc_16.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_16.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_16.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_16.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_16.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_16.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_16(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/rplanner.c
21,7 → 21,7
* planner.c -- find the optimal plan
*/
 
/* $Id: rplanner.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $ */
/* $Id: rplanner.c,v 1.2 2003-03-24 11:14:59 pj Exp $ */
#ifdef FFTW_USING_CILK
#include <cilk.h>
#include <cilk-compat.h>
30,8 → 30,8
#include <stdlib.h>
//#include <stdio.h>
 
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
extern fftw_codelet_desc *rfftw_config[]; /* global from rconfig.c */
extern fftw_rgeneric_codelet fftw_hc2hc_forward_generic;
/shark/trunk/ports/fftw/rfftw/fcr_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:13 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 64 */
 
49,9 → 49,9
 
/*
* Generator Id's :
* $Id: fcr_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_64.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_64.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_64.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_64(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_1.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:04 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 1 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fcr_1.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_1.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_1.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_1.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_1.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_1.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_1(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:04 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fcr_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_3.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_3.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_3.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_3(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:05 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 5 */
 
38,9 → 38,9
 
/*
* Generator Id's :
* $Id: fcr_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_5.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_5.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_5.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_5(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:06 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 7 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: fcr_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_7.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_7.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_7.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_7(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:06 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 9 */
 
45,9 → 45,9
 
/*
* Generator Id's :
* $Id: fcr_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_9.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_9.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fcr_9.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2real_9(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fhb_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:10 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 32 */
 
56,9 → 56,9
 
/*
* Generator Id's :
* $Id: fhb_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_32.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_32.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_32.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2hc_backward_32(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhf_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:39 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 32 */
 
56,9 → 56,9
 
/*
* Generator Id's :
* $Id: fhf_32.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_32.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_32.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_32.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_32.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_32.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_forward_32(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fcr_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:06 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 10 */
 
38,9 → 38,9
 
/*
* Generator Id's :
* $Id: fcr_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_10.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_10.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_10.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_10(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_12.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:07 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 12 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fcr_12.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_12.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_12.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_12.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_12.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_12.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_12(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_14.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:10 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 14 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: fcr_14.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_14.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_14.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_14.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_14.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_14.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_14(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fcr_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:11 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2real 16 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fcr_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fcr_16.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_16.c,v 1.2 2003-03-24 11:14:55 pj Exp $
* $Id: fcr_16.c,v 1.2 2003-03-24 11:14:55 pj Exp $
*/
 
void fftw_hc2real_16(const fftw_real *real_input, const fftw_real *imag_input, fftw_real *output, int real_istride, int imag_istride, int ostride)
/shark/trunk/ports/fftw/rfftw/fhb_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:58 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 3 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fhb_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: fhb_3.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_3.c,v 1.2 2003-03-24 11:14:56 pj Exp $
* $Id: fhb_3.c,v 1.2 2003-03-24 11:14:56 pj Exp $
*/
 
void fftw_hc2hc_backward_3(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:59 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 5 */
 
42,9 → 42,9
 
/*
* Generator Id's :
* $Id: fhb_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_5.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_5.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_5.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_5(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhf_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:29 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fhf_3.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_3.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_3.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_3.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_3.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhf_3.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_forward_3(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:02 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 7 */
 
46,9 → 46,9
 
/*
* Generator Id's :
* $Id: fhb_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_7.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_7.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_7.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_7(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/rconfig.c
39,8 → 39,8
/* rconfig.c -- this file contains all the real-complex codelets
* the system knows about */
 
#include <ports/fftw-int.h>
#include <ports/rfftw.h>
#include <fftw-int.h>
#include <rfftw.h>
 
#define NOTW_CODELET(x) \
&fftw_real2hc_##x##_desc
/shark/trunk/ports/fftw/rfftw/fhf_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:30 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fhf_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_5.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_5.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_5.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_5.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_5(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhb_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:56:05 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-backward 9 */
 
53,9 → 53,9
 
/*
* Generator Id's :
* $Id: fhb_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhb_9.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_9.c,v 1.2 2003-03-24 11:14:57 pj Exp $
* $Id: fhb_9.c,v 1.2 2003-03-24 11:14:57 pj Exp $
*/
 
void fftw_hc2hc_backward_9(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/fhf_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:32 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fhf_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_7.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_7.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_7.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_7.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_7(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/frc_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: frc_2.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_2.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_2.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_2.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_2.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_2.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_2(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/rfftw/fhf_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:35 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -hc2hc-forward 9 */
 
47,9 → 47,9
 
/*
* Generator Id's :
* $Id: fhf_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_9.c,v 1.1.1.1 2002-03-29 14:12:58 pj Exp $
* $Id: fhf_9.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_9.c,v 1.2 2003-03-24 11:14:58 pj Exp $
* $Id: fhf_9.c,v 1.2 2003-03-24 11:14:58 pj Exp $
*/
 
void fftw_hc2hc_forward_9(fftw_real *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/rfftw/frc_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:33 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -real2hc 4 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: frc_4.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_4.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_4.c,v 1.1.1.1 2002-03-29 14:12:59 pj Exp $
* $Id: frc_4.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_4.c,v 1.2 2003-03-24 11:14:59 pj Exp $
* $Id: frc_4.c,v 1.2 2003-03-24 11:14:59 pj Exp $
*/
 
void fftw_real2hc_4(const fftw_real *input, fftw_real *real_output, fftw_real *imag_output, int istride, int real_ostride, int imag_ostride)
/shark/trunk/ports/fftw/fftw/fni_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:43 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 4 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fni_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_4(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:44 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fni_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_6(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/wisdom.c
21,7 → 21,7
* wisdom.c -- manage the wisdom
*/
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
//#include <ports/stdio.h>
#include <stdlib.h>
//#include <ports/ctype.h>
/shark/trunk/ports/fftw/fftw/fni_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:46 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 8 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: fni_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_8.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_8.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_8.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_8(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fn_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_10.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_10.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_10.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_10(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_12.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:28 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 12 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fn_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_12.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_12.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_12.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_12(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/config.c
19,9 → 19,9
 
/* config.c -- this file contains all the codelets the system knows about */
 
/* $Id: config.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $ */
/* $Id: config.c,v 1.2 2003-03-24 11:14:49 pj Exp $ */
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
 
/* the signature is the same as the size, for now */
#define NOTW_CODELET(x) \
/shark/trunk/ports/fftw/fftw/fn_14.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:28 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 14 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fn_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_14.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_14.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_14.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_14(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftwi_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:52 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: ftwi_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_10.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_10.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_10.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_10.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_10(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:31 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 16 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: fn_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_16.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_16.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_16.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_16(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:48 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fni_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_10.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_10.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_10.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_10(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_12.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:50 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 12 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fni_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_12.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_12.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_12.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_12.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_12(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftwi_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:52 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 16 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: ftwi_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_16.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_16.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_16.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_16.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_16(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fni_14.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:52 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 14 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fni_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_14.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_14.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_14.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_14.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_14(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:18 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: ftw_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_3.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_3.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_3.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_3(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fni_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:55 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 16 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: fni_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_16.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_16.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_16.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_16(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:19 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: ftw_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_5(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:26 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fn_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_2.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_2.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_2.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_2(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:20 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: ftw_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_7.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_7.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_7.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftw_twiddle_7(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 4 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fn_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_4.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_4.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_4.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_4.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_4(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:22 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 9 */
 
41,9 → 41,9
 
/*
* Generator Id's :
* $Id: ftw_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_9.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_9.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_9.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftw_twiddle_9(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fn_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_6.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_6.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_6.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_6.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_6(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 8 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: fn_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_8.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_8.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_8.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_8.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftw_no_twiddle_8(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftwi_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:46 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: ftwi_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_3.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_3.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_3.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_3.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_3(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftwi_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:47 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: ftwi_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_5.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_5.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_5.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_5.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_5(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftwi_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:48 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: ftwi_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_7.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_7.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_7.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_7.c,v 1.2 2003-03-24 11:14:54 pj Exp $
*/
 
void fftwi_twiddle_7(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/planner.c
21,13 → 21,13
* planner.c -- find the optimal plan
*/
 
/* $Id: planner.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $ */
/* $Id: planner.c,v 1.2 2003-03-24 11:14:54 pj Exp $ */
#ifdef FFTW_USING_CILK
#include <ports/cilk.h>
#include <ports/cilk-compat.h>
#include <cilk.h>
#include <cilk-compat.h>
#endif
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
#include <stdlib.h>
//#include <ports/stdio.h>
 
/shark/trunk/ports/fftw/fftw/ftwi_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:50 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 9 */
 
41,9 → 41,9
 
/*
* Generator Id's :
* $Id: ftwi_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_9.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_9.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_9.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_9.c,v 1.2 2003-03-24 11:14:54 pj Exp $
*/
 
void fftwi_twiddle_9(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftw_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:24 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 32 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: ftw_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_32.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_32.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_32.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_32(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/wisdomio.c
20,7 → 20,7
//#include <ports/stdio.h>
#include <stdlib.h>
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
 
/**************** import/export using file ***************/
/*
/shark/trunk/ports/fftw/fftw/fni_1.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:42 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 1 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fni_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_1.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_1.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_1.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_1(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/makefile
10,6 → 10,8
 
OBJS_PATH = $(BASE)/ports/fftw/fftw
 
OTHERINCL += -I$(BASE)/ports/fftw/include
 
OBJS = fn_1.o fn_2.o fn_3.o fn_4.o fn_5.o fn_6.o fn_7.o fn_8.o fn_9.o \
fn_10.o fn_11.o fn_12.o fn_13.o fn_14.o fn_15.o fn_16.o fn_32.o \
fn_64.o ftw_2.o ftw_3.o ftw_4.o ftw_5.o ftw_6.o ftw_7.o ftw_8.o \
/shark/trunk/ports/fftw/fftw/executor.c
21,12 → 21,12
* executor.c -- execute the fft
*/
 
/* $Id: executor.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $ */
#include <ports/fftw-int.h>
/* $Id: executor.c,v 1.2 2003-03-24 11:14:50 pj Exp $ */
#include <fftw-int.h>
//#include <ports/stdio.h>
#include <stdlib.h>
 
const char *fftw_version = "FFTW V" FFTW_VERSION " ($Id: executor.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $)";
const char *fftw_version = "FFTW V" FFTW_VERSION " ($Id: executor.c,v 1.2 2003-03-24 11:14:50 pj Exp $)";
 
/*
* This function is called in other files, so we cannot declare
/shark/trunk/ports/fftw/fftw/fni_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:43 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fni_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_3.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_3.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_3.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_3(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:44 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fni_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_5.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_5(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:45 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fni_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_7.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_7.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_7.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_7(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:47 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 9 */
 
41,9 → 41,9
 
/*
* Generator Id's :
* $Id: fni_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_9.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_9.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_9.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_9(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_11.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:28 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 11 */
 
43,9 → 43,9
 
/*
* Generator Id's :
* $Id: fn_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_11.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_11.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_11.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_11(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_13.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:28 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 13 */
 
53,9 → 53,9
 
/*
* Generator Id's :
* $Id: fn_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_13.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_13.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_13.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_13(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fn_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:31 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 32 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: fn_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_32.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_32.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_32.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_32(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/malloc.c
21,13 → 21,13
* malloc.c -- memory allocation related functions
*/
 
/* $Id: malloc.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $ */
/* $Id: malloc.c,v 1.2 2003-03-24 11:14:54 pj Exp $ */
#ifdef FFTW_USING_CILK
#include <ports/cilk.h>
#include <ports/cilk-compat.h>
#include <cilk.h>
#include <cilk-compat.h>
#endif
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
//#include <stdio.h>
#include <stdlib.h>
 
91,7 → 91,7
// fflush(stdout);
// fprintf(stderr, "fftw: %s", s);
 
kern_printf(s);
printk(KERN_ERR "fftw: %s", s);
sys_abort(EXIT_FAILURE);
}
 
/shark/trunk/ports/fftw/fftw/fn_15.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:30 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 15 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fn_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_15.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_15.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_15.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_15(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 64 */
 
48,9 → 48,9
 
/*
* Generator Id's :
* $Id: ftw_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_64.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_64.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_64.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftw_twiddle_64(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/generic.c
22,7 → 22,7
* generic.c -- "generic" codelets. They work for all n (and they are
* slow)
*/
#include <ports/fftw-int.h>
#include <fftw-int.h>
#include <stdlib.h>
 
void fftw_twiddle_generic(fftw_complex *A, const fftw_complex *W,
/shark/trunk/ports/fftw/fftw/ftwi_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:53 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 32 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: ftwi_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_32.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_32.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_32.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_32.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_32(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fni_11.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:49 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 11 */
 
43,9 → 43,9
 
/*
* Generator Id's :
* $Id: fni_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_11.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_11.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_11.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_11.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_11(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_13.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:51 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 13 */
 
53,9 → 53,9
 
/*
* Generator Id's :
* $Id: fni_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_13.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_13.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_13.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_13.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_13(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_32.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:57 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 32 */
 
40,9 → 40,9
 
/*
* Generator Id's :
* $Id: fni_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_32.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_32.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_32.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_32.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_32(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:18 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: ftw_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_2.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_2.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_2.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_2(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fni_15.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:55 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 15 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fni_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_15.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_15.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_15.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_15.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_15(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:18 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 4 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: ftw_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_4.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_4(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_1.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:26 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 1 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fn_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_1.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_1.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_1.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_1.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_1(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:19 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: ftw_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_6.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_6(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_3.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:26 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 3 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: fn_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_3.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_3.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_3.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_3.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_3(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftw_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:21 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 8 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: ftw_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftw_8.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_8.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftw_8.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftw_twiddle_8(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_5.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 5 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: fn_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_5.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_5.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_5.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_5.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_5(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fftwnd.c
17,9 → 17,9
*
*/
 
/* $Id: fftwnd.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $ */
/* $Id: fftwnd.c,v 1.2 2003-03-24 11:14:50 pj Exp $ */
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
 
/* the number of buffers to use for buffered transforms: */
#define FFTWND_NBUFFERS 8
/shark/trunk/ports/fftw/fftw/fn_7.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 7 */
 
39,9 → 39,9
 
/*
* Generator Id's :
* $Id: fn_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_7.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_7.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_7.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_7.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftw_no_twiddle_7(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftwi_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:45 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: ftwi_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_2.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_2.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_2.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_2.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_2(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_9.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:27 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 9 */
 
41,9 → 41,9
 
/*
* Generator Id's :
* $Id: fn_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_9.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_9.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_9.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fn_9.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftw_no_twiddle_9(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/ftwi_4.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:46 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 4 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: ftwi_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_4.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_4.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_4.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_4.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_4(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/twiddle.c
23,13 → 23,13
* the inverse
*/
 
/* $Id: twiddle.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $ */
/* $Id: twiddle.c,v 1.2 2003-03-24 11:14:54 pj Exp $ */
#ifdef FFTW_USING_CILK
#include <ports/cilk.h>
#include <ports/cilk-compat.h>
#include <cilk.h>
#include <cilk-compat.h>
#endif
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
#include <math.h>
#include <stdlib.h>
 
/shark/trunk/ports/fftw/fftw/rader.c
26,7 → 26,7
#include <stdlib.h>
#include <math.h>
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
 
#ifdef FFTW_USING_CILK
#include <ports/cilk.h>
/shark/trunk/ports/fftw/fftw/ftwi_6.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:47 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 6 */
 
35,9 → 35,9
 
/*
* Generator Id's :
* $Id: ftwi_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_6.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_6.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_6.c,v 1.2 2003-03-24 11:14:53 pj Exp $
* $Id: ftwi_6.c,v 1.2 2003-03-24 11:14:53 pj Exp $
*/
 
void fftwi_twiddle_6(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftwi_8.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:49 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 8 */
 
34,9 → 34,9
 
/*
* Generator Id's :
* $Id: ftwi_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_8.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_8.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_8.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_8.c,v 1.2 2003-03-24 11:14:54 pj Exp $
*/
 
void fftwi_twiddle_8(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftw_10.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:22 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 10 */
 
37,9 → 37,9
 
/*
* Generator Id's :
* $Id: ftw_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_10.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_10.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_10.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_10.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_10(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/ftw_16.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:24 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddle 16 */
 
36,9 → 36,9
 
/*
* Generator Id's :
* $Id: ftw_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_16.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: ftw_16.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_16.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: ftw_16.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftw_twiddle_16(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fn_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:32 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddle 64 */
 
48,9 → 48,9
 
/*
* Generator Id's :
* $Id: fn_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fn_64.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_64.c,v 1.2 2003-03-24 11:14:50 pj Exp $
* $Id: fn_64.c,v 1.2 2003-03-24 11:14:50 pj Exp $
*/
 
void fftw_no_twiddle_64(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/putils.c
22,13 → 22,13
* putils.c -- plan utilities shared by planner.c and rplanner.c
*/
 
/* $Id: putils.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $ */
/* $Id: putils.c,v 1.2 2003-03-24 11:14:54 pj Exp $ */
#ifdef FFTW_USING_CILK
#include <ports/cilk.h>
#include <ports/cilk-compat.h>
#include <cilk.h>
#include <cilk-compat.h>
#endif
 
#include <ports/fftw-int.h>
#include <fftw-int.h>
#include <stdlib.h>
//#include <ports/stdio.h>
 
/shark/trunk/ports/fftw/fftw/ftwi_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:55:56 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -twiddleinv 64 */
 
48,9 → 48,9
 
/*
* Generator Id's :
* $Id: ftwi_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_64.c,v 1.1.1.1 2002-03-29 14:12:57 pj Exp $
* $Id: ftwi_64.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_64.c,v 1.2 2003-03-24 11:14:54 pj Exp $
* $Id: ftwi_64.c,v 1.2 2003-03-24 11:14:54 pj Exp $
*/
 
void fftwi_twiddle_64(fftw_complex *A, const fftw_complex *W, int iostride, int m, int dist)
/shark/trunk/ports/fftw/fftw/fni_64.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:58 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 64 */
 
48,9 → 48,9
 
/*
* Generator Id's :
* $Id: fni_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_64.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_64.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_64.c,v 1.2 2003-03-24 11:14:52 pj Exp $
* $Id: fni_64.c,v 1.2 2003-03-24 11:14:52 pj Exp $
*/
 
void fftwi_no_twiddle_64(const fftw_complex *input, fftw_complex *output, int istride, int ostride)
/shark/trunk/ports/fftw/fftw/fni_2.c
20,8 → 20,8
/* This file was automatically generated --- DO NOT EDIT */
/* Generated on Tue May 18 13:54:42 EDT 1999 */
 
#include <ports/fftw-int.h>
#include <ports/fftw.h>
#include <fftw-int.h>
#include <fftw.h>
 
/* Generated by: ./genfft -magic-alignment-check -magic-twiddle-load-all -magic-variables 4 -magic-loopi -notwiddleinv 2 */
 
33,9 → 33,9
 
/*
* Generator Id's :
* $Id: fni_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_2.c,v 1.1.1.1 2002-03-29 14:12:56 pj Exp $
* $Id: fni_2.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_2.c,v 1.2 2003-03-24 11:14:51 pj Exp $
* $Id: fni_2.c,v 1.2 2003-03-24 11:14:51 pj Exp $
*/
 
void fftwi_no_twiddle_2(const fftw_complex *input, fftw_complex *output, int istride, int ostride)