Twiddle factors shared by the transforms along all three mesh directions
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | mesh(3) | = | 0 |
Number of points along each direction |
|
| integer, | public | :: | nmax | = | 0 |
Length of the twiddle table, the largest mesh dimension |
|
| complex(kind=wp), | public, | allocatable | :: | tw(:) |
Roots of unity exp(-2pii*k/nmax) for k = 0 .. nmax/2 - 1 |
type :: fft_mesh !> Number of points along each direction integer :: mesh(3) = 0 !> Length of the twiddle table, the largest mesh dimension integer :: nmax = 0 !> Roots of unity exp(-2*pi*i*k/nmax) for k = 0 .. nmax/2 - 1 complex(wp), allocatable :: tw(:) end type fft_mesh