[goffice] Make go_linear_solve public.
- From: Morten Welinder <mortenw src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [goffice] Make go_linear_solve public.
- Date: Sun, 23 May 2010 01:15:34 +0000 (UTC)
commit b0c7472c60994e0880ffd08c8f0a56dd93762d93
Author: Morten Welinder <terra gnome org>
Date: Sat May 22 21:15:16 2010 -0400
Make go_linear_solve public.
goffice/math/go-regression.c | 6 +++---
goffice/math/go-regression.h | 11 +++++++++++
2 files changed, 14 insertions(+), 3 deletions(-)
---
diff --git a/goffice/math/go-regression.c b/goffice/math/go-regression.c
index ba24479..385394e 100644
--- a/goffice/math/go-regression.c
+++ b/goffice/math/go-regression.c
@@ -508,8 +508,8 @@ SUFFIX(LUPDecomp) (CONSTMATRIX A, MATRIX LU, int *P, int n, DOUBLE *b_scaled,
}
-static GORegressionResult
-SUFFIX(linear_solve) (CONSTMATRIX A, const DOUBLE *b, int n, DOUBLE *res)
+GORegressionResult
+SUFFIX(go_linear_solve) (CONSTMATRIX A, const DOUBLE *b, int n, DOUBLE *res)
{
GORegressionResult err;
MATRIX LU;
@@ -1759,7 +1759,7 @@ SUFFIX(go_non_linear_regression) (SUFFIX(GORegressionFunction) f,
if (result != GO_REG_ok)
goto out;
- result = SUFFIX(linear_solve) (A, b, p_dim, dpar);
+ result = SUFFIX(go_linear_solve) (A, b, p_dim, dpar);
if (result != GO_REG_ok)
goto out;
diff --git a/goffice/math/go-regression.h b/goffice/math/go-regression.h
index ac9c8a0..573085d 100644
--- a/goffice/math/go-regression.h
+++ b/goffice/math/go-regression.h
@@ -94,6 +94,11 @@ GORegressionResult go_non_linear_regression (GORegressionFunction f,
gboolean go_matrix_invert (double **A, int n);
double go_matrix_determinant (double *const *const A, int n);
+GORegressionResult go_linear_solve (double *const *const A,
+ const double *b,
+ int n,
+ double *res);
+
#ifdef GOFFICE_WITH_LONG_DOUBLE
typedef struct {
long double *se; /*SE for each parameter estimator*/
@@ -157,6 +162,12 @@ GORegressionResult go_non_linear_regressionl (GORegressionFunctionl f,
gboolean go_matrix_invertl (long double **A, int n);
long double go_matrix_determinantl (long double *const * const A, int n);
+
+GORegressionResult go_linear_solvel (long double *const *const A,
+ const long double *b,
+ int n,
+ long double *res);
+
#endif
G_END_DECLS
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]