diff --git a/compute/zbuild.c b/compute/zbuild.c index a3c6628e236ce9f1d986518a8d7b8533eb5d8b9e..fc5599c489703f393b148fb547887b2e12104dfa 100644 --- a/compute/zbuild.c +++ b/compute/zbuild.c @@ -84,7 +84,7 @@ ******************************************************************************/ int MORSE_zbuild( MORSE_enum uplo, int M, int N, MORSE_Complex64_t *A, int LDA, - void *user_data, void* user_build_callback) + void *user_data, void* user_build_callback ) { int NB; int status; @@ -259,7 +259,7 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A, int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* user_build_callback, MORSE_sequence_t *sequence, - MORSE_request_t *request) + MORSE_request_t *request ) { MORSE_context_t *morse; @@ -289,8 +289,9 @@ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, } /* Quick return */ - if (chameleon_min( A->m, A->n ) == 0) + if (chameleon_min( A->m, A->n ) == 0) { return MORSE_SUCCESS; + } morse_pzbuild( uplo, A, user_data, user_build_callback, sequence, request ); diff --git a/compute/zgelqf.c b/compute/zgelqf.c index e349466be9193f9aaa8535a7633fd67af82f1c64..9ae0047a39c595fc367ca151b11e7178c6cf2d39 100644 --- a/compute/zgelqf.c +++ b/compute/zgelqf.c @@ -182,7 +182,7 @@ int MORSE_zgelqf(int M, int N, * @sa MORSE_zgelqs_Tile * ******************************************************************************/ -int MORSE_zgelqf_Tile(MORSE_desc_t *A, MORSE_desc_t *T) +int MORSE_zgelqf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgelqf_param.c b/compute/zgelqf_param.c index 76822f05ada3b23058bde906843d832978a2f421..1a798badd75be8266578b2f72efca0439f4a0397 100644 --- a/compute/zgelqf_param.c +++ b/compute/zgelqf_param.c @@ -179,7 +179,7 @@ int MORSE_zgelqf_param(const libhqr_tree_t *qrtree, int M, int N, * @sa MORSE_zgelqs_Tile * ******************************************************************************/ -int MORSE_zgelqf_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT) +int MORSE_zgelqf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgelqs.c b/compute/zgelqs.c index bf065fc3673d6f9a989ffab2b569e64635e46095..52bd4f38af2b1a9db09ceff256a3736ac5da51a3 100644 --- a/compute/zgelqs.c +++ b/compute/zgelqs.c @@ -203,7 +203,7 @@ int MORSE_zgelqs(int M, int N, int NRHS, * @sa MORSE_zgelqf_Tile * ******************************************************************************/ -int MORSE_zgelqs_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B) +int MORSE_zgelqs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgelqs_param.c b/compute/zgelqs_param.c index 3dae2c711fde7a616c595de4055371b7d0032436..f16c1c5234d090df618653878ee9f056ab13469e 100644 --- a/compute/zgelqs_param.c +++ b/compute/zgelqs_param.c @@ -208,7 +208,7 @@ int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS, * @sa MORSE_zgelqf_Tile * ******************************************************************************/ -int MORSE_zgelqs_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B) +int MORSE_zgelqs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgeqrf.c b/compute/zgeqrf.c index 6a083537526f7c3582538aecf69691fa22450d48..42bb7a13468bd9464d66e81077cf50b03f9d345b 100644 --- a/compute/zgeqrf.c +++ b/compute/zgeqrf.c @@ -181,7 +181,7 @@ int MORSE_zgeqrf(int M, int N, * @sa MORSE_zgeqrs_Tile * ******************************************************************************/ -int MORSE_zgeqrf_Tile(MORSE_desc_t *A, MORSE_desc_t *T) +int MORSE_zgeqrf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgeqrf_param.c b/compute/zgeqrf_param.c index 3b4b9a0b87b7b242625609f277f92879707e9212..fd4025425f1dc9c23f0d487dd8847a40ccdf5065 100644 --- a/compute/zgeqrf_param.c +++ b/compute/zgeqrf_param.c @@ -188,7 +188,7 @@ int MORSE_zgeqrf_param(const libhqr_tree_t *qrtree, int M, int N, * @sa MORSE_zgeqrs_param_Tile * ******************************************************************************/ -int MORSE_zgeqrf_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT) +int MORSE_zgeqrf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgeqrs.c b/compute/zgeqrs.c index f5d92f2980724375ec78eabf95f4710ca267e5c2..d2b8ce3a246facdcaf7a6aefcea324a035798a01 100644 --- a/compute/zgeqrs.c +++ b/compute/zgeqrs.c @@ -202,7 +202,7 @@ int MORSE_zgeqrs(int M, int N, int NRHS, * @sa MORSE_zgeqrf_Tile * ******************************************************************************/ -int MORSE_zgeqrs_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B) +int MORSE_zgeqrs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgeqrs_param.c b/compute/zgeqrs_param.c index a08213db5bb9b4cf619705bfdebbc416d2c5cc70..a33475a6ced258270b33f84d804ef6d7abd93198 100644 --- a/compute/zgeqrs_param.c +++ b/compute/zgeqrs_param.c @@ -197,7 +197,7 @@ int MORSE_zgeqrs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS, * @sa MORSE_zgeqrf_Tile * ******************************************************************************/ -int MORSE_zgeqrs_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B) +int MORSE_zgeqrs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgesv_incpiv.c b/compute/zgesv_incpiv.c index 0f4a1f082bf6ce89db534eb4c328ad03b6a3ee77..e1e0cd665f7eb62ce5b7c9afbe7f04d55588afca 100644 --- a/compute/zgesv_incpiv.c +++ b/compute/zgesv_incpiv.c @@ -207,7 +207,7 @@ int MORSE_zgesv_incpiv(int N, int NRHS, * @sa MORSE_zcgesv_Tile * ******************************************************************************/ -int MORSE_zgesv_incpiv_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B) +int MORSE_zgesv_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgesv_nopiv.c b/compute/zgesv_nopiv.c index 741788fb35c117a80486e9f1bb50d9a3e2dae1fd..ade93eae8e8943a21f4dd067f7602121af0eb88c 100644 --- a/compute/zgesv_nopiv.c +++ b/compute/zgesv_nopiv.c @@ -199,7 +199,7 @@ int MORSE_zgesv_nopiv(int N, int NRHS, * @sa MORSE_zcgesv_Tile * ******************************************************************************/ -int MORSE_zgesv_nopiv_Tile(MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zgesv_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgetrf_incpiv.c b/compute/zgetrf_incpiv.c index a96a21f79c7b97ea9eb952037f9c99946eb59991..d483bb306548ec7abcac14efebc55873e34d62b5 100644 --- a/compute/zgetrf_incpiv.c +++ b/compute/zgetrf_incpiv.c @@ -186,7 +186,7 @@ int MORSE_zgetrf_incpiv(int M, int N, * @sa MORSE_zgetrs_incpiv_Tile * ******************************************************************************/ -int MORSE_zgetrf_incpiv_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV) +int MORSE_zgetrf_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgetrf_nopiv.c b/compute/zgetrf_nopiv.c index 32d6b8f354ea05f17a3aeaa938e48e01bf68216e..fb111d0f5ac582f06d47fbb9fb6138ed473cade9 100644 --- a/compute/zgetrf_nopiv.c +++ b/compute/zgetrf_nopiv.c @@ -172,7 +172,7 @@ int MORSE_zgetrf_nopiv(int M, int N, * @sa MORSE_zgetrs_Tile * ******************************************************************************/ -int MORSE_zgetrf_nopiv_Tile(MORSE_desc_t *A) +int MORSE_zgetrf_nopiv_Tile( MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgetrs_incpiv.c b/compute/zgetrs_incpiv.c index 132f47a9ca5e082521ab7df9a90bda0662b31678..40a51921ea6ca77a4a19138dab03aa3537a65eca 100644 --- a/compute/zgetrs_incpiv.c +++ b/compute/zgetrs_incpiv.c @@ -211,7 +211,7 @@ int MORSE_zgetrs_incpiv(MORSE_enum trans, int N, int NRHS, * @sa MORSE_zgetrf_incpiv_Tile * ******************************************************************************/ -int MORSE_zgetrs_incpiv_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B) +int MORSE_zgetrs_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zgetrs_nopiv.c b/compute/zgetrs_nopiv.c index 3259b1a3922be1c25845f48d5dd9f76e4612cc00..c77ac7a8927d3cb50cf72758d444076322000bce 100644 --- a/compute/zgetrs_nopiv.c +++ b/compute/zgetrs_nopiv.c @@ -199,7 +199,7 @@ int MORSE_zgetrs_nopiv(MORSE_enum trans, int N, int NRHS, * @sa MORSE_zgetrf_nopiv_Tile * ******************************************************************************/ -int MORSE_zgetrs_nopiv_Tile(MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zgetrs_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zlacpy.c b/compute/zlacpy.c index 4f89525c1e1f8d18990cdbebd7a67c9030265169..305ba37c3b9af546f81223a0e1d00c651b6008ea 100644 --- a/compute/zlacpy.c +++ b/compute/zlacpy.c @@ -197,7 +197,7 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N, * @sa MORSE_slacpy_Tile * ******************************************************************************/ -int MORSE_zlacpy_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zlacpy_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zlauum.c b/compute/zlauum.c index 41fc4f13d76779afba71ae7d6ef789cdf9714ac4..5e172d6c377a6819081ed8ce27ec1975fd1f37c9 100644 --- a/compute/zlauum.c +++ b/compute/zlauum.c @@ -183,7 +183,7 @@ int MORSE_zlauum(MORSE_enum uplo, int N, * @sa MORSE_zpotri_Tile * ******************************************************************************/ -int MORSE_zlauum_Tile(MORSE_enum uplo, MORSE_desc_t *A) +int MORSE_zlauum_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zposv.c b/compute/zposv.c index fb0df533fb76f905871d055e1e4a91e96d441b1f..d294d4c794ad139e63b99520ebdf77d37f134b46 100644 --- a/compute/zposv.c +++ b/compute/zposv.c @@ -225,7 +225,7 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS, * @sa MORSE_sposv_Tile * ******************************************************************************/ -int MORSE_zposv_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zposv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zpotrf.c b/compute/zpotrf.c index ace056bd9c90b775d38394e8f3b751994c52c6e8..a32124f6464c35e301a369d65358c7eaba56003f 100644 --- a/compute/zpotrf.c +++ b/compute/zpotrf.c @@ -195,7 +195,7 @@ int MORSE_zpotrf(MORSE_enum uplo, int N, * @sa MORSE_zpotrs_Tile * ******************************************************************************/ -int MORSE_zpotrf_Tile(MORSE_enum uplo, MORSE_desc_t *A) +int MORSE_zpotrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zpotri.c b/compute/zpotri.c index 366ce37739aa7dc216184904c25504eaba356af2..01b5990e4888cd25701c9f030310053ca635045d 100644 --- a/compute/zpotri.c +++ b/compute/zpotri.c @@ -183,7 +183,7 @@ int MORSE_zpotri(MORSE_enum uplo, int N, * @sa MORSE_zpotrf_Tile * ******************************************************************************/ -int MORSE_zpotri_Tile(MORSE_enum uplo, MORSE_desc_t *A) +int MORSE_zpotri_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zpotrimm.c b/compute/zpotrimm.c index 3b767e71ea3a480d4d1dc40b1b791f4e6d3263bf..85475ad3ada644424c57ff3789c7b30cc4c3a703 100644 --- a/compute/zpotrimm.c +++ b/compute/zpotrimm.c @@ -205,7 +205,7 @@ int MORSE_zpotrimm(MORSE_enum uplo, int N, * @sa MORSE_zpotrf_Tile * ******************************************************************************/ -int MORSE_zpotrimm_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *C) +int MORSE_zpotrimm_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *C ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zpotrs.c b/compute/zpotrs.c index f98bdef63d56067eeaba11a6c163a4fa17a4ee05..d7820e75a34684a990208e8f2d05cf197aa968e5 100644 --- a/compute/zpotrs.c +++ b/compute/zpotrs.c @@ -201,7 +201,7 @@ int MORSE_zpotrs(MORSE_enum uplo, int N, int NRHS, * @sa MORSE_zpotrf_Tile * ******************************************************************************/ -int MORSE_zpotrs_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zpotrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zsysv.c b/compute/zsysv.c index 31b279c5ffd5cb3732f7aadf424fc59239282822..cf499487ebd364293c6de7e46706a38a7b4de09e 100644 --- a/compute/zsysv.c +++ b/compute/zsysv.c @@ -218,7 +218,7 @@ int MORSE_zsysv(MORSE_enum uplo, int N, int NRHS, * @sa MORSE_csysv_Tile * ******************************************************************************/ -int MORSE_zsysv_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zsysv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zsytrf.c b/compute/zsytrf.c index 4eca903f1caf965d69c64d90beb6635d126ab581..6905b7c33adc421620077baa7d745095e411aa1a 100644 --- a/compute/zsytrf.c +++ b/compute/zsytrf.c @@ -184,7 +184,7 @@ int MORSE_zsytrf(MORSE_enum uplo, int N, * @sa MORSE_csytrf_Tile * ******************************************************************************/ -int MORSE_zsytrf_Tile(MORSE_enum uplo, MORSE_desc_t *A) +int MORSE_zsytrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zsytrs.c b/compute/zsytrs.c index e2a3ea0109dfac6903a3fe052b68cfe87d7ccf03..fd7013dd9884e0ea8ca3b9e4f7738f5509917e14 100644 --- a/compute/zsytrs.c +++ b/compute/zsytrs.c @@ -197,7 +197,7 @@ int MORSE_zsytrs(MORSE_enum uplo, int N, int NRHS, * @sa MORSE_csytrs_Tile * ******************************************************************************/ -int MORSE_zsytrs_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) +int MORSE_zsytrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/ztile.c b/compute/ztile.c index d2648eed9aa8775a036fc1601149d480c9ac58da..94fff08a0db71a9745965b5261539c75f645e242 100644 --- a/compute/ztile.c +++ b/compute/ztile.c @@ -61,7 +61,7 @@ * @sa MORSE_sLapack_to_Tile * ******************************************************************************/ -int MORSE_zLapack_to_Tile(MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A) +int MORSE_zLapack_to_Tile( MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; @@ -92,6 +92,7 @@ int MORSE_zLapack_to_Tile(MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A) MORSE_Desc_Flush( B, sequence ); MORSE_Desc_Flush( A, sequence ); + morse_sequence_wait( morse, sequence ); /* Destroy temporary B descriptor */ @@ -137,7 +138,7 @@ int MORSE_zLapack_to_Tile(MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A) * @sa MORSE_sTile_to_Lapack * ******************************************************************************/ -int MORSE_zTile_to_Lapack(MORSE_desc_t *A, MORSE_Complex64_t *Af77, int LDA) +int MORSE_zTile_to_Lapack( MORSE_desc_t *A, MORSE_Complex64_t *Af77, int LDA ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/ztpqrt.c b/compute/ztpqrt.c index 25744d96577d1fdf1cffcc95ed9b56cebe8eb7f1..c8e238201f786837fcde02fcb6b7a322d919b62e 100644 --- a/compute/ztpqrt.c +++ b/compute/ztpqrt.c @@ -251,7 +251,7 @@ int MORSE_ztpqrt( int M, int N, int L, * @sa MORSE_zgeqrs_Tile * ******************************************************************************/ -int MORSE_ztpqrt_Tile( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T ) +int MORSE_ztpqrt_Tile( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/ztrsmpl.c b/compute/ztrsmpl.c index 6d74479d322c55c13d8c5821b24b855f0fb40060..1e37ec89b036503cc671199c03cfc5c39391467a 100644 --- a/compute/ztrsmpl.c +++ b/compute/ztrsmpl.c @@ -196,7 +196,7 @@ int MORSE_ztrsmpl(int N, int NRHS, * @sa MORSE_zgetrf_incpiv_Tile * ******************************************************************************/ -int MORSE_ztrsmpl_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B) +int MORSE_ztrsmpl_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/ztrtri.c b/compute/ztrtri.c index f3086b967f20f8931a73d7e6da3f2e65b4eae8a5..30c48d1a562426698a0431c7bb2552db3751a19d 100644 --- a/compute/ztrtri.c +++ b/compute/ztrtri.c @@ -202,7 +202,7 @@ int MORSE_ztrtri(MORSE_enum uplo, MORSE_enum diag, int N, * @sa MORSE_zpotri_Tile * ******************************************************************************/ -int MORSE_ztrtri_Tile(MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A) +int MORSE_ztrtri_Tile( MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zunglq.c b/compute/zunglq.c index 1938aae7add775ca4b1de05d1f16ea4eef323169..b24f1ce453f66188dad62a1cd775ec456f01d918 100644 --- a/compute/zunglq.c +++ b/compute/zunglq.c @@ -198,7 +198,7 @@ int MORSE_zunglq(int M, int N, int K, * @sa MORSE_zgelqf_Tile * ******************************************************************************/ -int MORSE_zunglq_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q) +int MORSE_zunglq_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zunglq_param.c b/compute/zunglq_param.c index b24655926a5dc8a869754594eaab046d32164d86..76aafb555067364ef179d51e20d7d91ebbed3c1f 100644 --- a/compute/zunglq_param.c +++ b/compute/zunglq_param.c @@ -195,7 +195,7 @@ int MORSE_zunglq_param(const libhqr_tree_t *qrtree, int M, int N, int K, * @sa MORSE_zgelqf_Tile * ******************************************************************************/ -int MORSE_zunglq_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q) +int MORSE_zunglq_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zungqr.c b/compute/zungqr.c index d823b2b42d35e20c76471f558e6b80e3913f2714..3d89e1a45f2ce58c1013bc63139e1be6cb479e26 100644 --- a/compute/zungqr.c +++ b/compute/zungqr.c @@ -197,7 +197,7 @@ int MORSE_zungqr(int M, int N, int K, * @sa MORSE_zgeqrf_Tile * ******************************************************************************/ -int MORSE_zungqr_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q) +int MORSE_zungqr_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; diff --git a/compute/zungqr_param.c b/compute/zungqr_param.c index e0defbf220c9e21dc1c28a8b165813adbdfbde2f..df3dd2b1c491b8fb9b3b9076af4ccf96f3a139c5 100644 --- a/compute/zungqr_param.c +++ b/compute/zungqr_param.c @@ -196,7 +196,7 @@ int MORSE_zungqr_param(const libhqr_tree_t *qrtree, * @sa MORSE_zgeqrf_Tile * ******************************************************************************/ -int MORSE_zungqr_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q) +int MORSE_zungqr_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q ) { MORSE_context_t *morse; MORSE_sequence_t *sequence = NULL; @@ -248,7 +248,7 @@ int MORSE_zungqr_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_ * @sa MORSE_zgeqrf_Tile_Async * ******************************************************************************/ -int MORSE_zungqr_param_Tile_Async(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q, MORSE_sequence_t *sequence, MORSE_request_t *request) +int MORSE_zungqr_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *Q, MORSE_sequence_t *sequence, MORSE_request_t *request ) { MORSE_context_t *morse; MORSE_desc_t D, *Dptr = NULL;