gsl_fft__complex_internal.h 366 B

123456789101112131415
  1. /* Handling of packed complex types... not meant for client consumption.
  2. */
  3. #ifndef COMPLEX_INTERNAL_H_
  4. #define COMPLEX_INTERNAL_H_
  5. #define VECTOR(a,stride,i) ((a)[(stride)*(i)])
  6. #define REAL(a,stride,i) ((a)[2*(stride)*(i)])
  7. #define IMAG(a,stride,i) ((a)[2*(stride)*(i)+1])
  8. #define REAL0(a) ((a)[0])
  9. #define IMAG0(a) ((a)[1])
  10. #endif /* !COMPLEX_INTERNAL_H_ */