diff --git a/compute/pzbuild.c b/compute/pzbuild.c index 2bf0f50755c6e6c6c0b374313534e059385ab6fb..f4e3a6c0b8f0bdb26eb7676ca5aa0561e92ee7e2 100644 --- a/compute/pzbuild.c +++ b/compute/pzbuild.c @@ -30,7 +30,7 @@ #include "control/common.h" #define A(m, n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile matrix generation * ******************************************************************************* diff --git a/compute/pzgelqf.c b/compute/pzgelqf.c index 150335f7fbf87e6b4f0f440adf859d7c27e831a2..2d28d719c13d1855e0ab7fb5c698fc2dc6388743 100644 --- a/compute/pzgelqf.c +++ b/compute/pzgelqf.c @@ -38,7 +38,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel tile LQ factorization - dynamic scheduling **/ void morse_pzgelqf(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *D, diff --git a/compute/pzgemm.c b/compute/pzgemm.c index 92c04d02c17461e45b1e1799b7cd5b305a8db4e8..c52fcc281c57374bb2249d21faf9b4c343da1771 100644 --- a/compute/pzgemm.c +++ b/compute/pzgemm.c @@ -31,7 +31,7 @@ #define A(m, n) A, m, n #define B(m, n) B, m, n #define C(m, n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile matrix-matrix multiplication - dynamic scheduling **/ void morse_pzgemm(MORSE_enum transA, MORSE_enum transB, diff --git a/compute/pzgeqrf.c b/compute/pzgeqrf.c index 08796a3dbac44a656106f5176a14e2992687ddb1..849d7a00568a25988fb8c66819cb2068209a1a22 100644 --- a/compute/pzgeqrf.c +++ b/compute/pzgeqrf.c @@ -38,7 +38,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel tile QR factorization - dynamic scheduling **/ void morse_pzgeqrf(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *D, diff --git a/compute/pzgeqrfrh.c b/compute/pzgeqrfrh.c index 6fffcf2edf3c5bec1052fc5694ac1b3b40f9eb9f..a2ea808b95b26cf679df93e81c1a827e2de1436f 100644 --- a/compute/pzgeqrfrh.c +++ b/compute/pzgeqrfrh.c @@ -40,7 +40,7 @@ #define D(m,n) A, (m), (n) #endif -/***************************************************************************//** +/******************************************************************************* * Parallel tile QR factorization (reduction Householder) - dynamic scheduling **/ void morse_pzgeqrfrh(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *D, int BS, diff --git a/compute/pzgetrf_incpiv.c b/compute/pzgetrf_incpiv.c index 058dc1018973c93b144058c28e580dfbe6a11b14..092d258faf2ec47c7c630c9d1767bcbec1bb3774 100644 --- a/compute/pzgetrf_incpiv.c +++ b/compute/pzgetrf_incpiv.c @@ -42,7 +42,7 @@ #define L(_m_,_n_) L, _m_, _n_ #define IPIV(_m_,_n_) &(IPIV[(int64_t)A->mb*((int64_t)(_m_)+(int64_t)A->mt*(int64_t)(_n_))]) -/***************************************************************************//** +/******************************************************************************* * Parallel tile LU factorization - dynamic scheduling **/ void morse_pzgetrf_incpiv(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, diff --git a/compute/pzgetrf_nopiv.c b/compute/pzgetrf_nopiv.c index 3a276b820db42e2016d8946b504afebf15833423..e620dcdfa07b64f339d962fe455871fb739364ce 100644 --- a/compute/pzgetrf_nopiv.c +++ b/compute/pzgetrf_nopiv.c @@ -29,7 +29,7 @@ #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile LU factorization with no pivoting - dynamic scheduling **/ void morse_pzgetrf_nopiv(MORSE_desc_t *A, diff --git a/compute/pzhemm.c b/compute/pzhemm.c index 06a5115a91f1870c243cd2ee6aa02996f365b42a..7e5ca07095bb0a933e66897bca79179883e6c178 100644 --- a/compute/pzhemm.c +++ b/compute/pzhemm.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Hermitian matrix-matrix multiplication - dynamic scheduling **/ void morse_pzhemm(MORSE_enum side, MORSE_enum uplo, diff --git a/compute/pzher2k.c b/compute/pzher2k.c index 2462e431409dd3073cac9d49c04f75e2500db693..63b02741095ad2a6eba0c54e3ae65e134d61f380 100644 --- a/compute/pzher2k.c +++ b/compute/pzher2k.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Hermitian rank-k update - dynamic scheduling **/ void morse_pzher2k(MORSE_enum uplo, MORSE_enum trans, diff --git a/compute/pzherk.c b/compute/pzherk.c index a83db2e5e8a17b372e5f1491467a18a774cdf2c1..b499177f11ba862d8339e523abbb6277cc8f68e4 100644 --- a/compute/pzherk.c +++ b/compute/pzherk.c @@ -30,7 +30,7 @@ #define A(m,n) A, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Hermitian rank-k update - dynamic scheduling **/ void morse_pzherk(MORSE_enum uplo, MORSE_enum trans, diff --git a/compute/pzhetrd_he2hb.c b/compute/pzhetrd_he2hb.c index 873721ed6d89726da97ee022e79f67f0b063d9c1..74c3396149dfc3a4e1d34e129ca2676dcb31f7f8 100644 --- a/compute/pzhetrd_he2hb.c +++ b/compute/pzhetrd_he2hb.c @@ -38,7 +38,7 @@ #define E(m, n) A, m, n #endif -/***************************************************************************//** +/******************************************************************************* * Parallel tile BAND Tridiagonal Reduction - dynamic scheduler **/ void morse_pzhetrd_he2hb(MORSE_enum uplo, diff --git a/compute/pzlacpy.c b/compute/pzlacpy.c index f38330bc942f1c03e8303d29afc5614ba3f34cc0..b13b15222513827741298d84bff4abc56060512e 100644 --- a/compute/pzlacpy.c +++ b/compute/pzlacpy.c @@ -30,11 +30,11 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n -/***************************************************************************//** +/******************************************************************************* * **/ -/***************************************************************************//** +/******************************************************************************* * **/ void morse_pzlacpy(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, diff --git a/compute/pzlag2c.c b/compute/pzlag2c.c index 73f3798c730c6f9bc3e8985c0de41b9409d87a27..5ca24e2b313b97b9e13f3aa78ca9cdee3bb0cb75 100644 --- a/compute/pzlag2c.c +++ b/compute/pzlag2c.c @@ -32,11 +32,11 @@ #define B(m,n) B, m, n #define SA(m,n) SA, m, n #define SB(m,n) SB, m, n -/***************************************************************************//** +/******************************************************************************* * **/ -/***************************************************************************//** +/******************************************************************************* * **/ void morse_pclag2z(MORSE_desc_t *SA, MORSE_desc_t *B, diff --git a/compute/pzlange.c b/compute/pzlange.c index 7e68eb1890455eee49e5a405de21a8c65733f020..f893a4d9b45d1d0f04bbc06397b7c469b69fe880 100644 --- a/compute/pzlange.c +++ b/compute/pzlange.c @@ -35,15 +35,12 @@ #define VECNORMS_STEP1(m, n) VECNORMS_STEP1, m, n #define VECNORMS_STEP2(m, n) VECNORMS_STEP2, m, n #define RESULT(m, n) RESULT, m, n -/***************************************************************************//** - * - **/ - -/***************************************************************************//** - * - **/ -void morse_pzlange(MORSE_enum norm, MORSE_desc_t *A, double *result, - MORSE_sequence_t *sequence, MORSE_request_t *request) + +/***************************************************************************** + * + **/ +void morse_pzlange( MORSE_enum norm, MORSE_desc_t *A, double *result, + MORSE_sequence_t *sequence, MORSE_request_t *request ) { MORSE_desc_t *VECNORMS_STEP1 = NULL; MORSE_desc_t *VECNORMS_STEP2 = NULL; diff --git a/compute/pzlanhe.c b/compute/pzlanhe.c index 781115b601da96f44f137721bcc19fa16ebd75d1..af3b5bbab0bdff3c67545b22427c59730915d31e 100644 --- a/compute/pzlanhe.c +++ b/compute/pzlanhe.c @@ -35,11 +35,11 @@ #define VECNORMS_STEP1(m, n) VECNORMS_STEP1, m, n #define VECNORMS_STEP2(m, n) VECNORMS_STEP2, m, n #define RESULT(m, n) RESULT, m, n -/***************************************************************************//** +/******************************************************************************* * **/ -/***************************************************************************//** +/******************************************************************************* * **/ void morse_pzlanhe(MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *result, diff --git a/compute/pzlansy.c b/compute/pzlansy.c index 7f3877c84c051582019bcd5ffa0777f16e5725f9..f71eb5cb0f410729e187318be9bad6441ca876b6 100644 --- a/compute/pzlansy.c +++ b/compute/pzlansy.c @@ -35,11 +35,11 @@ #define VECNORMS_STEP1(m, n) VECNORMS_STEP1, m, n #define VECNORMS_STEP2(m, n) VECNORMS_STEP2, m, n #define RESULT(m, n) RESULT, m, n -/***************************************************************************//** +/******************************************************************************* * **/ -/***************************************************************************//** +/******************************************************************************* * **/ void morse_pzlansy(MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *result, diff --git a/compute/pzlantr.c b/compute/pzlantr.c index 639ebdfde03861fad4f4b56052a3c68687e24f1a..7c1e28b71c2c739c5cd13229f35151d544a2c10b 100644 --- a/compute/pzlantr.c +++ b/compute/pzlantr.c @@ -32,7 +32,7 @@ #define VECNORMS_STEP1(m, n) VECNORMS_STEP1, m, n #define VECNORMS_STEP2(m, n) VECNORMS_STEP2, m, n #define RESULT(m, n) RESULT, m, n -/***************************************************************************//** +/******************************************************************************* * **/ void morse_pzlantr(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, diff --git a/compute/pzlaset.c b/compute/pzlaset.c index a0a71b0dac1dff52ffaf38433e19e2b45445014f..f0c84a852747e92dc52de55d6de1134b05a33ac2 100644 --- a/compute/pzlaset.c +++ b/compute/pzlaset.c @@ -30,7 +30,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel initialization a 2-D array A to BETA on the diagonal and * ALPHA on the offdiagonals. **/ diff --git a/compute/pzlaset2.c b/compute/pzlaset2.c index 94142791c3879db8f6a281a82a93e79a76538b8b..96b681245be044ad9aad739b17ccb3ecfe12aa25 100644 --- a/compute/pzlaset2.c +++ b/compute/pzlaset2.c @@ -30,7 +30,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel initializztion a 2-D array A to * ALPHA on the offdiagonals. **/ diff --git a/compute/pzlauum.c b/compute/pzlauum.c index de8faf8f8ab1587d287fcf9fdf0b51ea88ec5248..d7052fd75fef5dcf2f07664dfabdac0c7c60a5e8 100644 --- a/compute/pzlauum.c +++ b/compute/pzlauum.c @@ -31,7 +31,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel UU' or L'L operation - dynamic scheduling **/ void morse_pzlauum(MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/pzplghe.c b/compute/pzplghe.c index 0f6e559dd9f7b44d0fe0407f325571e5ebda1856..239e5947ea86d24758900d0bf4999674162a2442 100644 --- a/compute/pzplghe.c +++ b/compute/pzplghe.c @@ -32,7 +32,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * morse_pzplghe - Generate a random hermitian (positive definite if 'bump' is large enough) half-matrix by tiles. **/ void morse_pzplghe( double bump, MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/pzplgsy.c b/compute/pzplgsy.c index a7c8b282855214ee7ad9988fb815ea2904b57c36..c5111e5674a0743d0df5e0dcc7170038d50b1304 100644 --- a/compute/pzplgsy.c +++ b/compute/pzplgsy.c @@ -32,7 +32,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * morse_pzplgsy - Generate a random symmetric (positive definite if 'bump' is large enough) half-matrix by tiles. **/ void morse_pzplgsy( MORSE_Complex64_t bump, MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/pzplrnt.c b/compute/pzplrnt.c index 53fe68f2772012cb737420ac2cf439d6536a6413..d0467737980d0ad57d6db98805943afddca3294b 100644 --- a/compute/pzplrnt.c +++ b/compute/pzplrnt.c @@ -29,7 +29,7 @@ #include "control/common.h" #define A(m, n) A, m, n -/***************************************************************************//** +/******************************************************************************* * morse_pzplghe - Generate a random matrix by tiles. **/ void morse_pzplrnt( MORSE_desc_t *A, unsigned long long int seed, diff --git a/compute/pzpotrf.c b/compute/pzpotrf.c index 562d7109a4fd5229dcb5476f97a219d312970d88..ae7f858a3e7aa78caba17dfe0084a16d45d2dd04 100644 --- a/compute/pzpotrf.c +++ b/compute/pzpotrf.c @@ -32,7 +32,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Cholesky factorization - dynamic scheduling **/ void morse_pzpotrf(MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/pzpotrimm.c b/compute/pzpotrimm.c index 09d6bd39d7a8df7b6007bd5cf05db9c44cc24090..fd4956e21f2f732056034e54999807ad5606cdb2 100644 --- a/compute/pzpotrimm.c +++ b/compute/pzpotrimm.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Cholesky factorization - dynamic scheduling **/ void morse_pzpotrimm(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *C, diff --git a/compute/pzsymm.c b/compute/pzsymm.c index a51cc6437ea120da8f9c3bd0066378ea624993ee..fd608f65d9fac24e3967c5933be0c3ce7430d723 100644 --- a/compute/pzsymm.c +++ b/compute/pzsymm.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile symmetric matrix-matrix multiplication - dynamic scheduling **/ void morse_pzsymm(MORSE_enum side, MORSE_enum uplo, diff --git a/compute/pzsyr2k.c b/compute/pzsyr2k.c index 9903b623a6722bed14e16afe88774a78158b822b..9ed43086c37a4de4de61c6c2f23cf7c3dfd4b991 100644 --- a/compute/pzsyr2k.c +++ b/compute/pzsyr2k.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Hermitian rank-k update - dynamic scheduling **/ void morse_pzsyr2k(MORSE_enum uplo, MORSE_enum trans, diff --git a/compute/pzsyrk.c b/compute/pzsyrk.c index 41b5efd0a3f5daeb4928fa98889cba74c6cfe254..a942fa8d475415759fbac0f0918710e50a4eb323 100644 --- a/compute/pzsyrk.c +++ b/compute/pzsyrk.c @@ -31,7 +31,7 @@ #define A(m,n) A, m, n #define C(m,n) C, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile symmetric rank-k update - dynamic scheduling **/ void morse_pzsyrk(MORSE_enum uplo, MORSE_enum trans, diff --git a/compute/pzsytrf.c b/compute/pzsytrf.c index 2a4ce3a6e7ab7ba3b3dc47e38faf4c1e803e8d80..6e257b5b2080ace71fc02161256600a0645ba53b 100644 --- a/compute/pzsytrf.c +++ b/compute/pzsytrf.c @@ -31,7 +31,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile Cholesky factorization - dynamic scheduling **/ void morse_pzsytrf(MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/pztile2band.c b/compute/pztile2band.c index cf71f839f85e597126e590a7bdc01f1af0038a2b..bfd4f5cf1861e02b1d19c823083fde827abd68de 100644 --- a/compute/pztile2band.c +++ b/compute/pztile2band.c @@ -30,7 +30,7 @@ #define A(m,n) A, m, n #define B(m, n) B, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel copy of a band matrix from full NxN tile storage to band storage (LDABxN). **/ void morse_pztile2band(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, diff --git a/compute/pztpgqrt.c b/compute/pztpgqrt.c index 0746b2786a0d7bca579b56da23cb72f7ec7e3014..a070dc85157fe4e1c0623c823617e4c826fe9ce3 100644 --- a/compute/pztpgqrt.c +++ b/compute/pztpgqrt.c @@ -36,7 +36,7 @@ #define D(k) V1, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel tile QR factorization - dynamic scheduling **/ void morse_pztpgqrt( int L, diff --git a/compute/pztpqrt.c b/compute/pztpqrt.c index da8d152c1c4411b8f18df79cf1e07b5f710abba1..47415ff055e846d4e690709174ec926e5b347028 100644 --- a/compute/pztpqrt.c +++ b/compute/pztpqrt.c @@ -28,7 +28,7 @@ #define B(m,n) B, m, n #define T(m,n) T, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile QR factorization - dynamic scheduling **/ void morse_pztpqrt( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, diff --git a/compute/pztradd.c b/compute/pztradd.c index 34baf5eab237beeec58655760292f83bdedd2172..aa5dca0e588b2ef31384b276f43f37c8b6712109 100644 --- a/compute/pztradd.c +++ b/compute/pztradd.c @@ -30,7 +30,7 @@ #define A(m, n) A, m, n #define B(m, n) B, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile matrix-matrix multiplication - dynamic scheduling **/ void morse_pztradd(MORSE_enum uplo, MORSE_enum trans, diff --git a/compute/pztrmm.c b/compute/pztrmm.c index ce0d543453aa7ac2935f10e278b0ff6373fd9d5b..b616bd55a478c65aae58e4c5f0bef8ee9bc17f67 100644 --- a/compute/pztrmm.c +++ b/compute/pztrmm.c @@ -33,7 +33,7 @@ -/***************************************************************************//** +/******************************************************************************* * Parallel tile triangular matrix-matrix multiplication - dynamic scheduling **/ void morse_pztrmm(MORSE_enum side, MORSE_enum uplo, diff --git a/compute/pztrsm.c b/compute/pztrsm.c index 6338801f6521c02e28dd71f1c2cf6bb9417dc261..727b7e5dbeb10cf313792071a2d7300f6c879502 100644 --- a/compute/pztrsm.c +++ b/compute/pztrsm.c @@ -32,7 +32,7 @@ #define A(m,n) A, m, n #define B(m,n) B, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile triangular solve - dynamic scheduling **/ void morse_pztrsm(MORSE_enum side, MORSE_enum uplo, MORSE_enum trans, MORSE_enum diag, diff --git a/compute/pztrsmpl.c b/compute/pztrsmpl.c index 5da3da0c8f078b4dfbbebeb7492036c9c84a6aff..7314ad60fe731751f16e02b72e1987b5a2f78191 100644 --- a/compute/pztrsmpl.c +++ b/compute/pztrsmpl.c @@ -34,7 +34,7 @@ #define B(m,n) B, m, n #define L(m,n) L, m, n #define IPIV(m,n) &(IPIV[(int64_t)A->nb*((int64_t)(m)+(int64_t)A->mt*(int64_t)(n))]) -/***************************************************************************//** +/******************************************************************************* * Parallel forward substitution for tile LU - dynamic scheduling **/ void morse_pztrsmpl(MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *L, int *IPIV, diff --git a/compute/pztrtri.c b/compute/pztrtri.c index c81fcb941eb6c8101353cfbfde13185514e8a8df..e212d3805516147fb1067991dabfbd22961cff07 100644 --- a/compute/pztrtri.c +++ b/compute/pztrtri.c @@ -31,7 +31,7 @@ #include "control/common.h" #define A(m,n) A, m, n -/***************************************************************************//** +/******************************************************************************* * Parallel tile triangular matrix inverse - dynamic scheduling **/ void morse_pztrtri(MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A, diff --git a/compute/pzunglq.c b/compute/pzunglq.c index bd038ef98fecd77ab029db4ddee701ece1abc182..13a034ce3d64ecf8f1c5f1abf47e41a09e494141 100644 --- a/compute/pzunglq.c +++ b/compute/pzunglq.c @@ -39,7 +39,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel construction of Q using tile V (application to identity) - dynamic scheduling **/ void morse_pzunglq(MORSE_desc_t *A, MORSE_desc_t *Q, MORSE_desc_t *T, MORSE_desc_t *D, diff --git a/compute/pzungqr.c b/compute/pzungqr.c index 6e42f5371d85d25331f00e5d25ab862f5a771166..389f79e854029cefd083ca19ea681d9838c8b231 100644 --- a/compute/pzungqr.c +++ b/compute/pzungqr.c @@ -39,7 +39,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel construction of Q using tile V (application to identity) - dynamic scheduling **/ void morse_pzungqr(MORSE_desc_t *A, MORSE_desc_t *Q, MORSE_desc_t *T, MORSE_desc_t *D, diff --git a/compute/pzunmlq.c b/compute/pzunmlq.c index 25a5369ac3fa71316840da6c1cf2a7cb1d815f0d..9c9cfd679c8532eb2f94d5d5fba7b25b04d6ff71 100644 --- a/compute/pzunmlq.c +++ b/compute/pzunmlq.c @@ -40,7 +40,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel application of Q using tile V - LQ factorization - dynamic scheduling **/ void morse_pzunmlq(MORSE_enum side, MORSE_enum trans, diff --git a/compute/pzunmlqrh.c b/compute/pzunmlqrh.c index 371d08e4fbb128dffcc68101f991a2c2a6856854..8444f0bb3899178caf82269875e4f725130c0bc9 100644 --- a/compute/pzunmlqrh.c +++ b/compute/pzunmlqrh.c @@ -41,7 +41,7 @@ #define D(m,n) A, (m), (n) #endif -/***************************************************************************//** +/******************************************************************************* * Parallel application of Q using tile V - LQ factorization (reduction * Householder) - dynamic scheduling **/ diff --git a/compute/pzunmqr.c b/compute/pzunmqr.c index 0f05f4edfcef4e385eda6540afb4bfa26391b897..4e81716ddf0439cde04ed3465422ebefec0a860b 100644 --- a/compute/pzunmqr.c +++ b/compute/pzunmqr.c @@ -40,7 +40,7 @@ #define D(k) A, k, k #endif -/***************************************************************************//** +/******************************************************************************* * Parallel application of Q using tile V - QR factorization - dynamic scheduling **/ void morse_pzunmqr(MORSE_enum side, MORSE_enum trans, diff --git a/compute/pzunmqrrh.c b/compute/pzunmqrrh.c index d6d57629e902b1613dce8ce6a34fa194344f42df..ca7097ca99f51439bf2ec33627a36812fd01ead5 100644 --- a/compute/pzunmqrrh.c +++ b/compute/pzunmqrrh.c @@ -41,13 +41,13 @@ #define D(m,n) A, (m), (n) #endif -/***************************************************************************//** +/******************************************************************************* * Parallel application of Q using tile V - QR factorization (reduction * Householder) - dynamic scheduling **/ -void morse_pzunmqrrh(MORSE_enum side, MORSE_enum trans, - MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, MORSE_desc_t *D, int BS, - MORSE_sequence_t *sequence, MORSE_request_t *request) +void morse_pzunmqrrh( MORSE_enum side, MORSE_enum trans, + MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, MORSE_desc_t *D, int BS, + MORSE_sequence_t *sequence, MORSE_request_t *request ) { MORSE_context_t *morse; MORSE_option_t options;