nmblas.h

См. документацию.

 
 
 
 
 
 
#ifndef _NMBLAS_H_INCLUDED_
#define _NMBLAS_H_INCLUDED_
 
#ifdef __cplusplus
        extern "C" {
#endif  
 
 
double nmblas_dasum(
    const int N,
    const double *X,
    const int INCX
);
 
enum nm_trans{nm_n=0,nm_t=1};
 
 
void nmblas_daxpy(
    const int N,
    const double A,
    const double *X,
    const int INCX,
    double *Y,
    const int INCY
); 
 
     
void nmblas_dcopy(
    const int N,
    const double* X,
    const int INCX,
    double* Y,
    const int INCY
);
 
double nmblas_ddot(
    const int N,
    const double* X,
    const int INCX,
    const double* Y,
    const int INCY
);
 
double nmblas_dnrm2(
    const int N,
    const double *x,
    const int INCX
);
 
void nmblas_drot(
    const int N,
    double *X,
    const int INCX,
    double *Y,
    const int INCY,
    const double C,
    const double S
); 
 
void nmblas_drotg(
    double *A, 
    double *B, 
    double *C, 
    double *S
);
 
void nmblas_drotm(
    const int N,
    double *X,
    const int INCX,
    double *Y,
    const int INCY,
    double *param
);
 
void nmblas_dscal(
    const int N,
    const double ALPHA,
    double*X,
    const int INCX
); 
 
double nmblas_dsdot(
    const int N,
    const float* X,
    const int INCX,
    const float* Y,
    const int INCY
);
 
void nmblas_dswap(
    const int N,
    double *X,
    const int INCX,
    double *Y,
    const int INCY
);
 
double nmblas_dznrm2(
    const int N,
    const double *X,
    const int INCX
);  
 
int nmblas_idamax(
    const int N,
    const double* X,
    const int INCX
);
 
int nmblas_isamax(
    const int N,
    const float* X,
    const int INCX
);
 
float nmblas_sasum(
    const int N,
    const float *X,
    const int INCX
);
    
void nmblas_saxpy(
    int N,
    const float A,
    const float *X,
    const int INCX,
    float *Y,
    const int INCY
);
 
float nmblas_scnrm2(
    const int N,
    const float* X,
    const int INCX
);
 
void nmblas_scopy(
    const int N,
    const float* X,
    const int  INCX,
    float* Y,
    const int INCY
);
 
float nmblas_sdot(
    const int N,
    const float *X,
    const int INCX,
    const float *Y,
    const int INCY
);
 
float nmblas_sdsdot(
    const int N,
    const float B,
    const float* X,
    const int INCX,
    const float* Y,
    const int INCY
);
 
float nmblas_snrm2(
    const int N,
    const float* X,
    const int INCX
);
 
void nmblas_srot(
    const int N,
    float *X,
    const int INCX,
    float *Y,
    const int INCY,
    const float C,
    const float S
);
 
void nmblas_srotm(
    const int N,
    float *X,
    const int INCX,
    float *Y,
    const int INCY,
    float *param
);
 
void nmblas_sscal(
    const int N,
    const float A,
    const float *X,
    const int INCX
); 
 
void nmblas_sswap(
    const int N,
    const float *X,
    const int INCX,
    const float *Y,
    const int INCY
);
 
 
//defgroup sgemv nmblas_sgemv
 
void nmblas_sgemv(
   const enum nm_trans        TRANS,
   const int                  M,
   const int                  N,
   const float               ALPHA,
   const float               * A,
   const int                  LDA,
   const float               * X,
   const int                  INCX,
   const float               BETA,
   float                     * Y,
   const int                  INCY
);
 
//defgroup dgemv nmblas_dgemv
 
void nmblas_dgemv(
   const enum nm_trans        TRANS,
   const int                  M,
   const int                  N,
   const double               ALPHA,
   const double               * A,
   const int                  LDA,
   const double               * X,
   const int                  INCX,
   const double               BETA,
   double                     * Y,
   const int                  INCY
);
 
//defgroup sger nmblas_sger
 
void nmblas_sger( 
    const int                  M,//row
   const int                  N,//coullum
   const float                ALPHA,
   const float                * X,
   const int                  INCX,
   const float                * Y,
   const int                  INCY,
   float                      * A,
   const int                  LDA
);
#include<nmblas/nmblas_sgemm.h>
 
void MullMatrix_f( 
    void*   A, 
    int     pI, 
    int     ldA, 
    void*   B,
    int     pK, 
    int     ldB,
    void*   C,
    int     pJ, 
    int     ldC,
    int     plusC 
);
 
 
#ifdef __cplusplus
        };
#endif
    
#endif // _INIT_H_INCLUDED_