LAPACK  3.10.1
LAPACK: Linear Algebra PACKage
cblas_drotm.c
Go to the documentation of this file.
1 #include "cblas.h"
2 #include "cblas_f77.h"
3 void cblas_drotm( const CBLAS_INT N, double *X, const CBLAS_INT incX, double *Y,
4  const CBLAS_INT incY, const double *P)
5 {
6 #ifdef F77_INT
7  F77_INT F77_N=N, F77_incX=incX, F77_incY=incY;
8 #else
9  #define F77_N N
10  #define F77_incX incX
11  #define F77_incY incY
12 #endif
13  F77_drotm( &F77_N, X, &F77_incX, Y, &F77_incY, P);
14 }
#define CBLAS_INT
Definition: cblas.h:23
#define F77_incX
#define F77_incY
#define F77_N
void cblas_drotm(const CBLAS_INT N, double *X, const CBLAS_INT incX, double *Y, const CBLAS_INT incY, const double *P)
Definition: cblas_drotm.c:3
#define F77_drotm(...)
Definition: cblas_f77.h:223
#define F77_INT
Definition: cblas_f77.h:32
#define N
Definition: example_user.c:10