OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
cblas_cswap.c File Reference
#include "cblas.h"
#include "cblas_f77.h"

Go to the source code of this file.

Macros

#define F77_N   N
#define F77_incX   incX
#define F77_incY   incY

Functions

void cblas_cswap (const CBLAS_INT N, void *X, const CBLAS_INT incX, void *Y, const CBLAS_INT incY)

Macro Definition Documentation

◆ F77_incX

#define F77_incX   incX

◆ F77_incY

#define F77_incY   incY

◆ F77_N

#define F77_N   N

Function Documentation

◆ cblas_cswap()

void cblas_cswap ( const CBLAS_INT N,
void * X,
const CBLAS_INT incX,
void * Y,
const CBLAS_INT incY )

Definition at line 11 of file cblas_cswap.c.

13{
14#ifdef F77_INT
15 F77_INT F77_N=N, F77_incX=incX, F77_incY=incY;
16#else
17 #define F77_N N
18 #define F77_incX incX
19 #define F77_incY incY
20#endif
21 F77_cswap( &F77_N, X, &F77_incX, Y, &F77_incY);
22}
#define F77_incX
#define F77_incY
#define F77_N
#define F77_cswap(...)
Definition cblas_f77.h:238
#define F77_INT
Definition cblas_f77.h:32
#define N