File indexing completed on 2025-02-22 10:40:31
0001
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020 #ifndef __GSL_SPBLAS_H__
0021 #define __GSL_SPBLAS_H__
0022
0023 #include <stdlib.h>
0024
0025 #include <gsl/gsl_math.h>
0026 #include <gsl/gsl_vector.h>
0027 #include <gsl/gsl_matrix.h>
0028 #include <gsl/gsl_spmatrix.h>
0029 #include <gsl/gsl_blas.h>
0030
0031 #undef __BEGIN_DECLS
0032 #undef __END_DECLS
0033 #ifdef __cplusplus
0034 # define __BEGIN_DECLS extern "C" {
0035 # define __END_DECLS }
0036 #else
0037 # define __BEGIN_DECLS
0038 # define __END_DECLS
0039 #endif
0040
0041 __BEGIN_DECLS
0042
0043
0044
0045
0046
0047 int gsl_spblas_dgemv(const CBLAS_TRANSPOSE_t TransA, const double alpha,
0048 const gsl_spmatrix *A, const gsl_vector *x,
0049 const double beta, gsl_vector *y);
0050 int gsl_spblas_dgemm(const double alpha, const gsl_spmatrix *A,
0051 const gsl_spmatrix *B, gsl_spmatrix *C);
0052 size_t gsl_spblas_scatter(const gsl_spmatrix *A, const size_t j,
0053 const double alpha, int *w, double *x,
0054 const int mark, gsl_spmatrix *C, size_t nz);
0055
0056 __END_DECLS
0057
0058 #endif