1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
#ifndef _iemmatrix_stub_gsl_h_
#define _iemmatrix_stub_gsl_h_
#ifndef HAVE_LIBGSL
typedef struct _gsl_complext_private_tag {
double dat[2];
} gsl_complex;
typedef struct _gsl_matrix_private_tag {
size_t size1;
size_t size2;
size_t tda;
double *data;
void *block;
int owner;
} gsl_matrix;
typedef struct _gsl_vector_private_tag {
size_t size;
size_t stride;
double *data;
void *block;
int owner;
} gsl_vector;
typedef struct _gsl_matrix_complex_private_tag {
size_t size1;
size_t size2;
size_t tda;
double *data;
void *block;
int owner;
} gsl_matrix_complex;
typedef struct _gsl_vector_complex_private_tag {
size_t size;
size_t stride;
double *data;
void *block;
int owner;
} gsl_vector_complex;
#ifndef GSL_VECTOR_REAL
# define GSL_VECTOR_REAL(z, i) ((z)->data[2*(i)*(z)->stride + 0])
#endif
#ifndef GSL_VECTOR_IMAG
# define GSL_VECTOR_IMAG(z, i) ((z)->data[2*(i)*(z)->stride + 1])
#endif
typedef struct _gsl_eigen_nonsymm_workspace_private_tag gsl_eigen_nonsymm_workspace;
typedef struct _gsl_eigen_nonsymmv_workspace_private_tag gsl_eigen_nonsymmv_workspace;
#endif /* GSL */
#endif /* _iemmatrix_stub_gsl_h_ */
|
