1 /* -*- mode: c; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4; c-file-style: "stroustrup"; -*-
4 * Gromacs Copyright (c) 1991-2005
5 * David van der Spoel, Erik Lindahl, University of Groningen.
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version 2
10 * of the License, or (at your option) any later version.
12 * To help us fund GROMACS development, we humbly ask that you cite
13 * the research papers on the package. Check out http://www.gromacs.org
16 * Gnomes, ROck Monsters And Chili Sauce
19 #ifndef _gmx_parallel_3dfft_h_
20 #define _gmx_parallel_3dfft_h_
27 #include "types/simple.h"
28 #include "types/commrec.h"
29 #include "gmxcomplex.h"
32 typedef struct gmx_parallel_3dfft
*
37 /*! \brief Initialize parallel MPI-based 3D-FFT.
39 * This routine performs real-to-complex and complex-to-real parallel 3D FFTs,
40 * but not complex-to-complex.
42 * The routine is optimized for small-to-medium size FFTs used for PME and
43 * PPPM algorithms, and do allocate extra workspace whenever it might improve
46 * \param pfft_setup Pointer to parallel 3dfft setup structure, previously
47 * allocated or with automatic storage.
48 * \param ngridx Global number of grid cells in the x direction. Must be
49 * divisible by the number of nodes.
50 * \param ngridy Global number of grid cells in the y direction. Must be
51 * divisible by the number of nodes.
52 * \param ngridz Global number of grid cells in the z direction.
53 * \param node2slab Node id to slab index array, can be NULL.
54 * \param slab2grid_x Slab index to grid_x array (nnodes+1), can be NULL.
55 * \param comm MPI communicator, must have been initialized.
56 * \param bReproducible Try to avoid FFT timing optimizations and other stuff
57 * that could make results differ for two runs with
58 * identical input (reproducibility for debugging).
60 * \return 0 or a standard error code.
63 gmx_parallel_3dfft_init (gmx_parallel_3dfft_t
* pfft_setup
,
66 t_complex
** complex_data
,
68 int * slab2index_major
,
69 int * slab2index_minor
,
76 /*! \brief Get direct space grid index limits
79 gmx_parallel_3dfft_real_limits(gmx_parallel_3dfft_t pfft_setup
,
85 /*! \brief Get reciprocal space grid index limits
88 gmx_parallel_3dfft_complex_limits(gmx_parallel_3dfft_t pfft_setup
,
96 gmx_parallel_3dfft_execute(gmx_parallel_3dfft_t pfft_setup
,
97 enum gmx_fft_direction dir
,
102 /*! \brief Release all data in parallel fft setup
104 * All temporary storage and FFT plans are released. The structure itself
105 * is not released, but the contents is invalid after this call.
107 * \param pfft_setup Parallel 3dfft setup.
109 * \return 0 or a standard error code.
112 gmx_parallel_3dfft_destroy(gmx_parallel_3dfft_t pfft_setup
);
117 #endif /* _gmx_parallel_3dfft_h_ */