diff --git a/lapack_api/include/chameleon/chameleon_zlapack.h b/lapack_api/include/chameleon/chameleon_zlapack.h
index c7da8cf492fdde13e845cc317b75a689a7caab2a..5f8bdae88265b24ce6b4ccf03e11a9cdcf62ef11 100644
--- a/lapack_api/include/chameleon/chameleon_zlapack.h
+++ b/lapack_api/include/chameleon/chameleon_zlapack.h
@@ -27,57 +27,57 @@ BEGIN_C_DECLS
/**
* Declarations of math functions (LAPACK layout, Cblas/Lapacke interface) - alphabetical order
*/
-void CHAMELEON_cblas_zgemm( const CBLAS_ORDER order, const CBLAS_TRANSPOSE transA, const CBLAS_TRANSPOSE transB,
- const int M, const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zhemm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zher2k( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const double beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zherk( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const double alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const double beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zsymm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zsyr2k( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_zsyrk( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc );
-
-void CHAMELEON_cblas_ztrmm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const CBLAS_TRANSPOSE trans, const CBLAS_DIAG diag,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb );
-
-void CHAMELEON_cblas_ztrsm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const CBLAS_TRANSPOSE trans, const CBLAS_DIAG diag,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb );
+void CHAMELEON_cblas_zgemm( CBLAS_ORDER order, CBLAS_TRANSPOSE transA, CBLAS_TRANSPOSE transB,
+ int M, int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zhemm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zher2k( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ double beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zherk( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ double alpha, const CHAMELEON_Complex64_t *A, int lda,
+ double beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zsymm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zsyr2k( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_zsyrk( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc );
+
+void CHAMELEON_cblas_ztrmm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ CBLAS_TRANSPOSE trans, CBLAS_DIAG diag,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ CHAMELEON_Complex64_t *B, int ldb );
+
+void CHAMELEON_cblas_ztrsm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ CBLAS_TRANSPOSE trans, CBLAS_DIAG diag,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ CHAMELEON_Complex64_t *B, int ldb );
int CHAMELEON_lapacke_zlacpy( int matrix_layout, char uplo, int M, int N,
const CHAMELEON_Complex64_t *A, int lda,
@@ -96,8 +96,8 @@ double CHAMELEON_lapacke_zlantr( int matrix_layout, char norm, char uplo, char d
int M, int N, const CHAMELEON_Complex64_t *A, int lda );
int CHAMELEON_lapacke_zlaset( int matrix_layout, char uplo, int M, int N,
- const CHAMELEON_Complex64_t alpha, const CHAMELEON_Complex64_t beta,
- CHAMELEON_Complex64_t *A, int lda );
+ CHAMELEON_Complex64_t alpha, CHAMELEON_Complex64_t beta,
+ CHAMELEON_Complex64_t *A, int lda );
int CHAMELEON_lapacke_zlauum( int matrix_layout, char uplo, int N,
CHAMELEON_Complex64_t *A, int lda );
diff --git a/lapack_api/src/lapack_api_common.c b/lapack_api/src/lapack_api_common.c
index cdf37d088388142e3102e225ede5a91801434a4b..1fb71106cafd3e5919f3e30695b2cb76b94fcf5d 100644
--- a/lapack_api/src/lapack_api_common.c
+++ b/lapack_api/src/lapack_api_common.c
@@ -24,7 +24,7 @@
* @return The CBLAS equivalent parameter (CblasNoTrans, CblasTrans or
* CblasConjTrans).
*/
-int chameleon_blastocblas_trans(const char* trans)
+int chameleon_blastocblas_trans(const char *trans)
{
if ( (*trans == 'N') || (*trans == 'n') ) {
return CblasNoTrans;
@@ -44,7 +44,7 @@ int chameleon_blastocblas_trans(const char* trans)
* @param[in] uplo The input char BLAS side parameter
* @return The CBLAS equivalent parameter (CblasLeft or CblasRight).
*/
-int chameleon_blastocblas_side(const char* side)
+int chameleon_blastocblas_side(const char *side)
{
if ( (*side == 'L') || (*side == 'l') ) {
return CblasLeft;
@@ -62,7 +62,7 @@ int chameleon_blastocblas_side(const char* side)
* @param[in] uplo The input char BLAS uplo parameter
* @return The CBLAS equivalent parameter (CblasUpper or CblasLower).
*/
-int chameleon_blastocblas_uplo(const char* uplo)
+int chameleon_blastocblas_uplo(const char *uplo)
{
if ( (*uplo == 'U') || (*uplo == 'u') ) {
return CblasUpper;
@@ -80,7 +80,7 @@ int chameleon_blastocblas_uplo(const char* uplo)
* @param[in] diag The input char BLAS diag parameter
* @return The CBLAS equivalent parameter (CblasUnit or CblasNonUnit).
*/
-int chameleon_blastocblas_diag(const char* diag)
+int chameleon_blastocblas_diag(const char *diag)
{
if ( (*diag == 'U') || (*diag == 'u') ) {
return CblasUnit;
@@ -98,7 +98,7 @@ int chameleon_blastocblas_diag(const char* diag)
* @param[in] norm The input char LAPACK norm parameter
* @return The Chameleon equivalent parameter (ChamMaxNorm, ChamOneNorm, etc).
*/
-int chameleon_lapacktochameleon_norm(const char* norm)
+int chameleon_lapacktochameleon_norm(const char *norm)
{
if ( (*norm == 'M') || (*norm == 'm') ) {
return ChamMaxNorm;
diff --git a/lapack_api/src/lapack_zgemm.c b/lapack_api/src/lapack_zgemm.c
index 8b4d2a8470f2aa212bf90baaa8bb53a8e0f0c287..92dc839ac3d0e1a514638be50c3abec30ae44f6a 100644
--- a/lapack_api/src/lapack_zgemm.c
+++ b/lapack_api/src/lapack_zgemm.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zgemm CHAMELEON_GLOBAL( chameleon_blas_zgemm, CHAMELEON_BLAS_ZGEMM )
-void CHAMELEON_blas_zgemm ( const char* transa, const char* transb,
- const int* m, const int* n, const int* k,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb,
- const CHAMELEON_Complex64_t* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zgemm ( const char *transa, const char *transb,
+ const int *m, const int *n, const int *k,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *b, const int *ldb,
+ const CHAMELEON_Complex64_t *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zgemm( CblasColMajor,
chameleon_blastocblas_trans(transa),
@@ -119,11 +119,11 @@ void CHAMELEON_blas_zgemm ( const char* transa, const char* transb,
* @sa CHAMELEON_cblas_sgemm
*
*/
-void CHAMELEON_cblas_zgemm( const CBLAS_ORDER order, const CBLAS_TRANSPOSE transA, const CBLAS_TRANSPOSE transB,
- const int M, const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zgemm( CBLAS_ORDER order, CBLAS_TRANSPOSE transA, CBLAS_TRANSPOSE transB,
+ int M, int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zgemm", "illegal value of order" );
diff --git a/lapack_api/src/lapack_zhemm.c b/lapack_api/src/lapack_zhemm.c
index 672fc286e8c64fb81dbf18bc0214b0e3cb25e885..884782198f9f18c96a55daa504a2764cc4b1daa9 100644
--- a/lapack_api/src/lapack_zhemm.c
+++ b/lapack_api/src/lapack_zhemm.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zhemm CHAMELEON_GLOBAL( chameleon_blas_zhemm, CHAMELEON_BLAS_ZHEMM )
-void CHAMELEON_blas_zhemm ( const char* side, const char* uplo,
- const int* m, const int* n,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb,
- const CHAMELEON_Complex64_t* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zhemm ( const char *side, const char *uplo,
+ const int *m, const int *n,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *b, const int *ldb,
+ const CHAMELEON_Complex64_t *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zhemm( CblasColMajor,
chameleon_blastocblas_side(side),
@@ -117,11 +117,11 @@ void CHAMELEON_blas_zhemm ( const char* side, const char* uplo,
* @sa CHAMELEON_cblas_shemm
*
*/
-void CHAMELEON_cblas_zhemm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zhemm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zhemm", "illegal value of order" );
diff --git a/lapack_api/src/lapack_zher2k.c b/lapack_api/src/lapack_zher2k.c
index 474894cfef9581a9fdbbce4534272172ceb0f28c..62ea46b7f93861c55cca7edf3529f3cc48bd20d4 100644
--- a/lapack_api/src/lapack_zher2k.c
+++ b/lapack_api/src/lapack_zher2k.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zher2k CHAMELEON_GLOBAL( chameleon_blas_zher2k, CHAMELEON_BLAS_ZHER2K )
-void CHAMELEON_blas_zher2k ( const char* uplo, const char* trans,
- const int* n, const int* k,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb,
- const double* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zher2k ( const char *uplo, const char *trans,
+ const int *n, const int *k,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *b, const int *ldb,
+ const double *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zher2k( CblasColMajor,
chameleon_blastocblas_uplo(uplo),
@@ -119,11 +119,11 @@ void CHAMELEON_blas_zher2k ( const char* uplo, const char* trans,
* @sa CHAMELEON_cblas_sher2k
*
*/
-void CHAMELEON_cblas_zher2k( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const double beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zher2k( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ double beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zher2k", "illegal value of order" );
diff --git a/lapack_api/src/lapack_zherk.c b/lapack_api/src/lapack_zherk.c
index 984ec6b47fc0943be6eb136e46b2eb41f1b42b15..f60bec85b3298de9200f726dc87e1518c291547a 100644
--- a/lapack_api/src/lapack_zherk.c
+++ b/lapack_api/src/lapack_zherk.c
@@ -23,10 +23,10 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zherk CHAMELEON_GLOBAL( chameleon_blas_zherk, CHAMELEON_BLAS_ZHERK )
-void CHAMELEON_blas_zherk ( const char* uplo, const char* trans,
- const int* n, const int* k,
- const double* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const double* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zherk ( const char *uplo, const char *trans,
+ const int *n, const int *k,
+ const double *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const double *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zherk( CblasColMajor,
chameleon_blastocblas_uplo(uplo),
@@ -107,10 +107,10 @@ void CHAMELEON_blas_zherk ( const char* uplo, const char* trans,
* @sa CHAMELEON_cblas_sherk
*
*/
-void CHAMELEON_cblas_zherk( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const double alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const double beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zherk( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ double alpha, const CHAMELEON_Complex64_t *A, int lda,
+ double beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zherk", "illegal value of order" );
diff --git a/lapack_api/src/lapack_zlacpy.c b/lapack_api/src/lapack_zlacpy.c
index 3d212a957b7f623d8c3ef40865f8a593e009054b..81bf4ba7340007ca7535e340e8e21668e1cd3bb3 100644
--- a/lapack_api/src/lapack_zlacpy.c
+++ b/lapack_api/src/lapack_zlacpy.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlacpy CHAMELEON_GLOBAL( chameleon_lapack_zlacpy, CHAMELEON_LAPACK_ZLACPY )
-void CHAMELEON_lapack_zlacpy ( const char* uplo, const int* m, const int* n,
- const CHAMELEON_Complex64_t* a, const int* lda,
- CHAMELEON_Complex64_t* b, const int* ldb )
+void CHAMELEON_lapack_zlacpy ( const char *uplo, const int *m, const int *n,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ CHAMELEON_Complex64_t *b, const int *ldb )
{
CHAMELEON_lapacke_zlacpy( CblasColMajor,
*uplo, *m, *n,
diff --git a/lapack_api/src/lapack_zlange.c b/lapack_api/src/lapack_zlange.c
index 4f93e7982fff627562e01cdfdf6c5ea3f7fbd61c..44465d302c5cdd11e57ebba58b06daf2ca9c2b36 100644
--- a/lapack_api/src/lapack_zlange.c
+++ b/lapack_api/src/lapack_zlange.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlange CHAMELEON_GLOBAL( chameleon_lapack_zlange, CHAMELEON_LAPACK_ZLANGE )
-double CHAMELEON_lapack_zlange ( const char* norm, const int* m, const int* n,
- const CHAMELEON_Complex64_t* a, const int* lda,
- double* work )
+double CHAMELEON_lapack_zlange ( const char *norm, const int *m, const int *n,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ double *work )
{
(void)work;
return CHAMELEON_lapacke_zlange( CblasColMajor,
diff --git a/lapack_api/src/lapack_zlanhe.c b/lapack_api/src/lapack_zlanhe.c
index bb129810d37aa4e686870dd2fd5970275c4a8d60..bb7c80bcb74848c3b29973034e828d79f92efde1 100644
--- a/lapack_api/src/lapack_zlanhe.c
+++ b/lapack_api/src/lapack_zlanhe.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlanhe CHAMELEON_GLOBAL( chameleon_lapack_zlanhe, CHAMELEON_LAPACK_ZLANHE )
-double CHAMELEON_lapack_zlanhe ( const char* norm, const char* uplo, const int* n,
- const CHAMELEON_Complex64_t* a, const int* lda,
- double* work )
+double CHAMELEON_lapack_zlanhe ( const char *norm, const char *uplo, const int *n,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ double *work )
{
(void)work;
return CHAMELEON_lapacke_zlanhe( CblasColMajor,
diff --git a/lapack_api/src/lapack_zlansy.c b/lapack_api/src/lapack_zlansy.c
index 51e95d158b6747d9116c84a152bc7c3487872d39..e7d00e1e942f28ec43cd085c1aa2fa7f7c572d00 100644
--- a/lapack_api/src/lapack_zlansy.c
+++ b/lapack_api/src/lapack_zlansy.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlansy CHAMELEON_GLOBAL( chameleon_lapack_zlansy, CHAMELEON_LAPACK_ZLANSY )
-double CHAMELEON_lapack_zlansy ( const char* norm, const char* uplo, const int* n,
- const CHAMELEON_Complex64_t* a, const int* lda,
- double* work )
+double CHAMELEON_lapack_zlansy ( const char *norm, const char *uplo, const int *n,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ double *work )
{
(void)work;
return CHAMELEON_lapacke_zlansy( CblasColMajor,
diff --git a/lapack_api/src/lapack_zlantr.c b/lapack_api/src/lapack_zlantr.c
index 81fbf09af3575251e0ab8d242a366b1f95a47ac0..1572b0a32100c81a09f03b303fe8ec63384fc29c 100644
--- a/lapack_api/src/lapack_zlantr.c
+++ b/lapack_api/src/lapack_zlantr.c
@@ -23,10 +23,10 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlantr CHAMELEON_GLOBAL( chameleon_lapack_zlantr, CHAMELEON_LAPACK_ZLANTR )
-double CHAMELEON_lapack_zlantr ( const char* norm, const char* uplo, const char* diag,
- const int* m, const int* n,
- const CHAMELEON_Complex64_t* a, const int* lda,
- double* work )
+double CHAMELEON_lapack_zlantr ( const char *norm, const char *uplo, const char *diag,
+ const int *m, const int *n,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ double *work )
{
(void)work;
return CHAMELEON_lapacke_zlantr( CblasColMajor,
diff --git a/lapack_api/src/lapack_zlaset.c b/lapack_api/src/lapack_zlaset.c
index b2d08bac68cfd7bbc5bb42a62d280f4dd62c1d03..b1ee6eb031583b6e8deddece0079455d88255137 100644
--- a/lapack_api/src/lapack_zlaset.c
+++ b/lapack_api/src/lapack_zlaset.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlaset CHAMELEON_GLOBAL( chameleon_lapack_zlaset, CHAMELEON_LAPACK_ZLASET )
-void CHAMELEON_lapack_zlaset ( const char* uplo, const int* m, const int* n,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* beta,
- CHAMELEON_Complex64_t* a, const int* lda )
+void CHAMELEON_lapack_zlaset ( const char *uplo, const int *m, const int *n,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *beta,
+ CHAMELEON_Complex64_t *a, const int *lda )
{
CHAMELEON_lapacke_zlaset( CblasColMajor,
*uplo, *m, *n,
@@ -90,8 +90,8 @@ void CHAMELEON_lapack_zlaset ( const char* uplo, const int* m, const int* n,
*
*/
int CHAMELEON_lapacke_zlaset( int matrix_layout, char uplo, int M, int N,
- const CHAMELEON_Complex64_t alpha, const CHAMELEON_Complex64_t beta,
- CHAMELEON_Complex64_t *A, int lda )
+ CHAMELEON_Complex64_t alpha, CHAMELEON_Complex64_t beta,
+ CHAMELEON_Complex64_t *A, int lda )
{
if ( matrix_layout != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_lapacke_zlaset", "illegal value of matrix_layout" );
diff --git a/lapack_api/src/lapack_zlauum.c b/lapack_api/src/lapack_zlauum.c
index c3a30eae0c6bdb5d5aafef4e36f78b667babcb61..440ba0fceee0127b1f6292e327034798be53ebfa 100644
--- a/lapack_api/src/lapack_zlauum.c
+++ b/lapack_api/src/lapack_zlauum.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zlauum CHAMELEON_GLOBAL( chameleon_lapack_zlauum, CHAMELEON_LAPACK_ZLAUUM )
-void CHAMELEON_lapack_zlauum ( const char* uplo, const int* n,
- CHAMELEON_Complex64_t* a, const int* lda,
- int* info )
+void CHAMELEON_lapack_zlauum ( const char *uplo, const int *n,
+ CHAMELEON_Complex64_t *a, const int *lda,
+ int *info )
{
*info = CHAMELEON_lapacke_zlauum( CblasColMajor,
*uplo, *n, a, *lda );
@@ -93,5 +93,5 @@ int CHAMELEON_lapacke_zlauum( int matrix_layout, char uplo, int N,
}
return CHAMELEON_zlauum( (cham_uplo_t)chameleon_blastocblas_uplo(&uplo), N,
- (CHAMELEON_Complex64_t *)A, lda );
+ A, lda );
}
diff --git a/lapack_api/src/lapack_zposv.c b/lapack_api/src/lapack_zposv.c
index 13d1192f5b9e8d2a56bc54b198e69d480f38a837..1b7c51437ee087c7c50d6d9b0e0141b18daf211d 100644
--- a/lapack_api/src/lapack_zposv.c
+++ b/lapack_api/src/lapack_zposv.c
@@ -23,10 +23,10 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zposv CHAMELEON_GLOBAL( chameleon_lapack_zposv, CHAMELEON_LAPACK_ZPOSV )
-void CHAMELEON_lapack_zposv ( const char* uplo, const int* n, const int* nrhs,
- CHAMELEON_Complex64_t* a, const int* lda,
- CHAMELEON_Complex64_t* b, const int* ldb,
- int* info )
+void CHAMELEON_lapack_zposv ( const char *uplo, const int *n, const int *nrhs,
+ CHAMELEON_Complex64_t *a, const int *lda,
+ CHAMELEON_Complex64_t *b, const int *ldb,
+ int *info )
{
*info = CHAMELEON_lapacke_zposv( CblasColMajor,
*uplo, *n, *nrhs, a, *lda, b, *ldb );
diff --git a/lapack_api/src/lapack_zpotrf.c b/lapack_api/src/lapack_zpotrf.c
index 2fb7de7290e18cd2c1ee4e8e63a57489398162fb..f3d6cd1cdee8061e995899f7788cfc99ee034eff 100644
--- a/lapack_api/src/lapack_zpotrf.c
+++ b/lapack_api/src/lapack_zpotrf.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zpotrf CHAMELEON_GLOBAL( chameleon_lapack_zpotrf, CHAMELEON_LAPACK_ZPOTRF )
-void CHAMELEON_lapack_zpotrf ( const char* uplo, const int* n,
- CHAMELEON_Complex64_t* a, const int* lda,
- int* info )
+void CHAMELEON_lapack_zpotrf ( const char *uplo, const int *n,
+ CHAMELEON_Complex64_t *a, const int *lda,
+ int *info )
{
*info = CHAMELEON_lapacke_zpotrf( CblasColMajor, *uplo, *n, a, *lda );
}
diff --git a/lapack_api/src/lapack_zpotri.c b/lapack_api/src/lapack_zpotri.c
index 0f5d41ff39cc7f69bf0c7b19dc72a567f33dfa4c..f0f7ab75b9c243b5070adf5f55f867c640bcd73a 100644
--- a/lapack_api/src/lapack_zpotri.c
+++ b/lapack_api/src/lapack_zpotri.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zpotri CHAMELEON_GLOBAL( chameleon_lapack_zpotri, CHAMELEON_LAPACK_ZPOTRI )
-void CHAMELEON_lapack_zpotri ( const char* uplo, const int* n,
- CHAMELEON_Complex64_t* a, const int* lda,
- int* info )
+void CHAMELEON_lapack_zpotri ( const char *uplo, const int *n,
+ CHAMELEON_Complex64_t *a, const int *lda,
+ int *info )
{
*info = CHAMELEON_lapacke_zpotri( CblasColMajor, *uplo, *n, a, *lda );
}
diff --git a/lapack_api/src/lapack_zpotrs.c b/lapack_api/src/lapack_zpotrs.c
index f6a8841e24769e21614dfda59600878f197dae41..f27196f27e3e050a0e78486636cbe3ebe69be40e 100644
--- a/lapack_api/src/lapack_zpotrs.c
+++ b/lapack_api/src/lapack_zpotrs.c
@@ -23,10 +23,10 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_zpotrs CHAMELEON_GLOBAL( chameleon_lapack_zpotrs, CHAMELEON_LAPACK_ZPOTRS )
-void CHAMELEON_lapack_zpotrs ( const char* uplo, const int* n, const int* nrhs,
- const CHAMELEON_Complex64_t* a, const int* lda,
- CHAMELEON_Complex64_t* b, const int* ldb,
- int* info )
+void CHAMELEON_lapack_zpotrs ( const char *uplo, const int *n, const int *nrhs,
+ const CHAMELEON_Complex64_t *a, const int *lda,
+ CHAMELEON_Complex64_t *b, const int *ldb,
+ int *info )
{
*info = CHAMELEON_lapacke_zpotrs( CblasColMajor,
*uplo, *n, *nrhs, a, *lda, b, *ldb );
diff --git a/lapack_api/src/lapack_zsymm.c b/lapack_api/src/lapack_zsymm.c
index cc648c11224f4ace6254a928b3cc27df1f426e70..9bd3740f455e937f5c42a825b5a1445da20f4d5d 100644
--- a/lapack_api/src/lapack_zsymm.c
+++ b/lapack_api/src/lapack_zsymm.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zsymm CHAMELEON_GLOBAL( chameleon_blas_zsymm, CHAMELEON_BLAS_ZSYMM )
-void CHAMELEON_blas_zsymm ( const char* side, const char* uplo,
- const int* m, const int* n,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb,
- const CHAMELEON_Complex64_t* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zsymm ( const char *side, const char *uplo,
+ const int *m, const int *n,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *b, const int *ldb,
+ const CHAMELEON_Complex64_t *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zsymm( CblasColMajor,
chameleon_blastocblas_side(side),
@@ -117,11 +117,11 @@ void CHAMELEON_blas_zsymm ( const char* side, const char* uplo,
* @sa CHAMELEON_cblas_ssymm
*
*/
-void CHAMELEON_cblas_zsymm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zsymm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zsymm", "illegal value of order" );
@@ -139,5 +139,5 @@ void CHAMELEON_cblas_zsymm( const CBLAS_ORDER order, const CBLAS_SIDE side, cons
CHAMELEON_zsymm( (cham_side_t)side, (cham_uplo_t)uplo, M, N,
alphac, (CHAMELEON_Complex64_t *)A, lda,
(CHAMELEON_Complex64_t *)B, ldb,
- betac, (CHAMELEON_Complex64_t *)C, ldc );
+ betac, C, ldc );
}
diff --git a/lapack_api/src/lapack_zsyr2k.c b/lapack_api/src/lapack_zsyr2k.c
index dc962461b060232477e3fa37d25ff3b83825c5cc..e43fee96bed2ee4a8639cd4fbbc190dd9c02bd45 100644
--- a/lapack_api/src/lapack_zsyr2k.c
+++ b/lapack_api/src/lapack_zsyr2k.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zsyr2k CHAMELEON_GLOBAL( chameleon_blas_zsyr2k, CHAMELEON_BLAS_ZSYR2K )
-void CHAMELEON_blas_zsyr2k ( const char* uplo, const char* trans,
- const int* n, const int* k,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb,
- const CHAMELEON_Complex64_t* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zsyr2k ( const char *uplo, const char *trans,
+ const int *n, const int *k,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *b, const int *ldb,
+ const CHAMELEON_Complex64_t *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zsyr2k( CblasColMajor,
chameleon_blastocblas_uplo(uplo),
@@ -115,11 +115,11 @@ void CHAMELEON_blas_zsyr2k ( const char* uplo, const char* trans,
* @sa CHAMELEON_cblas_ssyr2k
*
*/
-void CHAMELEON_cblas_zsyr2k( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zsyr2k( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const CHAMELEON_Complex64_t *B, int ldb,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zsyr2k", "illegal value of order" );
@@ -137,5 +137,5 @@ void CHAMELEON_cblas_zsyr2k( const CBLAS_ORDER order, const CBLAS_UPLO uplo, con
CHAMELEON_zsyr2k( (cham_uplo_t)uplo, (cham_trans_t)trans, N, K,
alphac, (CHAMELEON_Complex64_t *)A, lda,
(CHAMELEON_Complex64_t *)B, ldb,
- betac, (CHAMELEON_Complex64_t *)C, ldc );
+ betac, C, ldc );
}
diff --git a/lapack_api/src/lapack_zsyrk.c b/lapack_api/src/lapack_zsyrk.c
index f698e0026dbe9f887695c5c179a5829639a18647..70d6de8f650407cc781e1d495d3bdbe5deaffca4 100644
--- a/lapack_api/src/lapack_zsyrk.c
+++ b/lapack_api/src/lapack_zsyrk.c
@@ -23,10 +23,10 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_zsyrk CHAMELEON_GLOBAL( chameleon_blas_zsyrk, CHAMELEON_BLAS_ZSYRK )
-void CHAMELEON_blas_zsyrk ( const char* uplo, const char* trans,
- const int* n, const int* k,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* beta, CHAMELEON_Complex64_t* c, const int* ldc )
+void CHAMELEON_blas_zsyrk ( const char *uplo, const char *trans,
+ const int *n, const int *k,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ const CHAMELEON_Complex64_t *beta, CHAMELEON_Complex64_t *c, const int *ldc )
{
CHAMELEON_cblas_zsyrk( CblasColMajor,
chameleon_blastocblas_uplo(uplo),
@@ -105,10 +105,10 @@ void CHAMELEON_blas_zsyrk ( const char* uplo, const char* trans,
* @sa CHAMELEON_cblas_ssyrk
*
*/
-void CHAMELEON_cblas_zsyrk( const CBLAS_ORDER order, const CBLAS_UPLO uplo, const CBLAS_TRANSPOSE trans,
- const int N, const int K,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const void *beta, CHAMELEON_Complex64_t *C, const int ldc )
+void CHAMELEON_cblas_zsyrk( CBLAS_ORDER order, CBLAS_UPLO uplo, CBLAS_TRANSPOSE trans,
+ int N, int K,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ const void *beta, CHAMELEON_Complex64_t *C, int ldc )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_zsyrk", "illegal value of order" );
@@ -125,5 +125,5 @@ void CHAMELEON_cblas_zsyrk( const CBLAS_ORDER order, const CBLAS_UPLO uplo, cons
CHAMELEON_zsyrk( (cham_uplo_t)uplo, (cham_trans_t)trans, N, K,
alphac, (CHAMELEON_Complex64_t *)A, lda,
- betac, (CHAMELEON_Complex64_t *)C, ldc );
+ betac, C, ldc );
}
diff --git a/lapack_api/src/lapack_ztrmm.c b/lapack_api/src/lapack_ztrmm.c
index ffb98322642f752a7439d012a3ffaced3d501cc8..daed27fda2ef51108960b940cdff789bd14452f4 100644
--- a/lapack_api/src/lapack_ztrmm.c
+++ b/lapack_api/src/lapack_ztrmm.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_ztrmm CHAMELEON_GLOBAL( chameleon_blas_ztrmm, CHAMELEON_BLAS_ZTRMM )
-void CHAMELEON_blas_ztrmm ( const char* side, const char* uplo,
- const char* trans, const char* diag,
- const int* m, const int* n,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb )
+void CHAMELEON_blas_ztrmm ( const char *side, const char *uplo,
+ const char *trans, const char *diag,
+ const int *m, const int *n,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ CHAMELEON_Complex64_t *b, const int *ldb )
{
CHAMELEON_cblas_ztrmm( CblasColMajor,
chameleon_blastocblas_side(side),
@@ -112,11 +112,11 @@ void CHAMELEON_blas_ztrmm ( const char* side, const char* uplo,
* @sa CHAMELEON_cblas_strmm
*
*/
-void CHAMELEON_cblas_ztrmm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const CBLAS_TRANSPOSE trans, const CBLAS_DIAG diag,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb )
+void CHAMELEON_cblas_ztrmm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ CBLAS_TRANSPOSE trans, CBLAS_DIAG diag,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ CHAMELEON_Complex64_t *B, int ldb )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_ztrmm", "illegal value of order" );
@@ -133,5 +133,5 @@ void CHAMELEON_cblas_ztrmm( const CBLAS_ORDER order, const CBLAS_SIDE side, cons
(cham_trans_t)trans, (cham_diag_t)diag,
M, N,
alphac, (CHAMELEON_Complex64_t *)A, lda,
- (CHAMELEON_Complex64_t *)B, ldb );
+ B, ldb );
}
diff --git a/lapack_api/src/lapack_ztrsm.c b/lapack_api/src/lapack_ztrsm.c
index 712db9e4b228e29ec8e8974f7a24260c85db8304..074a01c09b2013325ec8d435b7e078b5006a0a87 100644
--- a/lapack_api/src/lapack_ztrsm.c
+++ b/lapack_api/src/lapack_ztrsm.c
@@ -23,11 +23,11 @@
/* Fortran BLAS interface */
#define CHAMELEON_blas_ztrsm CHAMELEON_GLOBAL( chameleon_blas_ztrsm, CHAMELEON_BLAS_ZTRSM )
-void CHAMELEON_blas_ztrsm ( const char* side, const char* uplo,
- const char* trans, const char* diag,
- const int* m, const int* n,
- const CHAMELEON_Complex64_t* alpha, const CHAMELEON_Complex64_t* a, const int* lda,
- const CHAMELEON_Complex64_t* b, const int* ldb )
+void CHAMELEON_blas_ztrsm ( const char *side, const char *uplo,
+ const char *trans, const char *diag,
+ const int *m, const int *n,
+ const CHAMELEON_Complex64_t *alpha, const CHAMELEON_Complex64_t *a, const int *lda,
+ CHAMELEON_Complex64_t *b, const int *ldb )
{
CHAMELEON_cblas_ztrsm( CblasColMajor,
chameleon_blastocblas_side(side),
@@ -132,11 +132,11 @@ void CHAMELEON_blas_ztrsm ( const char* side, const char* uplo,
* @sa CHAMELEON_cblas_strsm
*
*/
-void CHAMELEON_cblas_ztrsm( const CBLAS_ORDER order, const CBLAS_SIDE side, const CBLAS_UPLO uplo,
- const CBLAS_TRANSPOSE trans, const CBLAS_DIAG diag,
- const int M, const int N,
- const void *alpha, const CHAMELEON_Complex64_t *A, const int lda,
- const CHAMELEON_Complex64_t *B, const int ldb )
+void CHAMELEON_cblas_ztrsm( CBLAS_ORDER order, CBLAS_SIDE side, CBLAS_UPLO uplo,
+ CBLAS_TRANSPOSE trans, CBLAS_DIAG diag,
+ int M, int N,
+ const void *alpha, const CHAMELEON_Complex64_t *A, int lda,
+ CHAMELEON_Complex64_t *B, int ldb )
{
if ( order != CblasColMajor ){
fprintf( stderr, "CHAMELEON ERROR: %s(): %s\n", "CHAMELEON_cblas_ztrsm", "illegal value of order" );
@@ -152,6 +152,6 @@ void CHAMELEON_cblas_ztrsm( const CBLAS_ORDER order, const CBLAS_SIDE side, cons
CHAMELEON_ztrsm( (cham_side_t)side, (cham_uplo_t)uplo,
(cham_trans_t)trans, (cham_diag_t)diag,
M, N,
- alphac, (CHAMELEON_Complex64_t *)A, lda,
- (CHAMELEON_Complex64_t *)B, ldb );
+ alphac, (CHAMELEON_Complex64_t*)A, lda,
+ B, ldb );
}
diff --git a/lapack_api/src/lapack_ztrtri.c b/lapack_api/src/lapack_ztrtri.c
index 8f06d5e04acbfc81f46a88285db2da17b8f6f89f..21c4c6d63a40572ad214ebeaab2e42e150d6fa0d 100644
--- a/lapack_api/src/lapack_ztrtri.c
+++ b/lapack_api/src/lapack_ztrtri.c
@@ -23,9 +23,9 @@
/* Fortran LAPACK interface */
#define CHAMELEON_lapack_ztrtri CHAMELEON_GLOBAL( chameleon_lapack_ztrtri, CHAMELEON_LAPACK_ZTRTRI )
-void CHAMELEON_lapack_ztrtri ( const char* uplo, const char* diag, const int* n,
- CHAMELEON_Complex64_t* a, const int* lda,
- int* info )
+void CHAMELEON_lapack_ztrtri ( const char *uplo, const char *diag, const int *n,
+ CHAMELEON_Complex64_t *a, const int *lda,
+ int *info )
{
*info = CHAMELEON_lapacke_ztrtri( CblasColMajor,
*uplo, *diag, *n, a, *lda );