| author | Francesco Abbate <francesco.bbt@gmail.com> | 2009年08月28日 08:51:05 +0000 |
|---|---|---|
| committer | Francesco Abbate <francesco.bbt@gmail.com> | 2009年08月28日 08:51:05 +0000 |
| commit | d602572aa0ed1719c6cf015777307694c114e166 (patch) | |
| tree | f14fc86e8a5582aa03ca8d3ecd6ea99c768e1d58 /matrix_decls_source.c | |
| parent | fc82d9f3a24c7cb3c1e0426baabcbfbb0ffb8b08 (diff) | |
| download | gsl-shell-d602572aa0ed1719c6cf015777307694c114e166.tar.gz | |
| -rw-r--r-- | matrix_decls_source.c | 7 |
diff --git a/matrix_decls_source.c b/matrix_decls_source.c index 199ebcdd..e1bda3c9 100644 --- a/matrix_decls_source.c +++ b/matrix_decls_source.c @@ -18,6 +18,11 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
+#define NLINFIT_MAX_ITER 30
+
+static char const * const TYPE (name_matrix) = "GSL." PREFIX "matrix";
+static char const * const FUNCTION (name_matrix, view) = "GSL." PREFIX "mview";
+
static int FUNCTION (matrix, get) (lua_State *L);
static int FUNCTION (matrix, set) (lua_State *L);
static int FUNCTION (matrix, free) (lua_State *L);
@@ -50,7 +55,6 @@ static const struct luaL_Reg FUNCTION (matrix, methods)[] = { {"set", FUNCTION (matrix, set)},
{"dims", FUNCTION (matrix, dims)},
{"copy", FUNCTION (matrix, copy)},
- {"inverse", FUNCTION (matrix, inverse)},
{NULL, NULL}
};
@@ -58,5 +62,6 @@ static const struct luaL_Reg FUNCTION (matrix, functions)[] = { {PREFIX "matrix", FUNCTION (matrix, new)},
{PREFIX "mul", FUNCTION (matrix, mul)},
{PREFIX "solve", FUNCTION (matrix, solve)},
+ {PREFIX "inverse", FUNCTION (matrix, inverse)},
{NULL, NULL}
};
|