annotate src/fftw-3.3.8/api/plan-r2r-3d.c @ 169:223a55898ab9 tip default

Add null config files
author Chris Cannam <cannam@all-day-breakfast.com>
date Mon, 02 Mar 2020 14:03:47 +0000
parents bd3cc4d1df30
children
rev   line source
cannam@167 1 /*
cannam@167 2 * Copyright (c) 2003, 2007-14 Matteo Frigo
cannam@167 3 * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
cannam@167 4 *
cannam@167 5 * This program is free software; you can redistribute it and/or modify
cannam@167 6 * it under the terms of the GNU General Public License as published by
cannam@167 7 * the Free Software Foundation; either version 2 of the License, or
cannam@167 8 * (at your option) any later version.
cannam@167 9 *
cannam@167 10 * This program is distributed in the hope that it will be useful,
cannam@167 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
cannam@167 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
cannam@167 13 * GNU General Public License for more details.
cannam@167 14 *
cannam@167 15 * You should have received a copy of the GNU General Public License
cannam@167 16 * along with this program; if not, write to the Free Software
cannam@167 17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
cannam@167 18 *
cannam@167 19 */
cannam@167 20
cannam@167 21 #include "api/api.h"
cannam@167 22
cannam@167 23 X(plan) X(plan_r2r_3d)(int nx, int ny, int nz,
cannam@167 24 R *in, R *out, X(r2r_kind) kindx,
cannam@167 25 X(r2r_kind) kindy, X(r2r_kind) kindz, unsigned flags)
cannam@167 26 {
cannam@167 27 int n[3];
cannam@167 28 X(r2r_kind) kind[3];
cannam@167 29 n[0] = nx;
cannam@167 30 n[1] = ny;
cannam@167 31 n[2] = nz;
cannam@167 32 kind[0] = kindx;
cannam@167 33 kind[1] = kindy;
cannam@167 34 kind[2] = kindz;
cannam@167 35 return X(plan_r2r)(3, n, in, out, kind, flags);
cannam@167 36 }