more precise warning for fftw_plan_mode
This commit is contained in:
parent
d66c777d6e
commit
75bd643258
|
@ -609,7 +609,7 @@ subroutine IO_warning(warning_ID,ext_msg,label1,ID1,label2,ID2)
|
||||||
|
|
||||||
select case (warning_ID)
|
select case (warning_ID)
|
||||||
case (47)
|
case (47)
|
||||||
msg = 'invalid parameter for FFTW, using FFTW_PATIENT'
|
msg = 'invalid parameter for FFTW'
|
||||||
case (207)
|
case (207)
|
||||||
msg = 'line truncated'
|
msg = 'line truncated'
|
||||||
case (600)
|
case (600)
|
||||||
|
|
|
@ -249,7 +249,7 @@ subroutine spectral_utilities_init()
|
||||||
case('fftw_exhaustive')
|
case('fftw_exhaustive')
|
||||||
FFTW_planner_flag = FFTW_EXHAUSTIVE
|
FFTW_planner_flag = FFTW_EXHAUSTIVE
|
||||||
case default
|
case default
|
||||||
call IO_warning(47,trim(num_grid%get_asString('fftw_plan_mode')))
|
call IO_warning(47,trim(num_grid%get_asString('fftw_plan_mode')),ext_msg='using default FFTW_MEASURE')
|
||||||
FFTW_planner_flag = FFTW_MEASURE
|
FFTW_planner_flag = FFTW_MEASURE
|
||||||
end select
|
end select
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue