Skip to content

Commit 3b64523

Browse files
committed
reorder fortran header for opts struct, fixes #593
1 parent 43b5a36 commit 3b64523

File tree

1 file changed

+16
-7
lines changed

1 file changed

+16
-7
lines changed

include/finufft.fh

Lines changed: 16 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,21 @@
11
c Fortran header recreating finufft_opts struct in fortran (f90 style).
22
c This must be kept synchronized with finufft_opts.h, matching its order.
3-
c Also see ../fortran/finufftfort.cpp. Barnett 5/29/20. One prec 7/2/20.
3+
c Also see ../fortran/finufftfort.cpp.
4+
c Barnett 5/29/20. One prec 7/2/20. Fix ordering bug 11/29/24.
45

56
type finufft_opts
6-
integer debug, spread_debug,spread_sort,spread_kerevalmeth,
7-
$ spread_kerpad,chkbnds,fftw,modeord
8-
real*8 upsampfac
9-
integer spread_thread,maxbatchsize,showwarn,nthreads,
10-
$ spread_nthr_atomic,spread_max_sp_size
11-
integer fftw_lock_fun,fftw_unlock_fun,fftw_lock_data
7+
8+
c data handling opts...
9+
integer modeord,chkbnds
10+
11+
c diagnostic opts...
12+
integer debug,spread_debug,showwarn
13+
14+
c alg performance opts...
15+
integer nthreads,fftw,spread_sort,spread_kerevalmeth,spread_kerpad
16+
real*8 upsampfac
17+
integer spread_thread,maxbatchsize,spread_nthr_atomic,
18+
$ spread_max_sp_size
19+
integer fftw_lock_fun,fftw_unlock_fun,fftw_lock_data
20+
1221
end type

0 commit comments

Comments
 (0)