Blame fft/complex_internal.h
|
Packit |
67cb25 |
/* Handling of packed complex types... not meant for client consumption.
|
|
Packit |
67cb25 |
*/
|
|
Packit |
67cb25 |
#ifndef COMPLEX_INTERNAL_H_
|
|
Packit |
67cb25 |
#define COMPLEX_INTERNAL_H_
|
|
Packit |
67cb25 |
|
|
Packit |
67cb25 |
#define VECTOR(a,stride,i) ((a)[(stride)*(i)])
|
|
Packit |
67cb25 |
#define REAL(a,stride,i) ((a)[2*(stride)*(i)])
|
|
Packit |
67cb25 |
#define IMAG(a,stride,i) ((a)[2*(stride)*(i)+1])
|
|
Packit |
67cb25 |
|
|
Packit |
67cb25 |
#define REAL0(a) ((a)[0])
|
|
Packit |
67cb25 |
#define IMAG0(a) ((a)[1])
|
|
Packit |
67cb25 |
|
|
Packit |
67cb25 |
|
|
Packit |
67cb25 |
#endif /* !COMPLEX_INTERNAL_H_ */
|