numo-liblinear 0.2.0 → 1.1.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- checksums.yaml +5 -5
- data/.gitmodules +3 -0
- data/.travis.yml +1 -1
- data/CHANGELOG.md +21 -1
- data/LICENSE.txt +1 -1
- data/README.md +24 -10
- data/ext/numo/liblinear/converter.c +25 -0
- data/ext/numo/liblinear/converter.h +2 -0
- data/ext/numo/liblinear/extconf.rb +7 -8
- data/ext/numo/liblinear/liblinear/blas/blas.h +25 -0
- data/ext/numo/liblinear/liblinear/blas/blasp.h +438 -0
- data/ext/numo/liblinear/liblinear/blas/daxpy.c +57 -0
- data/ext/numo/liblinear/liblinear/blas/ddot.c +58 -0
- data/ext/numo/liblinear/liblinear/blas/dnrm2.c +70 -0
- data/ext/numo/liblinear/liblinear/blas/dscal.c +52 -0
- data/ext/numo/liblinear/liblinear/linear.cpp +3725 -0
- data/ext/numo/liblinear/liblinear/linear.h +88 -0
- data/ext/numo/liblinear/liblinear/newton.cpp +245 -0
- data/ext/numo/liblinear/liblinear/newton.h +37 -0
- data/ext/numo/liblinear/liblinearext.c +79 -34
- data/ext/numo/liblinear/model.c +3 -0
- data/ext/numo/liblinear/parameter.c +34 -27
- data/ext/numo/liblinear/problem.c +34 -6
- data/ext/numo/liblinear/solver_type.c +8 -6
- data/lib/numo/liblinear/version.rb +1 -1
- data/numo-liblinear.gemspec +15 -1
- metadata +23 -10
checksums.yaml
CHANGED
@@ -1,7 +1,7 @@
|
|
1
1
|
---
|
2
|
-
|
3
|
-
metadata.gz:
|
4
|
-
data.tar.gz:
|
2
|
+
SHA256:
|
3
|
+
metadata.gz: 4e69ca89df0a86fdc4be7d1a3074a4722ead3997a6f7ba2fff84b48c6d1c36ea
|
4
|
+
data.tar.gz: 992d8f8606dbf272ac18c1f6502e923d69ce3242d6cb35a460b3856cace29671
|
5
5
|
SHA512:
|
6
|
-
metadata.gz:
|
7
|
-
data.tar.gz:
|
6
|
+
metadata.gz: 46f453f5b9ee23640a7131d92d3f666806e182265654cec321ebae22c97ae6af06a5b35726e4ab0cfde96407d0fb828391a2c5578c3e27644c487df66432cce8
|
7
|
+
data.tar.gz: d1e0fc15d4227491823fe4ed8f631c491e6cd4c8fb9c078ccf230785e2881fa12134dbfca9e84069bd8d995c140523bfc0572cbaa38761b114d162015dea5be1
|
data/.gitmodules
ADDED
data/.travis.yml
CHANGED
data/CHANGELOG.md
CHANGED
@@ -1,5 +1,25 @@
|
|
1
|
+
# 1.1.0
|
2
|
+
- Update bundled LIBLINEAR version to 2.4.1.
|
3
|
+
- Support one-class SVM implemented on LIBLINEAR ver. 2.4.0.
|
4
|
+
|
5
|
+
# 1.0.0
|
6
|
+
## Breaking change
|
7
|
+
- For easy installation, Numo::LIBLINEAR bundles LIBLINEAR codes.
|
8
|
+
There is no need to install LIBLINEAR in advance to use Numo::LIBLINEAR.
|
9
|
+
|
10
|
+
# 0.5.0
|
11
|
+
- Fix to use LIBLINEAR sparce vector representation for internal processing.
|
12
|
+
|
13
|
+
# 0.4.0
|
14
|
+
- Add verbose parameter to output learning process messages.
|
15
|
+
- Several documentation improvements.
|
16
|
+
|
17
|
+
# 0.3.0
|
18
|
+
- Add random_seed parameter for specifying seed to give to srand function.
|
19
|
+
- Several documentation improvements.
|
20
|
+
|
1
21
|
# 0.2.0
|
2
|
-
- Add
|
22
|
+
- Add validation of method parameters.
|
3
23
|
- Several documentation improvements.
|
4
24
|
|
5
25
|
# 0.1.0
|
data/LICENSE.txt
CHANGED
data/README.md
CHANGED
@@ -3,7 +3,7 @@
|
|
3
3
|
[](https://travis-ci.org/yoshoku/numo-liblinear)
|
4
4
|
[](https://badge.fury.io/rb/numo-liblinear)
|
5
5
|
[](https://github.com/yoshoku/numo-liblinear/blob/master/LICENSE.txt)
|
6
|
-
[](https://
|
6
|
+
[](https://yoshoku.github.io/numo-liblinear/doc/)
|
7
7
|
|
8
8
|
Numo::Liblinear is a Ruby gem binding to the [LIBLINEAR](https://www.csie.ntu.edu.tw/~cjlin/liblinear/) library.
|
9
9
|
LIBLINEAR is one of the famous libraries for large-scale regularized linear classification and regression.
|
@@ -15,15 +15,7 @@ Note: There are other useful Ruby gems binding to LIBLINEAR:
|
|
15
15
|
[liblinear-ruby-swig](https://github.com/tomz/liblinear-ruby-swig) by Tom Zeng.
|
16
16
|
|
17
17
|
## Installation
|
18
|
-
Numo::Liblinear
|
19
|
-
|
20
|
-
macOS:
|
21
|
-
|
22
|
-
$ brew install liblinear
|
23
|
-
|
24
|
-
Ubuntu:
|
25
|
-
|
26
|
-
$ sudo apt-get install liblinear-dev
|
18
|
+
Numo::Liblinear bundles LIBLINEAR. There is no need to install LIBLINEAR in advance.
|
27
19
|
|
28
20
|
Add this line to your application's Gemfile:
|
29
21
|
|
@@ -153,6 +145,28 @@ Predict labels.
|
|
153
145
|
Accuracy: 87.9 %
|
154
146
|
```
|
155
147
|
|
148
|
+
## Note
|
149
|
+
The hyperparemter of LIBLINEAR is given with Ruby Hash on Numo::Liblinear.
|
150
|
+
The hash key of hyperparameter and its meaning match the struct parameter of LIBLINEAR.
|
151
|
+
The parameter is detailed in [LIBLINEAR README](https://github.com/cjlin1/liblinear/blob/master/README)
|
152
|
+
|
153
|
+
```ruby
|
154
|
+
param = {
|
155
|
+
solver_type: # [Integer] Type of Solver
|
156
|
+
Numo::Liblinear::SolverType::L2R_L2LOSS_SVC_DUAL,
|
157
|
+
eps: 0.01, # [Float] Stopping criterion
|
158
|
+
C: 1, # [Float] Cost of constraints violation
|
159
|
+
nr_weight: 3, # [Integer] Number of weights
|
160
|
+
weight_label: # [Numo::Int32] Labels to add weight
|
161
|
+
Numo::Int32[0, 1, 2],
|
162
|
+
weight: # [Numo::DFloat] Weight values
|
163
|
+
Numo::DFloat[0.4, 0.4, 0.2],
|
164
|
+
p: 0.1, # [Float] Sensitiveness of loss of support vector regression
|
165
|
+
verbose: false, # [Boolean] Whether to output learning process message
|
166
|
+
random_seed: 1 # [Integer/Nil] Random seed
|
167
|
+
}
|
168
|
+
```
|
169
|
+
|
156
170
|
## Development
|
157
171
|
|
158
172
|
After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
|
@@ -100,3 +100,28 @@ double** nary_to_dbl_mat(VALUE mat_val)
|
|
100
100
|
|
101
101
|
return mat;
|
102
102
|
}
|
103
|
+
|
104
|
+
struct feature_node* dbl_vec_to_node(double* const arr, int const size)
|
105
|
+
{
|
106
|
+
int i, j;
|
107
|
+
int n_nonzero_elements;
|
108
|
+
struct feature_node* node;
|
109
|
+
|
110
|
+
n_nonzero_elements = 0;
|
111
|
+
for (i = 0; i < size; i++) {
|
112
|
+
if (arr[i] != 0.0) n_nonzero_elements++;
|
113
|
+
}
|
114
|
+
|
115
|
+
node = ALLOC_N(struct feature_node, n_nonzero_elements + 1);
|
116
|
+
for (i = 0, j = 0; i < size; i++) {
|
117
|
+
if (arr[i] != 0.0) {
|
118
|
+
node[j].index = i + 1;
|
119
|
+
node[j].value = arr[i];
|
120
|
+
j++;
|
121
|
+
}
|
122
|
+
}
|
123
|
+
node[n_nonzero_elements].index = -1;
|
124
|
+
node[n_nonzero_elements].value = 0.0;
|
125
|
+
|
126
|
+
return node;
|
127
|
+
}
|
@@ -3,6 +3,7 @@
|
|
3
3
|
|
4
4
|
#include <string.h>
|
5
5
|
#include <ruby.h>
|
6
|
+
#include <linear.h>
|
6
7
|
#include <numo/narray.h>
|
7
8
|
#include <numo/template.h>
|
8
9
|
|
@@ -12,5 +13,6 @@ VALUE dbl_vec_to_nary(double* const arr, int const size);
|
|
12
13
|
double* nary_to_dbl_vec(VALUE vec_val);
|
13
14
|
VALUE dbl_mat_to_nary(double** const mat, int const n_rows, int const n_cols);
|
14
15
|
double** nary_to_dbl_mat(VALUE mat_val);
|
16
|
+
struct feature_node* dbl_vec_to_node(double* const arr, int const size);
|
15
17
|
|
16
18
|
#endif /* NUMO_LIBLINEAR_CONVERTER_H */
|
@@ -26,14 +26,13 @@ if RUBY_PLATFORM =~ /mswin|cygwin|mingw/
|
|
26
26
|
end
|
27
27
|
end
|
28
28
|
|
29
|
-
|
30
|
-
puts 'linear.h not found.'
|
31
|
-
exit(1)
|
32
|
-
end
|
29
|
+
$LDFLAGS << ' -lstdc++ '
|
33
30
|
|
34
|
-
|
35
|
-
|
36
|
-
|
37
|
-
|
31
|
+
$srcs = Dir.glob("#{$srcdir}/*.c").map { |path| File.basename(path) }
|
32
|
+
$srcs.concat(%w[linear.cpp newton.cpp daxpy.c ddot.c dnrm2.c dscal.c])
|
33
|
+
|
34
|
+
$INCFLAGS << " -I$(srcdir)/liblinear"
|
35
|
+
$VPATH << "$(srcdir)/liblinear"
|
36
|
+
$VPATH << "$(srcdir)/liblinear/blas"
|
38
37
|
|
39
38
|
create_makefile('numo/liblinear/liblinearext')
|
@@ -0,0 +1,25 @@
|
|
1
|
+
/* blas.h -- C header file for BLAS Ver 1.0 */
|
2
|
+
/* Jesse Bennett March 23, 2000 */
|
3
|
+
|
4
|
+
/** barf [ba:rf] 2. "He suggested using FORTRAN, and everybody barfed."
|
5
|
+
|
6
|
+
- From The Shogakukan DICTIONARY OF NEW ENGLISH (Second edition) */
|
7
|
+
|
8
|
+
#ifndef BLAS_INCLUDE
|
9
|
+
#define BLAS_INCLUDE
|
10
|
+
|
11
|
+
/* Data types specific to BLAS implementation */
|
12
|
+
typedef struct { float r, i; } fcomplex;
|
13
|
+
typedef struct { double r, i; } dcomplex;
|
14
|
+
typedef int blasbool;
|
15
|
+
|
16
|
+
#include "blasp.h" /* Prototypes for all BLAS functions */
|
17
|
+
|
18
|
+
#define FALSE 0
|
19
|
+
#define TRUE 1
|
20
|
+
|
21
|
+
/* Macro functions */
|
22
|
+
#define MIN(a,b) ((a) <= (b) ? (a) : (b))
|
23
|
+
#define MAX(a,b) ((a) >= (b) ? (a) : (b))
|
24
|
+
|
25
|
+
#endif
|
@@ -0,0 +1,438 @@
|
|
1
|
+
/* blasp.h -- C prototypes for BLAS Ver 1.0 */
|
2
|
+
/* Jesse Bennett March 23, 2000 */
|
3
|
+
|
4
|
+
/* Functions listed in alphabetical order */
|
5
|
+
|
6
|
+
#ifdef __cplusplus
|
7
|
+
extern "C" {
|
8
|
+
#endif
|
9
|
+
|
10
|
+
#ifdef F2C_COMPAT
|
11
|
+
|
12
|
+
void cdotc_(fcomplex *dotval, int *n, fcomplex *cx, int *incx,
|
13
|
+
fcomplex *cy, int *incy);
|
14
|
+
|
15
|
+
void cdotu_(fcomplex *dotval, int *n, fcomplex *cx, int *incx,
|
16
|
+
fcomplex *cy, int *incy);
|
17
|
+
|
18
|
+
double sasum_(int *n, float *sx, int *incx);
|
19
|
+
|
20
|
+
double scasum_(int *n, fcomplex *cx, int *incx);
|
21
|
+
|
22
|
+
double scnrm2_(int *n, fcomplex *x, int *incx);
|
23
|
+
|
24
|
+
double sdot_(int *n, float *sx, int *incx, float *sy, int *incy);
|
25
|
+
|
26
|
+
double snrm2_(int *n, float *x, int *incx);
|
27
|
+
|
28
|
+
void zdotc_(dcomplex *dotval, int *n, dcomplex *cx, int *incx,
|
29
|
+
dcomplex *cy, int *incy);
|
30
|
+
|
31
|
+
void zdotu_(dcomplex *dotval, int *n, dcomplex *cx, int *incx,
|
32
|
+
dcomplex *cy, int *incy);
|
33
|
+
|
34
|
+
#else
|
35
|
+
|
36
|
+
fcomplex cdotc_(int *n, fcomplex *cx, int *incx, fcomplex *cy, int *incy);
|
37
|
+
|
38
|
+
fcomplex cdotu_(int *n, fcomplex *cx, int *incx, fcomplex *cy, int *incy);
|
39
|
+
|
40
|
+
float sasum_(int *n, float *sx, int *incx);
|
41
|
+
|
42
|
+
float scasum_(int *n, fcomplex *cx, int *incx);
|
43
|
+
|
44
|
+
float scnrm2_(int *n, fcomplex *x, int *incx);
|
45
|
+
|
46
|
+
float sdot_(int *n, float *sx, int *incx, float *sy, int *incy);
|
47
|
+
|
48
|
+
float snrm2_(int *n, float *x, int *incx);
|
49
|
+
|
50
|
+
dcomplex zdotc_(int *n, dcomplex *cx, int *incx, dcomplex *cy, int *incy);
|
51
|
+
|
52
|
+
dcomplex zdotu_(int *n, dcomplex *cx, int *incx, dcomplex *cy, int *incy);
|
53
|
+
|
54
|
+
#endif
|
55
|
+
|
56
|
+
/* Remaining functions listed in alphabetical order */
|
57
|
+
|
58
|
+
int caxpy_(int *n, fcomplex *ca, fcomplex *cx, int *incx, fcomplex *cy,
|
59
|
+
int *incy);
|
60
|
+
|
61
|
+
int ccopy_(int *n, fcomplex *cx, int *incx, fcomplex *cy, int *incy);
|
62
|
+
|
63
|
+
int cgbmv_(char *trans, int *m, int *n, int *kl, int *ku,
|
64
|
+
fcomplex *alpha, fcomplex *a, int *lda, fcomplex *x, int *incx,
|
65
|
+
fcomplex *beta, fcomplex *y, int *incy);
|
66
|
+
|
67
|
+
int cgemm_(char *transa, char *transb, int *m, int *n, int *k,
|
68
|
+
fcomplex *alpha, fcomplex *a, int *lda, fcomplex *b, int *ldb,
|
69
|
+
fcomplex *beta, fcomplex *c, int *ldc);
|
70
|
+
|
71
|
+
int cgemv_(char *trans, int *m, int *n, fcomplex *alpha, fcomplex *a,
|
72
|
+
int *lda, fcomplex *x, int *incx, fcomplex *beta, fcomplex *y,
|
73
|
+
int *incy);
|
74
|
+
|
75
|
+
int cgerc_(int *m, int *n, fcomplex *alpha, fcomplex *x, int *incx,
|
76
|
+
fcomplex *y, int *incy, fcomplex *a, int *lda);
|
77
|
+
|
78
|
+
int cgeru_(int *m, int *n, fcomplex *alpha, fcomplex *x, int *incx,
|
79
|
+
fcomplex *y, int *incy, fcomplex *a, int *lda);
|
80
|
+
|
81
|
+
int chbmv_(char *uplo, int *n, int *k, fcomplex *alpha, fcomplex *a,
|
82
|
+
int *lda, fcomplex *x, int *incx, fcomplex *beta, fcomplex *y,
|
83
|
+
int *incy);
|
84
|
+
|
85
|
+
int chemm_(char *side, char *uplo, int *m, int *n, fcomplex *alpha,
|
86
|
+
fcomplex *a, int *lda, fcomplex *b, int *ldb, fcomplex *beta,
|
87
|
+
fcomplex *c, int *ldc);
|
88
|
+
|
89
|
+
int chemv_(char *uplo, int *n, fcomplex *alpha, fcomplex *a, int *lda,
|
90
|
+
fcomplex *x, int *incx, fcomplex *beta, fcomplex *y, int *incy);
|
91
|
+
|
92
|
+
int cher_(char *uplo, int *n, float *alpha, fcomplex *x, int *incx,
|
93
|
+
fcomplex *a, int *lda);
|
94
|
+
|
95
|
+
int cher2_(char *uplo, int *n, fcomplex *alpha, fcomplex *x, int *incx,
|
96
|
+
fcomplex *y, int *incy, fcomplex *a, int *lda);
|
97
|
+
|
98
|
+
int cher2k_(char *uplo, char *trans, int *n, int *k, fcomplex *alpha,
|
99
|
+
fcomplex *a, int *lda, fcomplex *b, int *ldb, float *beta,
|
100
|
+
fcomplex *c, int *ldc);
|
101
|
+
|
102
|
+
int cherk_(char *uplo, char *trans, int *n, int *k, float *alpha,
|
103
|
+
fcomplex *a, int *lda, float *beta, fcomplex *c, int *ldc);
|
104
|
+
|
105
|
+
int chpmv_(char *uplo, int *n, fcomplex *alpha, fcomplex *ap, fcomplex *x,
|
106
|
+
int *incx, fcomplex *beta, fcomplex *y, int *incy);
|
107
|
+
|
108
|
+
int chpr_(char *uplo, int *n, float *alpha, fcomplex *x, int *incx,
|
109
|
+
fcomplex *ap);
|
110
|
+
|
111
|
+
int chpr2_(char *uplo, int *n, fcomplex *alpha, fcomplex *x, int *incx,
|
112
|
+
fcomplex *y, int *incy, fcomplex *ap);
|
113
|
+
|
114
|
+
int crotg_(fcomplex *ca, fcomplex *cb, float *c, fcomplex *s);
|
115
|
+
|
116
|
+
int cscal_(int *n, fcomplex *ca, fcomplex *cx, int *incx);
|
117
|
+
|
118
|
+
int csscal_(int *n, float *sa, fcomplex *cx, int *incx);
|
119
|
+
|
120
|
+
int cswap_(int *n, fcomplex *cx, int *incx, fcomplex *cy, int *incy);
|
121
|
+
|
122
|
+
int csymm_(char *side, char *uplo, int *m, int *n, fcomplex *alpha,
|
123
|
+
fcomplex *a, int *lda, fcomplex *b, int *ldb, fcomplex *beta,
|
124
|
+
fcomplex *c, int *ldc);
|
125
|
+
|
126
|
+
int csyr2k_(char *uplo, char *trans, int *n, int *k, fcomplex *alpha,
|
127
|
+
fcomplex *a, int *lda, fcomplex *b, int *ldb, fcomplex *beta,
|
128
|
+
fcomplex *c, int *ldc);
|
129
|
+
|
130
|
+
int csyrk_(char *uplo, char *trans, int *n, int *k, fcomplex *alpha,
|
131
|
+
fcomplex *a, int *lda, fcomplex *beta, fcomplex *c, int *ldc);
|
132
|
+
|
133
|
+
int ctbmv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
134
|
+
fcomplex *a, int *lda, fcomplex *x, int *incx);
|
135
|
+
|
136
|
+
int ctbsv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
137
|
+
fcomplex *a, int *lda, fcomplex *x, int *incx);
|
138
|
+
|
139
|
+
int ctpmv_(char *uplo, char *trans, char *diag, int *n, fcomplex *ap,
|
140
|
+
fcomplex *x, int *incx);
|
141
|
+
|
142
|
+
int ctpsv_(char *uplo, char *trans, char *diag, int *n, fcomplex *ap,
|
143
|
+
fcomplex *x, int *incx);
|
144
|
+
|
145
|
+
int ctrmm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
146
|
+
int *n, fcomplex *alpha, fcomplex *a, int *lda, fcomplex *b,
|
147
|
+
int *ldb);
|
148
|
+
|
149
|
+
int ctrmv_(char *uplo, char *trans, char *diag, int *n, fcomplex *a,
|
150
|
+
int *lda, fcomplex *x, int *incx);
|
151
|
+
|
152
|
+
int ctrsm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
153
|
+
int *n, fcomplex *alpha, fcomplex *a, int *lda, fcomplex *b,
|
154
|
+
int *ldb);
|
155
|
+
|
156
|
+
int ctrsv_(char *uplo, char *trans, char *diag, int *n, fcomplex *a,
|
157
|
+
int *lda, fcomplex *x, int *incx);
|
158
|
+
|
159
|
+
int daxpy_(int *n, double *sa, double *sx, int *incx, double *sy,
|
160
|
+
int *incy);
|
161
|
+
|
162
|
+
int dcopy_(int *n, double *sx, int *incx, double *sy, int *incy);
|
163
|
+
|
164
|
+
int dgbmv_(char *trans, int *m, int *n, int *kl, int *ku,
|
165
|
+
double *alpha, double *a, int *lda, double *x, int *incx,
|
166
|
+
double *beta, double *y, int *incy);
|
167
|
+
|
168
|
+
int dgemm_(char *transa, char *transb, int *m, int *n, int *k,
|
169
|
+
double *alpha, double *a, int *lda, double *b, int *ldb,
|
170
|
+
double *beta, double *c, int *ldc);
|
171
|
+
|
172
|
+
int dgemv_(char *trans, int *m, int *n, double *alpha, double *a,
|
173
|
+
int *lda, double *x, int *incx, double *beta, double *y,
|
174
|
+
int *incy);
|
175
|
+
|
176
|
+
int dger_(int *m, int *n, double *alpha, double *x, int *incx,
|
177
|
+
double *y, int *incy, double *a, int *lda);
|
178
|
+
|
179
|
+
int drot_(int *n, double *sx, int *incx, double *sy, int *incy,
|
180
|
+
double *c, double *s);
|
181
|
+
|
182
|
+
int drotg_(double *sa, double *sb, double *c, double *s);
|
183
|
+
|
184
|
+
int dsbmv_(char *uplo, int *n, int *k, double *alpha, double *a,
|
185
|
+
int *lda, double *x, int *incx, double *beta, double *y,
|
186
|
+
int *incy);
|
187
|
+
|
188
|
+
int dscal_(int *n, double *sa, double *sx, int *incx);
|
189
|
+
|
190
|
+
int dspmv_(char *uplo, int *n, double *alpha, double *ap, double *x,
|
191
|
+
int *incx, double *beta, double *y, int *incy);
|
192
|
+
|
193
|
+
int dspr_(char *uplo, int *n, double *alpha, double *x, int *incx,
|
194
|
+
double *ap);
|
195
|
+
|
196
|
+
int dspr2_(char *uplo, int *n, double *alpha, double *x, int *incx,
|
197
|
+
double *y, int *incy, double *ap);
|
198
|
+
|
199
|
+
int dswap_(int *n, double *sx, int *incx, double *sy, int *incy);
|
200
|
+
|
201
|
+
int dsymm_(char *side, char *uplo, int *m, int *n, double *alpha,
|
202
|
+
double *a, int *lda, double *b, int *ldb, double *beta,
|
203
|
+
double *c, int *ldc);
|
204
|
+
|
205
|
+
int dsymv_(char *uplo, int *n, double *alpha, double *a, int *lda,
|
206
|
+
double *x, int *incx, double *beta, double *y, int *incy);
|
207
|
+
|
208
|
+
int dsyr_(char *uplo, int *n, double *alpha, double *x, int *incx,
|
209
|
+
double *a, int *lda);
|
210
|
+
|
211
|
+
int dsyr2_(char *uplo, int *n, double *alpha, double *x, int *incx,
|
212
|
+
double *y, int *incy, double *a, int *lda);
|
213
|
+
|
214
|
+
int dsyr2k_(char *uplo, char *trans, int *n, int *k, double *alpha,
|
215
|
+
double *a, int *lda, double *b, int *ldb, double *beta,
|
216
|
+
double *c, int *ldc);
|
217
|
+
|
218
|
+
int dsyrk_(char *uplo, char *trans, int *n, int *k, double *alpha,
|
219
|
+
double *a, int *lda, double *beta, double *c, int *ldc);
|
220
|
+
|
221
|
+
int dtbmv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
222
|
+
double *a, int *lda, double *x, int *incx);
|
223
|
+
|
224
|
+
int dtbsv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
225
|
+
double *a, int *lda, double *x, int *incx);
|
226
|
+
|
227
|
+
int dtpmv_(char *uplo, char *trans, char *diag, int *n, double *ap,
|
228
|
+
double *x, int *incx);
|
229
|
+
|
230
|
+
int dtpsv_(char *uplo, char *trans, char *diag, int *n, double *ap,
|
231
|
+
double *x, int *incx);
|
232
|
+
|
233
|
+
int dtrmm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
234
|
+
int *n, double *alpha, double *a, int *lda, double *b,
|
235
|
+
int *ldb);
|
236
|
+
|
237
|
+
int dtrmv_(char *uplo, char *trans, char *diag, int *n, double *a,
|
238
|
+
int *lda, double *x, int *incx);
|
239
|
+
|
240
|
+
int dtrsm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
241
|
+
int *n, double *alpha, double *a, int *lda, double *b,
|
242
|
+
int *ldb);
|
243
|
+
|
244
|
+
int dtrsv_(char *uplo, char *trans, char *diag, int *n, double *a,
|
245
|
+
int *lda, double *x, int *incx);
|
246
|
+
|
247
|
+
|
248
|
+
int saxpy_(int *n, float *sa, float *sx, int *incx, float *sy, int *incy);
|
249
|
+
|
250
|
+
int scopy_(int *n, float *sx, int *incx, float *sy, int *incy);
|
251
|
+
|
252
|
+
int sgbmv_(char *trans, int *m, int *n, int *kl, int *ku,
|
253
|
+
float *alpha, float *a, int *lda, float *x, int *incx,
|
254
|
+
float *beta, float *y, int *incy);
|
255
|
+
|
256
|
+
int sgemm_(char *transa, char *transb, int *m, int *n, int *k,
|
257
|
+
float *alpha, float *a, int *lda, float *b, int *ldb,
|
258
|
+
float *beta, float *c, int *ldc);
|
259
|
+
|
260
|
+
int sgemv_(char *trans, int *m, int *n, float *alpha, float *a,
|
261
|
+
int *lda, float *x, int *incx, float *beta, float *y,
|
262
|
+
int *incy);
|
263
|
+
|
264
|
+
int sger_(int *m, int *n, float *alpha, float *x, int *incx,
|
265
|
+
float *y, int *incy, float *a, int *lda);
|
266
|
+
|
267
|
+
int srot_(int *n, float *sx, int *incx, float *sy, int *incy,
|
268
|
+
float *c, float *s);
|
269
|
+
|
270
|
+
int srotg_(float *sa, float *sb, float *c, float *s);
|
271
|
+
|
272
|
+
int ssbmv_(char *uplo, int *n, int *k, float *alpha, float *a,
|
273
|
+
int *lda, float *x, int *incx, float *beta, float *y,
|
274
|
+
int *incy);
|
275
|
+
|
276
|
+
int sscal_(int *n, float *sa, float *sx, int *incx);
|
277
|
+
|
278
|
+
int sspmv_(char *uplo, int *n, float *alpha, float *ap, float *x,
|
279
|
+
int *incx, float *beta, float *y, int *incy);
|
280
|
+
|
281
|
+
int sspr_(char *uplo, int *n, float *alpha, float *x, int *incx,
|
282
|
+
float *ap);
|
283
|
+
|
284
|
+
int sspr2_(char *uplo, int *n, float *alpha, float *x, int *incx,
|
285
|
+
float *y, int *incy, float *ap);
|
286
|
+
|
287
|
+
int sswap_(int *n, float *sx, int *incx, float *sy, int *incy);
|
288
|
+
|
289
|
+
int ssymm_(char *side, char *uplo, int *m, int *n, float *alpha,
|
290
|
+
float *a, int *lda, float *b, int *ldb, float *beta,
|
291
|
+
float *c, int *ldc);
|
292
|
+
|
293
|
+
int ssymv_(char *uplo, int *n, float *alpha, float *a, int *lda,
|
294
|
+
float *x, int *incx, float *beta, float *y, int *incy);
|
295
|
+
|
296
|
+
int ssyr_(char *uplo, int *n, float *alpha, float *x, int *incx,
|
297
|
+
float *a, int *lda);
|
298
|
+
|
299
|
+
int ssyr2_(char *uplo, int *n, float *alpha, float *x, int *incx,
|
300
|
+
float *y, int *incy, float *a, int *lda);
|
301
|
+
|
302
|
+
int ssyr2k_(char *uplo, char *trans, int *n, int *k, float *alpha,
|
303
|
+
float *a, int *lda, float *b, int *ldb, float *beta,
|
304
|
+
float *c, int *ldc);
|
305
|
+
|
306
|
+
int ssyrk_(char *uplo, char *trans, int *n, int *k, float *alpha,
|
307
|
+
float *a, int *lda, float *beta, float *c, int *ldc);
|
308
|
+
|
309
|
+
int stbmv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
310
|
+
float *a, int *lda, float *x, int *incx);
|
311
|
+
|
312
|
+
int stbsv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
313
|
+
float *a, int *lda, float *x, int *incx);
|
314
|
+
|
315
|
+
int stpmv_(char *uplo, char *trans, char *diag, int *n, float *ap,
|
316
|
+
float *x, int *incx);
|
317
|
+
|
318
|
+
int stpsv_(char *uplo, char *trans, char *diag, int *n, float *ap,
|
319
|
+
float *x, int *incx);
|
320
|
+
|
321
|
+
int strmm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
322
|
+
int *n, float *alpha, float *a, int *lda, float *b,
|
323
|
+
int *ldb);
|
324
|
+
|
325
|
+
int strmv_(char *uplo, char *trans, char *diag, int *n, float *a,
|
326
|
+
int *lda, float *x, int *incx);
|
327
|
+
|
328
|
+
int strsm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
329
|
+
int *n, float *alpha, float *a, int *lda, float *b,
|
330
|
+
int *ldb);
|
331
|
+
|
332
|
+
int strsv_(char *uplo, char *trans, char *diag, int *n, float *a,
|
333
|
+
int *lda, float *x, int *incx);
|
334
|
+
|
335
|
+
int zaxpy_(int *n, dcomplex *ca, dcomplex *cx, int *incx, dcomplex *cy,
|
336
|
+
int *incy);
|
337
|
+
|
338
|
+
int zcopy_(int *n, dcomplex *cx, int *incx, dcomplex *cy, int *incy);
|
339
|
+
|
340
|
+
int zdscal_(int *n, double *sa, dcomplex *cx, int *incx);
|
341
|
+
|
342
|
+
int zgbmv_(char *trans, int *m, int *n, int *kl, int *ku,
|
343
|
+
dcomplex *alpha, dcomplex *a, int *lda, dcomplex *x, int *incx,
|
344
|
+
dcomplex *beta, dcomplex *y, int *incy);
|
345
|
+
|
346
|
+
int zgemm_(char *transa, char *transb, int *m, int *n, int *k,
|
347
|
+
dcomplex *alpha, dcomplex *a, int *lda, dcomplex *b, int *ldb,
|
348
|
+
dcomplex *beta, dcomplex *c, int *ldc);
|
349
|
+
|
350
|
+
int zgemv_(char *trans, int *m, int *n, dcomplex *alpha, dcomplex *a,
|
351
|
+
int *lda, dcomplex *x, int *incx, dcomplex *beta, dcomplex *y,
|
352
|
+
int *incy);
|
353
|
+
|
354
|
+
int zgerc_(int *m, int *n, dcomplex *alpha, dcomplex *x, int *incx,
|
355
|
+
dcomplex *y, int *incy, dcomplex *a, int *lda);
|
356
|
+
|
357
|
+
int zgeru_(int *m, int *n, dcomplex *alpha, dcomplex *x, int *incx,
|
358
|
+
dcomplex *y, int *incy, dcomplex *a, int *lda);
|
359
|
+
|
360
|
+
int zhbmv_(char *uplo, int *n, int *k, dcomplex *alpha, dcomplex *a,
|
361
|
+
int *lda, dcomplex *x, int *incx, dcomplex *beta, dcomplex *y,
|
362
|
+
int *incy);
|
363
|
+
|
364
|
+
int zhemm_(char *side, char *uplo, int *m, int *n, dcomplex *alpha,
|
365
|
+
dcomplex *a, int *lda, dcomplex *b, int *ldb, dcomplex *beta,
|
366
|
+
dcomplex *c, int *ldc);
|
367
|
+
|
368
|
+
int zhemv_(char *uplo, int *n, dcomplex *alpha, dcomplex *a, int *lda,
|
369
|
+
dcomplex *x, int *incx, dcomplex *beta, dcomplex *y, int *incy);
|
370
|
+
|
371
|
+
int zher_(char *uplo, int *n, double *alpha, dcomplex *x, int *incx,
|
372
|
+
dcomplex *a, int *lda);
|
373
|
+
|
374
|
+
int zher2_(char *uplo, int *n, dcomplex *alpha, dcomplex *x, int *incx,
|
375
|
+
dcomplex *y, int *incy, dcomplex *a, int *lda);
|
376
|
+
|
377
|
+
int zher2k_(char *uplo, char *trans, int *n, int *k, dcomplex *alpha,
|
378
|
+
dcomplex *a, int *lda, dcomplex *b, int *ldb, double *beta,
|
379
|
+
dcomplex *c, int *ldc);
|
380
|
+
|
381
|
+
int zherk_(char *uplo, char *trans, int *n, int *k, double *alpha,
|
382
|
+
dcomplex *a, int *lda, double *beta, dcomplex *c, int *ldc);
|
383
|
+
|
384
|
+
int zhpmv_(char *uplo, int *n, dcomplex *alpha, dcomplex *ap, dcomplex *x,
|
385
|
+
int *incx, dcomplex *beta, dcomplex *y, int *incy);
|
386
|
+
|
387
|
+
int zhpr_(char *uplo, int *n, double *alpha, dcomplex *x, int *incx,
|
388
|
+
dcomplex *ap);
|
389
|
+
|
390
|
+
int zhpr2_(char *uplo, int *n, dcomplex *alpha, dcomplex *x, int *incx,
|
391
|
+
dcomplex *y, int *incy, dcomplex *ap);
|
392
|
+
|
393
|
+
int zrotg_(dcomplex *ca, dcomplex *cb, double *c, dcomplex *s);
|
394
|
+
|
395
|
+
int zscal_(int *n, dcomplex *ca, dcomplex *cx, int *incx);
|
396
|
+
|
397
|
+
int zswap_(int *n, dcomplex *cx, int *incx, dcomplex *cy, int *incy);
|
398
|
+
|
399
|
+
int zsymm_(char *side, char *uplo, int *m, int *n, dcomplex *alpha,
|
400
|
+
dcomplex *a, int *lda, dcomplex *b, int *ldb, dcomplex *beta,
|
401
|
+
dcomplex *c, int *ldc);
|
402
|
+
|
403
|
+
int zsyr2k_(char *uplo, char *trans, int *n, int *k, dcomplex *alpha,
|
404
|
+
dcomplex *a, int *lda, dcomplex *b, int *ldb, dcomplex *beta,
|
405
|
+
dcomplex *c, int *ldc);
|
406
|
+
|
407
|
+
int zsyrk_(char *uplo, char *trans, int *n, int *k, dcomplex *alpha,
|
408
|
+
dcomplex *a, int *lda, dcomplex *beta, dcomplex *c, int *ldc);
|
409
|
+
|
410
|
+
int ztbmv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
411
|
+
dcomplex *a, int *lda, dcomplex *x, int *incx);
|
412
|
+
|
413
|
+
int ztbsv_(char *uplo, char *trans, char *diag, int *n, int *k,
|
414
|
+
dcomplex *a, int *lda, dcomplex *x, int *incx);
|
415
|
+
|
416
|
+
int ztpmv_(char *uplo, char *trans, char *diag, int *n, dcomplex *ap,
|
417
|
+
dcomplex *x, int *incx);
|
418
|
+
|
419
|
+
int ztpsv_(char *uplo, char *trans, char *diag, int *n, dcomplex *ap,
|
420
|
+
dcomplex *x, int *incx);
|
421
|
+
|
422
|
+
int ztrmm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
423
|
+
int *n, dcomplex *alpha, dcomplex *a, int *lda, dcomplex *b,
|
424
|
+
int *ldb);
|
425
|
+
|
426
|
+
int ztrmv_(char *uplo, char *trans, char *diag, int *n, dcomplex *a,
|
427
|
+
int *lda, dcomplex *x, int *incx);
|
428
|
+
|
429
|
+
int ztrsm_(char *side, char *uplo, char *transa, char *diag, int *m,
|
430
|
+
int *n, dcomplex *alpha, dcomplex *a, int *lda, dcomplex *b,
|
431
|
+
int *ldb);
|
432
|
+
|
433
|
+
int ztrsv_(char *uplo, char *trans, char *diag, int *n, dcomplex *a,
|
434
|
+
int *lda, dcomplex *x, int *incx);
|
435
|
+
|
436
|
+
#ifdef __cplusplus
|
437
|
+
}
|
438
|
+
#endif
|