| author | francesco <francesco.bbt@gmail.com> | 2011年04月24日 12:44:25 +0200 |
|---|---|---|
| committer | francesco <francesco.bbt@gmail.com> | 2011年04月24日 12:44:25 +0200 |
| commit | 90a9dc178acca62749df1393eacffd264350cae8 (patch) | |
| tree | ec2e1518ec60fbd14393a11b6a2d42404737664b /matrix_headers_source.h | |
| parent | 2b1733183834a93f4cfcff03de15b372bc69b4ac (diff) | |
| download | gsl-shell-90a9dc178acca62749df1393eacffd264350cae8.tar.gz | |
| -rw-r--r-- | matrix_headers_source.h | 46 |
diff --git a/matrix_headers_source.h b/matrix_headers_source.h deleted file mode 100644 index 0515d990..00000000 --- a/matrix_headers_source.h +++ /dev/null @@ -1,46 +0,0 @@ - -extern void FUNCTION (matrix, register) (lua_State *L); - -extern TYPE (gsl_matrix) * FUNCTION (matrix, push) (lua_State *L, - int n1, int n2); - -extern TYPE (gsl_matrix) * FUNCTION (matrix, push_raw) (lua_State *L, - int n1, int n2); - -extern void FUNCTION (matrix, push_view) (lua_State *L, - TYPE (gsl_matrix) *m); - -extern TYPE (gsl_matrix) * FUNCTION (matrix, check) (lua_State *L, - int index); - -extern void FUNCTION (matrix, null_view) (lua_State *L, - int index); - -extern void FUNCTION (matrix, check_size) (lua_State *L, - TYPE (gsl_matrix) *m, - size_t n1, size_t n2); - -extern int FUNCTION (matrix, inverse_raw)(lua_State *L, - const TYPE (gsl_matrix) *a); - -extern int FUNCTION (matrix, solve_raw) (lua_State *L, - const TYPE (gsl_matrix) *a, - const TYPE (gsl_matrix) *b); - - -/* matrix helper functions */ -extern void -FUNCTION (matrix, set_view_and_push) (lua_State *L, int index, double *data, - size_t n1, size_t n2, const double *src); - -extern void -FUNCTION (matrix, set_view) (lua_State *L, int index, double *data, - size_t n1, size_t n2, const double *src); - -extern void -FUNCTION (matrix, jacob_copy_real_to_cmpl) (double *dest_cmpl, double *src_real, - size_t n, size_t p, size_t mult); - -extern void -FUNCTION (matrix, jacob_copy_cmpl_to_real) (double *dest_real, double *src_cmpl, - size_t n, size_t p, size_t mult); |