diff --git a/src/grid/spectral_utilities.f90 b/src/grid/spectral_utilities.f90 index d43f4d029..2fde2484f 100644 --- a/src/grid/spectral_utilities.f90 +++ b/src/grid/spectral_utilities.f90 @@ -227,13 +227,13 @@ subroutine spectral_utilities_init() end if select case(IO_lc(num_grid_fft%get_asStr('plan_mode',defaultVal='FFTW_MEASURE'))) - case('fftw_estimate') ! ordered from slow execution (but fast plan creation) to fast execution + case('fftw_estimate', 'FFTW_ESTIMATE') ! ordered from slow execution (but fast plan creation) to fast execution FFTW_planner_flag = FFTW_ESTIMATE - case('fftw_measure') + case('fftw_measure', 'FFTW_MEASURE') FFTW_planner_flag = FFTW_MEASURE - case('fftw_patient') + case('fftw_patient', 'FFTW_PATIENT') FFTW_planner_flag = FFTW_PATIENT - case('fftw_exhaustive') + case('fftw_exhaustive', 'FFTW_EXHAUSTIVE') FFTW_planner_flag = FFTW_EXHAUSTIVE case default call IO_warning(47,'using default FFTW_MEASURE instead of "'//trim(num_grid_fft%get_asStr('plan_mode'))//'"')