From c27ce41a9dace103a63f66353a48ecf1ac707563 Mon Sep 17 00:00:00 2001 From: Mathieu Faverge <mathieu.faverge@inria.fr> Date: Tue, 23 Jan 2018 16:47:31 +0100 Subject: [PATCH] Minor --- compute/zbuild.c | 7 ++++--- compute/zgelqf.c | 2 +- compute/zgelqf_param.c | 2 +- compute/zgelqs.c | 2 +- compute/zgelqs_param.c | 2 +- compute/zgeqrf.c | 2 +- compute/zgeqrf_param.c | 2 +- compute/zgeqrs.c | 2 +- compute/zgeqrs_param.c | 2 +- compute/zgesv_incpiv.c | 2 +- compute/zgesv_nopiv.c | 2 +- compute/zgetrf_incpiv.c | 2 +- compute/zgetrf_nopiv.c | 2 +- compute/zgetrs_incpiv.c | 2 +- compute/zgetrs_nopiv.c | 2 +- compute/zlacpy.c | 2 +- compute/zlauum.c | 2 +- compute/zposv.c | 2 +- compute/zpotrf.c | 2 +- compute/zpotri.c | 2 +- compute/zpotrimm.c | 2 +- compute/zpotrs.c | 2 +- compute/zsysv.c | 2 +- compute/zsytrf.c | 2 +- compute/zsytrs.c | 2 +- compute/ztile.c | 5 +++-- compute/ztpqrt.c | 2 +- compute/ztrsmpl.c | 2 +- compute/ztrtri.c | 2 +- compute/zunglq.c | 2 +- compute/zunglq_param.c | 2 +- compute/zungqr.c | 2 +- compute/zungqr_param.c | 4 ++-- 33 files changed, 39 insertions(+), 37 deletions(-) diff --git a/compute/zbuild.c b/compute/zbuild.c index a3c6628e2..fc5599c48 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 e349466be..9ae0047a3 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 76822f05a..1a798badd 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 bf065fc36..52bd4f38a 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 3dae2c711..f16c1c523 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 6a0835375..42bb7a134 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 3b4b9a0b8..fd4025425 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 f5d92f298..d2b8ce3a2 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 a08213db5..a33475a6c 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 0f4a1f082..e1e0cd665 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 741788fb3..ade93eae8 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 a96a21f79..d483bb306 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 32d6b8f35..fb111d0f5 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 132f47a9c..40a51921e 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 3259b1a39..c77ac7a89 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 4f89525c1..305ba37c3 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 41fc4f13d..5e172d6c3 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 fb0df533f..d294d4c79 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 ace056bd9..a32124f64 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 366ce3773..01b5990e4 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 3b767e71e..85475ad3a 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 f98bdef63..d7820e75a 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 31b279c5f..cf499487e 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 4eca903f1..6905b7c33 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 e2a3ea010..fd7013dd9 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 d2648eed9..94fff08a0 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 25744d965..c8e238201 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 6d74479d3..1e37ec89b 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 f3086b967..30c48d1a5 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 1938aae7a..b24f1ce45 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 b24655926..76aafb555 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 d823b2b42..3d89e1a45 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 e0defbf22..df3dd2b1c 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; -- GitLab