|
26 | 26 | * Applies a plane rotation. |
27 | 27 | * |
28 | 28 | * @param N number of indexed elements |
29 | | -* @param CX first input array |
30 | | -* @param strideX CX stride length |
31 | | -* @param CY second input array |
32 | | -* @param strideY CY stride length |
| 29 | +* @param X first input array |
| 30 | +* @param strideX X stride length |
| 31 | +* @param Y second input array |
| 32 | +* @param strideY Y stride length |
33 | 33 | * @param c cosine of the angle of rotation |
34 | 34 | * @param s sine of the angle of rotation |
35 | 35 | */ |
36 | | -void API_SUFFIX(c_csrot)( const CBLAS_INT N, void *CX, const CBLAS_INT strideX, void *CY, const CBLAS_INT strideY, const float c, const float s ) { |
37 | | - API_SUFFIX(cblas_csrot)( N, CX, strideX, CY, strideY, c, s ); |
| 36 | +void API_SUFFIX(c_csrot)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY, const float c, const float s ) { |
| 37 | + API_SUFFIX(cblas_csrot)( N, X, strideX, Y, strideY, c, s ); |
38 | 38 | } |
39 | 39 |
|
40 | 40 | /** |
41 | 41 | * Applies a plane rotation using alternative indexing semantics. |
42 | 42 | * |
43 | 43 | * @param N number of indexed elements |
44 | | -* @param CX first input array |
45 | | -* @param strideX CX stride length |
46 | | -* @param offsetX starting index for CX |
47 | | -* @param CY second input array |
48 | | -* @param strideY CY stride length |
49 | | -* @param offsetY starting index for CY |
| 44 | +* @param X first input array |
| 45 | +* @param strideX X stride length |
| 46 | +* @param offsetX starting index for X |
| 47 | +* @param Y second input array |
| 48 | +* @param strideY Y stride length |
| 49 | +* @param offsetY starting index for Y |
50 | 50 | * @param c cosine of the angle of rotation |
51 | 51 | * @param s sine of the angle of rotation |
52 | 52 | */ |
53 | | -void API_SUFFIX(c_csrot_ndarray)( const CBLAS_INT N, void *CX, const CBLAS_INT strideX, const CBLAS_INT offsetX, void *CY, const CBLAS_INT strideY, const CBLAS_INT offsetY, const float c, const float s ) { |
54 | | - stdlib_complex64_t *cx = (stdlib_complex64_t *)CX; |
55 | | - stdlib_complex64_t *cy = (stdlib_complex64_t *)CY; |
| 53 | +void API_SUFFIX(c_csrot_ndarray)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, const CBLAS_INT offsetX, void *Y, const CBLAS_INT strideY, const CBLAS_INT offsetY, const float c, const float s ) { |
| 54 | + stdlib_complex64_t *x = (stdlib_complex64_t *)X; |
| 55 | + stdlib_complex64_t *y = (stdlib_complex64_t *)Y; |
56 | 56 |
|
57 | | - cx += stdlib_strided_min_view_buffer_index( N, strideX, offsetX ); // adjust array pointer |
58 | | - cy += stdlib_strided_min_view_buffer_index( N, strideY, offsetY ); // adjust array pointer |
59 | | - API_SUFFIX(cblas_csrot)( N, (void *)cx, strideX, (void *)cy, strideY, c, s ); |
| 57 | + x += stdlib_strided_min_view_buffer_index( N, strideX, offsetX ); // adjust array pointer |
| 58 | + y += stdlib_strided_min_view_buffer_index( N, strideY, offsetY ); // adjust array pointer |
| 59 | + API_SUFFIX(cblas_csrot)( N, (void *)x, strideX, (void *)y, strideY, c, s ); |
60 | 60 | } |
0 commit comments