Homec4science
Diffusion tamaas (features/netcdf-mpi) Browse

tamaas/src/core/tamaas.cpp
01b5b0c25d22features/netcdf-mpi

Last Change
Raw File

tamaas.cpp
View Options

/**
* @file
*
* @author Lucas Frérot <lucas.frerot@epfl.ch>
*
* @section LICENSE
*
* Copyright (©) 2016 EPFL (Ecole Polytechnique Fédérale de
* Lausanne) Laboratory (LSMS - Laboratoire de Simulation en Mécanique des
* Solides)
*
* Tamaas is free software: you can redistribute it and/or modify it under the
* terms of the GNU Lesser General Public License as published by the Free
* Software Foundation, either version 3 of the License, or (at your option) any
* later version.
*
* Tamaas 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 Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with Tamaas. If not, see <http://www.gnu.org/licenses/>.
*
*/
/* -------------------------------------------------------------------------- */
#include "tamaas.hh"
#include "fft_plan_manager.hh"
#include "loop.hh"
#include <fftw3.h>
#include <omp.h>
/* -------------------------------------------------------------------------- */
__BEGIN_TAMAAS__
void initialize(UInt num_threads) {
if (num_threads)
omp_set_num_threads(num_threads); // set user-defined number of threads
fftw_import_wisdom_from_filename("fftransform_fftw_wisdom");
#ifndef USE_CUDA
if (!fftw_init_threads())
TAMAAS_EXCEPTION("FFTW could not initialize threads!");
fftw_plan_with_nthreads(omp_get_max_threads());
#endif
}
/* -------------------------------------------------------------------------- */
void finalize() {
FFTPlanManager::get().clean();
fftw_export_wisdom_to_filename("fftransform_fftw_wisdom");
fftw_cleanup_threads();
}
__END_TAMAAS__
c4science · Help