diff --git a/compute/pzbuild.c b/compute/pzbuild.c index 5829bafb192dc4b9eef331bc92be945585d1ad93..4f65345c55e9c3943065876d173b28627c749e54 100644 --- a/compute/pzbuild.c +++ b/compute/pzbuild.c @@ -21,11 +21,11 @@ * @date 2016-09-05 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m, n) A, m, n -/******************************************************************************* +/** * Parallel tile matrix generation * ******************************************************************************* @@ -52,7 +52,7 @@ * @param[out] request * Identifies this function call (for exception handling purposes). * - *******************************************************************************/ + */ void morse_pzbuild( MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* user_build_callback, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/pzgebrd_ge2gb.c b/compute/pzgebrd_ge2gb.c index 546fb649dd4e50938f8cd32bc289e406920727f3..2e9b9c5e926646c0aaeefc6fc2fbd8c1582bcca8 100644 --- a/compute/pzgebrd_ge2gb.c +++ b/compute/pzgebrd_ge2gb.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" void morse_pzgebrd_ge2gb(MORSE_desc_t A, MORSE_desc_t T, MORSE_desc_t D, diff --git a/compute/pzgelqf.c b/compute/pzgelqf.c index aeb50de8815f36ff453fd493ee29ea1fa791f092..1dbea93bce01b21df0e941501138fafdf8593cb7 100644 --- a/compute/pzgelqf.c +++ b/compute/pzgelqf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -33,9 +33,9 @@ #define D(k) D, k, k #endif -/******************************************************************************* +/** * Parallel tile LQ factorization - dynamic scheduling - **/ + */ void morse_pzgelqf(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *D, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzgelqf_param.c b/compute/pzgelqf_param.c index 5a722e45cad3295dba5d4356132160632a772d37..ef2a600802ac27c2956017e405af7a2ce2baa4f9 100644 --- a/compute/pzgelqf_param.c +++ b/compute/pzgelqf_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> #include "libhqr.h" diff --git a/compute/pzgelqfrh.c b/compute/pzgelqfrh.c index 27b94092d29a0498b44ac7fb56a4ce9d4e5515f4..82c63ae144166c77b852674684f56c040689dc78 100644 --- a/compute/pzgelqfrh.c +++ b/compute/pzgelqfrh.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) diff --git a/compute/pzgemm.c b/compute/pzgemm.c index f1ba3861e9cf6d9039027f461c4117fd79a455a7..4ddd5651c126909f3437555d6bccab1b274ad54e 100644 --- a/compute/pzgemm.c +++ b/compute/pzgemm.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/pzgeqrf.c b/compute/pzgeqrf.c index 103a6922ac78c3d62721f3b4f52885add7909aac..cb06ffea49445db55210c83c04e9c2615a5d1704 100644 --- a/compute/pzgeqrf.c +++ b/compute/pzgeqrf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -33,9 +33,9 @@ #define D(k) D, k, k #endif -/******************************************************************************* +/** * Parallel tile QR factorization - dynamic scheduling - **/ + */ void morse_pzgeqrf(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *D, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzgeqrf_param.c b/compute/pzgeqrf_param.c index 4324026e0feb9d5eefe53fef1217fd7358aa9d7a..897c935c56f5036cc0cff2e63010c2834eaabf6c 100644 --- a/compute/pzgeqrf_param.c +++ b/compute/pzgeqrf_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> #include "libhqr.h" diff --git a/compute/pzgeqrfrh.c b/compute/pzgeqrfrh.c index 5b32de000fc6bf00dfaa272c252f5608d3acbb3a..8263a77917d209e984d7e928ea9c0ac863951aa1 100644 --- a/compute/pzgeqrfrh.c +++ b/compute/pzgeqrfrh.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) @@ -35,9 +35,9 @@ #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzgetrf_incpiv.c b/compute/pzgetrf_incpiv.c index 5719f62c8b6e4d139078358bb116112f4f4060ba..26205bacfdedf1cbdb9bd7a248b220ffa5da5a94 100644 --- a/compute/pzgetrf_incpiv.c +++ b/compute/pzgetrf_incpiv.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ //ALLOC_WS : ib*L->nb //WS_ADD : ib*L->nb #include "control/common.h" @@ -37,9 +37,9 @@ #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, MORSE_desc_t *D, int *IPIV, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/pzgetrf_nopiv.c b/compute/pzgetrf_nopiv.c index 11902f950270a1d6553b8b107d75b834737c1a90..9bb3fe4e030f3675c7c7fa0e1eed1bab61170f58 100644 --- a/compute/pzgetrf_nopiv.c +++ b/compute/pzgetrf_nopiv.c @@ -19,14 +19,14 @@ * @date 2013-02-01 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n -/******************************************************************************* +/** * Parallel tile LU factorization with no pivoting - dynamic scheduling - **/ + */ void morse_pzgetrf_nopiv(MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzhemm.c b/compute/pzhemm.c index 8a0b629c711e150fbb33ac6cb5928f5cce5ff606..3bf736b67c42af9b1d0d68e85513c853e8085ab5 100644 --- a/compute/pzhemm.c +++ b/compute/pzhemm.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/pzher2k.c b/compute/pzher2k.c index 392575473903258c79e060c732b484d96ddc4cbb..a327b3fe8570f15c44ca95c9fb0f12bc107bf707 100644 --- a/compute/pzher2k.c +++ b/compute/pzher2k.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, double beta, MORSE_desc_t *C, diff --git a/compute/pzherk.c b/compute/pzherk.c index 17282095a5854e1fc84496ecf868053179de4a6c..74f09e1195efb3eee5c9aa6a3c04c7a62cca9b3a 100644 --- a/compute/pzherk.c +++ b/compute/pzherk.c @@ -20,14 +20,14 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" #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, double alpha, MORSE_desc_t *A, double beta, MORSE_desc_t *C, diff --git a/compute/pzhetrd_he2hb.c b/compute/pzhetrd_he2hb.c index ef525208da605eccafd74c62bd9a1db12ccd22f0..ea785ab0c08c67428110151188100a6bec86999f 100644 --- a/compute/pzhetrd_he2hb.c +++ b/compute/pzhetrd_he2hb.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -33,9 +33,9 @@ #define E(m, n) A, m, n #endif -/******************************************************************************* +/** * Parallel tile BAND Tridiagonal Reduction - dynamic scheduler - **/ + */ void morse_pzhetrd_he2hb(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *E, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzlacpy.c b/compute/pzlacpy.c index ecf36f4899cfaf71bf8a2498bc1cba189c99c0b8..54cb862558f1ce195829dedb6445b9b360cfcdbd 100644 --- a/compute/pzlacpy.c +++ b/compute/pzlacpy.c @@ -20,17 +20,17 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzlag2c.c b/compute/pzlag2c.c index c03d21fb243b09d1d8e345deec416fa0261cc899..3d4e185e2aad52bfc41b90762b0e6a849a374254 100644 --- a/compute/pzlag2c.c +++ b/compute/pzlag2c.c @@ -20,19 +20,19 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzlange.c b/compute/pzlange.c index 6018a27ebb395b463e77a1ae25ce1a05f6139b61..0b53b85e70ce75cf7d19a38e982a1e935fe6dbb8 100644 --- a/compute/pzlange.c +++ b/compute/pzlange.c @@ -20,7 +20,7 @@ * @date 2014-07-21 * @precisions normal z -> s d c * - **/ + */ //ALLOC_WS : A->mb //ALLOC_WS : A->nb //WS_ADD : A->mb + A->nb @@ -31,9 +31,9 @@ #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 ) { diff --git a/compute/pzlanhe.c b/compute/pzlanhe.c index 79c9ff640230d123de43599225be41e03037d8b4..eb0cb47d8834f4e4aa285611dfe303565877ab09 100644 --- a/compute/pzlanhe.c +++ b/compute/pzlanhe.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ //ALLOC_WS : A->mb //#include <stdlib.h> //#include <math.h> @@ -30,12 +30,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_pzlanhe(MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *result, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzlansy.c b/compute/pzlansy.c index 97aa47a800a5c482ba3cda42316136e198159e2c..3c1bcbd7d485456ae9e8ab1f50923ae5dd3c3a71 100644 --- a/compute/pzlansy.c +++ b/compute/pzlansy.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ //ALLOC_WS : A->mb #include <stdlib.h> #include <math.h> @@ -30,12 +30,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_pzlansy(MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *result, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzlantr.c b/compute/pzlantr.c index 55bcd9a1df75f321c8392351bcd5407bab2b35b4..5943beed8f4be766cafe794068d453b28ca24b54 100644 --- a/compute/pzlantr.c +++ b/compute/pzlantr.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <math.h> #include "control/common.h" @@ -27,9 +27,9 @@ #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, MORSE_desc_t *A, double *result, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzlascal.c b/compute/pzlascal.c index 35fb16557d81eb9b019ca5b73aea31f4865ff98c..4f4224a95bdf2dbaf83080355e569a46663e1ca4 100644 --- a/compute/pzlascal.c +++ b/compute/pzlascal.c @@ -16,13 +16,13 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m, n) A, m, n /** * Parallel scale of a matrix A - **/ + */ void morse_pzlascal(MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzlaset.c b/compute/pzlaset.c index 6da5f4480921186e27195ea07adcd999056fee0a..0ad8fd653da0d1375d6cb26c7ecfea2773796e35 100644 --- a/compute/pzlaset.c +++ b/compute/pzlaset.c @@ -21,14 +21,14 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #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. - **/ + */ void morse_pzlaset(MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, MORSE_desc_t *A, diff --git a/compute/pzlaset2.c b/compute/pzlaset2.c index 3702a5640deba91737555e8ca3da7ca266c10eff..f39e3497589c1039160a8b7b65381fa7a9b01996 100644 --- a/compute/pzlaset2.c +++ b/compute/pzlaset2.c @@ -21,14 +21,14 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n -/******************************************************************************* +/** * Parallel initializztion a 2-D array A to * ALPHA on the offdiagonals. - **/ + */ void morse_pzlaset2(MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzlauum.c b/compute/pzlauum.c index 6729d5e8388e5e0d37902ab529e46dda815ef1d9..d525a9e8bc176d09b002f1564e2f9b7220841ac1 100644 --- a/compute/pzlauum.c +++ b/compute/pzlauum.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzplghe.c b/compute/pzplghe.c index 49457a672a706c5922c9c653f28679ee71030a23..2b9233945ed1dce4c196f958ddeb0f6b48197a68 100644 --- a/compute/pzplghe.c +++ b/compute/pzplghe.c @@ -23,13 +23,13 @@ * @date 2016-08-01 * @precisions normal z -> c * - **/ + */ #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, unsigned long long int seed, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/pzplgsy.c b/compute/pzplgsy.c index 4c31ddc539aace7a6238442a8e54baa7132f4e4e..ed11f6756721a046911dce6d278107a68f375415 100644 --- a/compute/pzplgsy.c +++ b/compute/pzplgsy.c @@ -23,13 +23,13 @@ * @date 2016-08-01 * @precisions normal z -> c d s * - **/ + */ #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, unsigned long long int seed, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/pzplrnt.c b/compute/pzplrnt.c index eb3018908c2e034fe42206f53c74c7cc0d786829..d43f036f86b5c78f196e3b7e6343766e9e6400fc 100644 --- a/compute/pzplrnt.c +++ b/compute/pzplrnt.c @@ -20,13 +20,13 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #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, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/pzpotrf.c b/compute/pzpotrf.c index 286ab56c3de6f0dd7cd3726b9319412c38d26dcf..ad4283dacf541a3e0563df635799396e221edee6 100644 --- a/compute/pzpotrf.c +++ b/compute/pzpotrf.c @@ -23,13 +23,13 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzpotrimm.c b/compute/pzpotrimm.c index d7344d73f09c289ec7d4e60309cd866037dedb74..680a6e79d48f3b88d7f86027dd9b1859bcf40df0 100644 --- a/compute/pzpotrimm.c +++ b/compute/pzpotrimm.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzsymm.c b/compute/pzsymm.c index a88220408b9a0d9ff2f75287f53d847be25b7e82..0af835f5d3dcdae98848edfc3b79967ae1f56e8e 100644 --- a/compute/pzsymm.c +++ b/compute/pzsymm.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/pzsyr2k.c b/compute/pzsyr2k.c index 17d1d136bd275c4d472cc78ffe85ef979494f2d9..f37e72721b9d4f7752d8656703b5257ac33229f1 100644 --- a/compute/pzsyr2k.c +++ b/compute/pzsyr2k.c @@ -20,15 +20,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/pzsyrk.c b/compute/pzsyrk.c index 4ceb3d92d5481bd175ea22bfb34f9c740dda907d..bb918cca5e5cae52f9b07bd0126a4ace633776b5 100644 --- a/compute/pzsyrk.c +++ b/compute/pzsyrk.c @@ -21,14 +21,14 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/pzsytrf.c b/compute/pzsytrf.c index 1192af36eae9405d143541856cdf49cebf7caddd..27f411a7da8c950a87daa9ee4329659a3c5a60e6 100644 --- a/compute/pzsytrf.c +++ b/compute/pzsytrf.c @@ -22,13 +22,13 @@ * @date 2014-10-09 * @precisions normal z -> c * - **/ + */ #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pztile2band.c b/compute/pztile2band.c index 895c8ed7af16391d570bfc684c9036ffe4a28442..0cd73a1c1496c5cd4e214cd1c688782fadbc076c 100644 --- a/compute/pztile2band.c +++ b/compute/pztile2band.c @@ -18,15 +18,15 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pztpgqrt.c b/compute/pztpgqrt.c index a1b91364451ce66b5115378ec96f63e2e921c9f4..9a4079708e0a97ae6282073ac00fc3e9abd8a8e0 100644 --- a/compute/pztpgqrt.c +++ b/compute/pztpgqrt.c @@ -17,7 +17,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define V1(m,n) V1, m, n @@ -32,9 +32,9 @@ #define D(k) V1, k, k #endif -/******************************************************************************* +/** * Parallel tile QR factorization - dynamic scheduling - **/ + */ void morse_pztpgqrt( int L, MORSE_desc_t *V1, MORSE_desc_t *T1, MORSE_desc_t *V2, MORSE_desc_t *T2, diff --git a/compute/pztpqrt.c b/compute/pztpqrt.c index 812d8924c7cc05b27caf2ca336a653753e04bacb..a85d4f2f452dc75487973dcb5e84d3e1998a2fef 100644 --- a/compute/pztpqrt.c +++ b/compute/pztpqrt.c @@ -17,16 +17,16 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n #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, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/pztradd.c b/compute/pztradd.c index 79d77507072128060f74aaa03d1a95606826f7a1..524136171756c19c79d4238e81b7be090e6f03d4 100644 --- a/compute/pztradd.c +++ b/compute/pztradd.c @@ -19,15 +19,15 @@ * @date 2011-11-03 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B, diff --git a/compute/pztrmm.c b/compute/pztrmm.c index 50fcd8a6fb419e8e9adfad5076abf4c47d88fc3c..1551fa10c3e69b6ccc7e8aec59fe4bdbd20f3fdb 100644 --- a/compute/pztrmm.c +++ b/compute/pztrmm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -28,9 +28,9 @@ -/******************************************************************************* +/** * Parallel tile triangular matrix-matrix multiplication - dynamic scheduling - **/ + */ void morse_pztrmm(MORSE_enum side, MORSE_enum uplo, MORSE_enum trans, MORSE_enum diag, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, diff --git a/compute/pztrsm.c b/compute/pztrsm.c index 86f6758728d74213cded42da29dd5c48244a4869..a621ad29eddda6f1bfbe6cf45fc323dc4b4e2c4a 100644 --- a/compute/pztrsm.c +++ b/compute/pztrsm.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #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, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pztrsmpl.c b/compute/pztrsmpl.c index 277696d9a0bb4dc5e298007f3977de4154af737f..b89b3726eaac3ca5f31297999483bca533e26d99 100644 --- a/compute/pztrsmpl.c +++ b/compute/pztrsmpl.c @@ -22,16 +22,16 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n #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, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/pztrtri.c b/compute/pztrtri.c index 58ab31580ded4fc670941c57b4029aa03a039b36..2f94bcb94f020d0bf4c30f818b67cd0766ed31b5 100644 --- a/compute/pztrtri.c +++ b/compute/pztrtri.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzunglq.c b/compute/pzunglq.c index 416794d487af1c6b745106cbcafc73c0aae59aea..f6f83a0b56ace9a31dcb87ed927951b3bf09254f 100644 --- a/compute/pzunglq.c +++ b/compute/pzunglq.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -34,9 +34,9 @@ #define D(k) D, 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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzunglq_param.c b/compute/pzunglq_param.c index da991f9a71e22bf507e02f74cdb590037927e798..9ca050a4db78c7682e30b832a3d07bac0cd204c2 100644 --- a/compute/pzunglq_param.c +++ b/compute/pzunglq_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> diff --git a/compute/pzunglqrh.c b/compute/pzunglqrh.c index 35bcfd80ac6ffdfb4c785076645ae61137f5ba49..f40c63638be5ab70244a0a6f6daff3562624edf9 100644 --- a/compute/pzunglqrh.c +++ b/compute/pzunglqrh.c @@ -21,7 +21,7 @@ * @date 2011-05-24 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) @@ -37,7 +37,7 @@ /** * Parallel construction of Q using tile V (application to identity; * reduction Householder) - dynamic scheduling - **/ + */ void morse_pzunglqrh(MORSE_desc_t *A, MORSE_desc_t *Q, MORSE_desc_t *T, MORSE_desc_t *D, int BS, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzungqr.c b/compute/pzungqr.c index 54d9b4d9f28722bd170c39feb9f0e39857322a95..2bd2b302f46586a33f07a16b768b6264091474c5 100644 --- a/compute/pzungqr.c +++ b/compute/pzungqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -34,9 +34,9 @@ #define D(k) D, 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, MORSE_sequence_t *sequence, MORSE_request_t *request) { diff --git a/compute/pzungqr_param.c b/compute/pzungqr_param.c index d1555a6934aa762f85a4192805a48508b1538cc7..fe7777d095cf4deb3e8b7df28abe77f4f251f6af 100644 --- a/compute/pzungqr_param.c +++ b/compute/pzungqr_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> diff --git a/compute/pzungqrrh.c b/compute/pzungqrrh.c index 809155fc5a9a0667610d4f5f807454a25065eb7f..9b3422cd4afae779360c8a5d5ca71682bd32e6d1 100644 --- a/compute/pzungqrrh.c +++ b/compute/pzungqrrh.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) @@ -39,7 +39,7 @@ /** * Parallel construction of Q using tile V (application to identity; * reduction Householder) - dynamic scheduling - **/ + */ void morse_pzungqrrh(MORSE_desc_t *A, MORSE_desc_t *Q, MORSE_desc_t *T, MORSE_desc_t *D, int BS, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzunmlq.c b/compute/pzunmlq.c index 497a09c6f4df546fe8518afc0de9588ba845d57e..df686642bc6831ce37ae65a92f0be9e5befd0bea 100644 --- a/compute/pzunmlq.c +++ b/compute/pzunmlq.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -37,7 +37,7 @@ /** * Parallel application of Q using tile V - LQ factorization - dynamic scheduling - **/ + */ void morse_pzunmlq(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, MORSE_desc_t *D, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzunmlq_param.c b/compute/pzunmlq_param.c index 4279b84a3ddd78b19837cbdf76fc1245a3a9c43e..c37ea1b59b484c14a23a2b63533e72d6cc30f709 100644 --- a/compute/pzunmlq_param.c +++ b/compute/pzunmlq_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> diff --git a/compute/pzunmlqrh.c b/compute/pzunmlqrh.c index b53e9283c64993b86695f7d7b616eb5d066327a6..cceda501cb3b64716548cc4722de92d87b2eef69 100644 --- a/compute/pzunmlqrh.c +++ b/compute/pzunmlqrh.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) @@ -36,10 +36,10 @@ #define D(m,n) A, (m), (n) #endif -/******************************************************************************* +/** * Parallel application of Q using tile V - LQ factorization (reduction * Householder) - dynamic scheduling - **/ + */ void morse_pzunmlqrh(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) diff --git a/compute/pzunmqr.c b/compute/pzunmqr.c index db1dd3b3ae8f8203939284f0353614d111819e86..3a0f3c18d97e41252869371e1555a1a197cd5308 100644 --- a/compute/pzunmqr.c +++ b/compute/pzunmqr.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, m, n @@ -37,7 +37,7 @@ /** * Parallel application of Q using tile V - QR factorization - dynamic scheduling - **/ + */ void morse_pzunmqr(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, MORSE_desc_t *D, MORSE_sequence_t *sequence, MORSE_request_t *request) diff --git a/compute/pzunmqr_param.c b/compute/pzunmqr_param.c index 169bd4614ed946cab371da790066f2a446501dba..0ad3b1f87eee68a324af18d45bc5138fb3644144 100644 --- a/compute/pzunmqr_param.c +++ b/compute/pzunmqr_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> diff --git a/compute/pzunmqrrh.c b/compute/pzunmqrrh.c index 95fb82d8b26fe533ed3315821dab142194ee6b66..46edc8be91f4ae24975b9bd2d8ec428938d3009f 100644 --- a/compute/pzunmqrrh.c +++ b/compute/pzunmqrrh.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #define A(m,n) A, (m), (n) @@ -36,10 +36,10 @@ #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 ) diff --git a/compute/zbuild.c b/compute/zbuild.c index 67a53a44e6af0323c54e5ad766dd0522350f8dad..d3345a749e01915bdb0b83fc9e31e6a30f1643c4 100644 --- a/compute/zbuild.c +++ b/compute/zbuild.c @@ -19,7 +19,7 @@ * @date 2016-09-05 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -78,7 +78,7 @@ * @sa MORSE_dbuild * @sa MORSE_sbuild * - ******************************************************************************/ + */ int MORSE_zbuild( MORSE_enum uplo, int M, int N, MORSE_Complex64_t *A, int LDA, void *user_data, void* user_build_callback ) @@ -186,7 +186,7 @@ int MORSE_zbuild( MORSE_enum uplo, int M, int N, * @sa MORSE_dbuild_Tile * @sa MORSE_sbuild_Tile * - ******************************************************************************/ + */ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* user_build_callback ) { @@ -254,7 +254,7 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A, * @sa MORSE_dbuild_Tile_Async * @sa MORSE_sbuild_Tile_Async * - ******************************************************************************/ + */ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* user_build_callback, MORSE_sequence_t *sequence, diff --git a/compute/zgeadd.c b/compute/zgeadd.c index 3b57d65ef0b69cee75c8162b132c532d7e2355ef..efbeaa4986f110be955fec2e53d30af4745b276e 100644 --- a/compute/zgeadd.c +++ b/compute/zgeadd.c @@ -18,7 +18,7 @@ * @date 2011-11-03 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -85,7 +85,7 @@ * @sa MORSE_dgeadd * @sa MORSE_sgeadd * - ******************************************************************************/ + */ int MORSE_zgeadd( MORSE_enum trans, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t beta, MORSE_Complex64_t *B, int LDB ) @@ -222,7 +222,7 @@ int MORSE_zgeadd( MORSE_enum trans, int M, int N, * @sa MORSE_dgeadd_Tile * @sa MORSE_sgeadd_Tile * - ******************************************************************************/ + */ int MORSE_zgeadd_Tile( MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B ) @@ -278,7 +278,7 @@ int MORSE_zgeadd_Tile( MORSE_enum trans, * @sa MORSE_dgeadd_Tile_Async * @sa MORSE_sgeadd_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgeadd_Tile_Async( MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B, diff --git a/compute/zgelqf.c b/compute/zgelqf.c index 6b0eed4856c9ba79aee3413b6c285778c06ddfbf..9c0185492df3a6679a7dd3b4a0bd22d710de8f86 100644 --- a/compute/zgelqf.c +++ b/compute/zgelqf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -69,7 +69,7 @@ * @sa MORSE_sgelqf * @sa MORSE_zgelqs * - ******************************************************************************/ + */ int MORSE_zgelqf( int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT ) @@ -177,7 +177,7 @@ int MORSE_zgelqf( int M, int N, * @sa MORSE_sgelqf_Tile * @sa MORSE_zgelqs_Tile * - ******************************************************************************/ + */ int MORSE_zgelqf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) { MORSE_context_t *morse; @@ -231,7 +231,7 @@ int MORSE_zgelqf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) * @sa MORSE_sgelqf_Tile_Async * @sa MORSE_zgelqs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgelqf_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgelqf_param.c b/compute/zgelqf_param.c index d03e62c2f5c0fb04619afb98be3fd0d9be258823..ffa0f2c84bc2419749e0b04382673009f0951a7d 100644 --- a/compute/zgelqf_param.c +++ b/compute/zgelqf_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -67,7 +67,7 @@ * @sa MORSE_sgelqf * @sa MORSE_zgelqs * - ******************************************************************************/ + */ int MORSE_zgelqf_param( const libhqr_tree_t *qrtree, int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT ) @@ -176,7 +176,7 @@ int MORSE_zgelqf_param( const libhqr_tree_t *qrtree, int M, int N, * @sa MORSE_sgelqf_Tile * @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 ) { MORSE_context_t *morse; @@ -231,7 +231,7 @@ int MORSE_zgelqf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE * @sa MORSE_sgelqf_Tile_Async * @sa MORSE_zgelqs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgelqf_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgelqs.c b/compute/zgelqs.c index 5d0365f53765e8cd3f8db6c6a25ca45a9d6cb6ef..1233497593b423092abfc676c12472cf50c7771e 100644 --- a/compute/zgelqs.c +++ b/compute/zgelqs.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -75,7 +75,7 @@ * @sa MORSE_sgelqs * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zgelqs( int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -198,7 +198,7 @@ int MORSE_zgelqs( int M, int N, int NRHS, * @sa MORSE_sgelqs_Tile * @sa MORSE_zgelqf_Tile * - ******************************************************************************/ + */ int MORSE_zgelqs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -254,7 +254,7 @@ int MORSE_zgelqs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) * @sa MORSE_sgelqs_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgelqs_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgelqs_param.c b/compute/zgelqs_param.c index dd692ff0ee019225711a47b8ee37822f1f84e976..c62855559f6b6cdb6083f534707800dc156213a0 100644 --- a/compute/zgelqs_param.c +++ b/compute/zgelqs_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -77,7 +77,7 @@ * @sa MORSE_sgelqs * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zgelqs_param( const libhqr_tree_t *qrtree, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, @@ -204,7 +204,7 @@ int MORSE_zgelqs_param( const libhqr_tree_t *qrtree, int M, int N, int NRHS, * @sa MORSE_sgelqs_Tile * @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 ) { @@ -262,7 +262,7 @@ int MORSE_zgelqs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, * @sa MORSE_sgelqs_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgelqs_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgels.c b/compute/zgels.c index 16c2b673e5ec016aba14694ee59bb5909ab17f33..ad53082643a65d057caf4638a69413b4cdd12752 100644 --- a/compute/zgels.c +++ b/compute/zgels.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -101,7 +101,7 @@ * @sa MORSE_dgels * @sa MORSE_sgels * - ******************************************************************************/ + */ int MORSE_zgels( MORSE_enum trans, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -255,7 +255,7 @@ int MORSE_zgels( MORSE_enum trans, int M, int N, int NRHS, * @sa MORSE_dgels_Tile * @sa MORSE_sgels_Tile * - ******************************************************************************/ + */ int MORSE_zgels_Tile( MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) { @@ -311,7 +311,7 @@ int MORSE_zgels_Tile( MORSE_enum trans, MORSE_desc_t *A, * @sa MORSE_dgels_Tile_Async * @sa MORSE_sgels_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgels_Tile_Async( MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zgels_param.c b/compute/zgels_param.c index d6d9aeeb4107f5fd55c64f5e2ec47d68064882eb..bada9e30021814d1a4d79cc174d6f6804853d240 100644 --- a/compute/zgels_param.c +++ b/compute/zgels_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -104,7 +104,7 @@ * @sa MORSE_dgels * @sa MORSE_sgels * - ******************************************************************************/ + */ int MORSE_zgels_param( const libhqr_tree_t *qrtree, MORSE_enum trans, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, @@ -261,7 +261,7 @@ int MORSE_zgels_param( const libhqr_tree_t *qrtree, MORSE_enum trans, int M, int * @sa MORSE_dgels_Tile * @sa MORSE_sgels_Tile * - ******************************************************************************/ + */ int MORSE_zgels_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B ) { @@ -318,7 +318,7 @@ int MORSE_zgels_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum trans, MORSE * @sa MORSE_dgels_Tile_Async * @sa MORSE_sgels_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgels_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zgemm.c b/compute/zgemm.c index 54c3407bf216910c53fd03f7e672c3b1c8b76b48..06cf67878cab867703f2cac1b9538c95600030db 100644 --- a/compute/zgemm.c +++ b/compute/zgemm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -124,7 +124,7 @@ * @sa MORSE_dgemm * @sa MORSE_sgemm * - ******************************************************************************/ + */ int MORSE_zgemm( MORSE_enum transA, MORSE_enum transB, int M, int N, int K, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, @@ -294,7 +294,7 @@ int MORSE_zgemm( MORSE_enum transA, MORSE_enum transB, int M, int N, int K, * @sa MORSE_dgemm_Tile * @sa MORSE_sgemm_Tile * - ******************************************************************************/ + */ int MORSE_zgemm_Tile( MORSE_enum transA, MORSE_enum transB, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C ) @@ -350,7 +350,7 @@ int MORSE_zgemm_Tile( MORSE_enum transA, MORSE_enum transB, * @sa MORSE_dgemm_Tile_Async * @sa MORSE_sgemm_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgemm_Tile_Async( MORSE_enum transA, MORSE_enum transB, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/zgeqrf.c b/compute/zgeqrf.c index 08edbcca39a8728a1f4f03e727253ac59ed82aaf..1e6e9925f0b49477758943aeeb54b51748b85f9e 100644 --- a/compute/zgeqrf.c +++ b/compute/zgeqrf.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -68,7 +68,7 @@ * @sa MORSE_sgeqrf * @sa MORSE_zgeqrs * - ******************************************************************************/ + */ int MORSE_zgeqrf( int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT ) @@ -176,7 +176,7 @@ int MORSE_zgeqrf( int M, int N, * @sa MORSE_sgeqrf_Tile * @sa MORSE_zgeqrs_Tile * - ******************************************************************************/ + */ int MORSE_zgeqrf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) { MORSE_context_t *morse; @@ -230,7 +230,7 @@ int MORSE_zgeqrf_Tile( MORSE_desc_t *A, MORSE_desc_t *T ) * @sa MORSE_sgeqrf_Tile_Async * @sa MORSE_zgeqrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgeqrf_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgeqrf_param.c b/compute/zgeqrf_param.c index 6fb9263d6d1244541f18cfc7dba17acedfdca5d7..ff8747edef2155f8fbf4daef84bcc5595ebe7a36 100644 --- a/compute/zgeqrf_param.c +++ b/compute/zgeqrf_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -72,7 +72,7 @@ * @sa MORSE_sgeqrf * @sa MORSE_zgeqrs * - ******************************************************************************/ + */ int MORSE_zgeqrf_param( const libhqr_tree_t *qrtree, int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT ) @@ -185,7 +185,7 @@ int MORSE_zgeqrf_param( const libhqr_tree_t *qrtree, int M, int N, * @sa MORSE_sgeqrf_param_Tile * @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 ) { MORSE_context_t *morse; @@ -240,7 +240,7 @@ int MORSE_zgeqrf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE * @sa MORSE_sgeqrf_param_Tile_Async * @sa MORSE_zgeqrs_param_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgeqrf_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgeqrs.c b/compute/zgeqrs.c index 98b0d2ffc6f42058330f14e0d12e7fd2e7162db4..4059d49120ef52c6446ace0c9b2a5425485e7f00 100644 --- a/compute/zgeqrs.c +++ b/compute/zgeqrs.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -75,7 +75,7 @@ * @sa MORSE_sgeqrs * @sa MORSE_zgeqrf * - *******************************************************************************/ + */ int MORSE_zgeqrs( int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -197,7 +197,7 @@ int MORSE_zgeqrs( int M, int N, int NRHS, * @sa MORSE_sgeqrs_Tile * @sa MORSE_zgeqrf_Tile * - ******************************************************************************/ + */ int MORSE_zgeqrs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -253,7 +253,7 @@ int MORSE_zgeqrs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B ) * @sa MORSE_sgeqrs_Tile_Async * @sa MORSE_zgeqrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgeqrs_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgeqrs_param.c b/compute/zgeqrs_param.c index 68bd4382b38009f58c45661e0ca816aa309cbe84..97860c992f207eb569195b03d8af0c27cf239a43 100644 --- a/compute/zgeqrs_param.c +++ b/compute/zgeqrs_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> @@ -71,7 +71,7 @@ * @sa MORSE_sgeqrs * @sa MORSE_zgeqrf * - *******************************************************************************/ + */ int MORSE_zgeqrs_param( const libhqr_tree_t *qrtree, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, @@ -194,7 +194,7 @@ int MORSE_zgeqrs_param( const libhqr_tree_t *qrtree, int M, int N, int NRHS, * @sa MORSE_sgeqrs_Tile * @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 ) { @@ -252,7 +252,7 @@ int MORSE_zgeqrs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, * @sa MORSE_sgeqrs_Tile_Async * @sa MORSE_zgeqrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgeqrs_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zgesv_incpiv.c b/compute/zgesv_incpiv.c index cc1293f68e1bf872216b1459d56c01eef29e65ad..a77008a2c9a7f66d1c4b1dac352bfa77162a034f 100644 --- a/compute/zgesv_incpiv.c +++ b/compute/zgesv_incpiv.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -81,7 +81,7 @@ * @sa MORSE_dgesv_incpiv * @sa MORSE_sgesv_incpiv * - ******************************************************************************/ + */ int MORSE_zgesv_incpiv( int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descL, int *IPIV, @@ -203,7 +203,7 @@ int MORSE_zgesv_incpiv( int N, int NRHS, * @sa MORSE_sgesv_incpiv_Tile * @sa MORSE_zcgesv_Tile * - ******************************************************************************/ + */ int MORSE_zgesv_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -259,7 +259,7 @@ int MORSE_zgesv_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_ * @sa MORSE_sgesv_incpiv_Tile_Async * @sa MORSE_zcgesv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgesv_incpiv_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgesv_nopiv.c b/compute/zgesv_nopiv.c index 1ddbb4e82053e93ffa900eb53251658fda884691..1033b01b232c5bce12dc045dbf1934ceab9b6525 100644 --- a/compute/zgesv_nopiv.c +++ b/compute/zgesv_nopiv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -80,7 +80,7 @@ * @sa MORSE_dgesv_nopiv * @sa MORSE_sgesv_nopiv * - ******************************************************************************/ + */ int MORSE_zgesv_nopiv( int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -193,7 +193,7 @@ int MORSE_zgesv_nopiv( int N, int NRHS, * @sa MORSE_sgesv_nopiv_Tile * @sa MORSE_zcgesv_Tile * - ******************************************************************************/ + */ int MORSE_zgesv_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -248,7 +248,7 @@ int MORSE_zgesv_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_sgesv_nopiv_Tile_Async * @sa MORSE_zcgesv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgesv_nopiv_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgesvd.c b/compute/zgesvd.c index 6fcfb019b3147d16ec42bae4ea342a6daea600de..1c135ae469223b05acbb13c313cde6e1f5d44cc1 100644 --- a/compute/zgesvd.c +++ b/compute/zgesvd.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> #include <stdio.h> @@ -141,7 +141,7 @@ * @sa MORSE_dgesvd * @sa MORSE_sgesvd * - ******************************************************************************/ + */ int MORSE_zgesvd( MORSE_enum jobu, MORSE_enum jobvt, int M, int N, MORSE_Complex64_t *A, int LDA, @@ -329,7 +329,7 @@ int MORSE_zgesvd( MORSE_enum jobu, MORSE_enum jobvt, * @sa MORSE_dgesvd_Tile * @sa MORSE_sgesvd_Tile * - ******************************************************************************/ + */ int MORSE_zgesvd_Tile( MORSE_enum jobu, MORSE_enum jobvt, MORSE_desc_t *A, double *S, @@ -389,7 +389,7 @@ int MORSE_zgesvd_Tile( MORSE_enum jobu, MORSE_enum jobvt, * @sa MORSE_dgesvd_Tile_Async * @sa MORSE_sgesvd_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgesvd_Tile_Async( MORSE_enum jobu, MORSE_enum jobvt, MORSE_desc_t *A, double *S, diff --git a/compute/zgetrf_incpiv.c b/compute/zgetrf_incpiv.c index 91ceca36fa8d44b8e00adbad19c304ccb2160991..13869c0e8991da7038a8fdae91f8f7e7867fb2a0 100644 --- a/compute/zgetrf_incpiv.c +++ b/compute/zgetrf_incpiv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -72,7 +72,7 @@ * @sa MORSE_sgetrf_incpiv * @sa MORSE_zgetrs_incpiv * - ******************************************************************************/ + */ int MORSE_zgetrf_incpiv( int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descL, int *IPIV ) @@ -181,7 +181,7 @@ int MORSE_zgetrf_incpiv( int M, int N, * @sa MORSE_sgetrf_incpiv_Tile * @sa MORSE_zgetrs_incpiv_Tile * - ******************************************************************************/ + */ int MORSE_zgetrf_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV ) { MORSE_context_t *morse; @@ -235,7 +235,7 @@ int MORSE_zgetrf_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV ) * @sa MORSE_sgetrf_incpiv_Tile_Async * @sa MORSE_zgetrs_incpiv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgetrf_incpiv_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgetrf_nopiv.c b/compute/zgetrf_nopiv.c index 485fb393f3a8e625af84fc78d820f6ba51badb70..1112a79a2087bea50f3a36da8e75d861ba500914 100644 --- a/compute/zgetrf_nopiv.c +++ b/compute/zgetrf_nopiv.c @@ -20,7 +20,7 @@ * * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -66,7 +66,7 @@ * @sa MORSE_dgetrf_nopiv * @sa MORSE_sgetrf_nopiv * - ******************************************************************************/ + */ int MORSE_zgetrf_nopiv( int M, int N, MORSE_Complex64_t *A, int LDA ) { @@ -166,7 +166,7 @@ int MORSE_zgetrf_nopiv( int M, int N, * @sa MORSE_sgetrf_nopiv_Tile * @sa MORSE_zgetrs_Tile * - ******************************************************************************/ + */ int MORSE_zgetrf_nopiv_Tile( MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -223,7 +223,7 @@ int MORSE_zgetrf_nopiv_Tile( MORSE_desc_t *A ) * @sa MORSE_sgetrf_nopiv_Tile_Async * @sa MORSE_zgetrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgetrf_nopiv_Tile_Async( MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zgetrs_incpiv.c b/compute/zgetrs_incpiv.c index 2a29c51ed5e2fae553f5b9c0f146f7109534a269..43496bec50707870057b2910d412654a005554cb 100644 --- a/compute/zgetrs_incpiv.c +++ b/compute/zgetrs_incpiv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -82,7 +82,7 @@ * @sa MORSE_sgetrs_incpiv * @sa MORSE_zgetrf_incpiv * - ******************************************************************************/ + */ int MORSE_zgetrs_incpiv( MORSE_enum trans, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descL, int *IPIV, @@ -206,7 +206,7 @@ int MORSE_zgetrs_incpiv( MORSE_enum trans, int N, int NRHS, * @sa MORSE_sgetrs_incpiv_Tile * @sa MORSE_zgetrf_incpiv_Tile * - ******************************************************************************/ + */ int MORSE_zgetrs_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -262,7 +262,7 @@ int MORSE_zgetrs_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE * @sa MORSE_sgetrs_incpiv_Tile_Async * @sa MORSE_zgetrf_incpiv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgetrs_incpiv_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zgetrs_nopiv.c b/compute/zgetrs_nopiv.c index 1a9f6d6c519ce15f6b37308285d80bca6489eb7f..115213ec085050c36da9903b432b782ee0652a6e 100644 --- a/compute/zgetrs_nopiv.c +++ b/compute/zgetrs_nopiv.c @@ -22,7 +22,7 @@ * @date 2014-11-08 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -77,7 +77,7 @@ * @sa MORSE_sgetrs_nopiv * @sa MORSE_zgetrf_nopiv * - ******************************************************************************/ + */ int MORSE_zgetrs_nopiv( MORSE_enum trans, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -193,7 +193,7 @@ int MORSE_zgetrs_nopiv( MORSE_enum trans, int N, int NRHS, * @sa MORSE_sgetrs_nopiv_Tile * @sa MORSE_zgetrf_nopiv_Tile * - ******************************************************************************/ + */ int MORSE_zgetrs_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -248,7 +248,7 @@ int MORSE_zgetrs_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_sgetrs_nopiv_Tile_Async * @sa MORSE_zgetrf_nopiv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zgetrs_nopiv_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zheevd.c b/compute/zheevd.c index 6a76508892fc45562f6b2c366eb8a2a1d5c7eb5d..c4af46e6ced9cf1cc660f12f8b08e52b2d6c3f5e 100644 --- a/compute/zheevd.c +++ b/compute/zheevd.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #include <stdlib.h> #include <string.h> @@ -94,7 +94,7 @@ * @sa MORSE_dsyev * @sa MORSE_ssyev * - ******************************************************************************/ + */ int MORSE_zheevd( MORSE_enum jobz, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, double *W, @@ -234,7 +234,7 @@ int MORSE_zheevd( MORSE_enum jobz, MORSE_enum uplo, int N, * @sa MORSE_dsyev * @sa MORSE_ssyev * - ******************************************************************************/ + */ int MORSE_zheevd_Tile( MORSE_enum jobz, MORSE_enum uplo, MORSE_desc_t *A, double *W, MORSE_desc_t *T ) { @@ -326,7 +326,7 @@ int MORSE_zheevd_Tile( MORSE_enum jobz, MORSE_enum uplo, * @sa MORSE_dsyev_Tile_Async * @sa MORSE_ssyev_Tile_Async * - ******************************************************************************/ + */ int MORSE_zheevd_Tile_Async( MORSE_enum jobz, MORSE_enum uplo, MORSE_desc_t *A, double *W, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zhemm.c b/compute/zhemm.c index 393042aebe55fdde5f73379bd46089a52af4e593..225d64ac79c2a0081787570e7cd6966bf1d9f4b8 100644 --- a/compute/zhemm.c +++ b/compute/zhemm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -100,7 +100,7 @@ * @sa MORSE_dhemm * @sa MORSE_shemm * - ******************************************************************************/ + */ int MORSE_zhemm( MORSE_enum side, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, @@ -259,7 +259,7 @@ int MORSE_zhemm( MORSE_enum side, MORSE_enum uplo, int M, int N, * @sa MORSE_dhemm_Tile * @sa MORSE_shemm_Tile * - ******************************************************************************/ + */ int MORSE_zhemm_Tile( MORSE_enum side, MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C ) @@ -315,7 +315,7 @@ int MORSE_zhemm_Tile( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dhemm_Tile_Async * @sa MORSE_shemm_Tile_Async * - ******************************************************************************/ + */ int MORSE_zhemm_Tile_Async( MORSE_enum side, MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/zher2k.c b/compute/zher2k.c index 12127399371195a1904992cf0bad8b37142253a7..27c76582f1595db8c2584617be250cb229b74e1d 100644 --- a/compute/zher2k.c +++ b/compute/zher2k.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -102,7 +102,7 @@ * @sa MORSE_dher2k * @sa MORSE_sher2k * - ******************************************************************************/ + */ int MORSE_zher2k( MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, double beta, MORSE_Complex64_t *C, int LDC ) @@ -259,7 +259,7 @@ int MORSE_zher2k( MORSE_enum uplo, MORSE_enum trans, int N, int K, * @sa MORSE_dher2k * @sa MORSE_sher2k * - ******************************************************************************/ + */ int MORSE_zher2k_Tile( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, double beta, MORSE_desc_t *C ) @@ -315,7 +315,7 @@ int MORSE_zher2k_Tile( MORSE_enum uplo, MORSE_enum trans, * @sa MORSE_dher2k_Tile_Async * @sa MORSE_sher2k_Tile_Async * - ******************************************************************************/ + */ int MORSE_zher2k_Tile_Async( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, double beta, MORSE_desc_t *C, diff --git a/compute/zherk.c b/compute/zherk.c index 55f28297927266713ec2977997f1e4bde49e4267..a8dd544918f5a340471a75ee24c4127158368884 100644 --- a/compute/zherk.c +++ b/compute/zherk.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -92,7 +92,7 @@ * @sa MORSE_dherk * @sa MORSE_sherk * - ******************************************************************************/ + */ int MORSE_zherk( MORSE_enum uplo, MORSE_enum trans, int N, int K, double alpha, MORSE_Complex64_t *A, int LDA, double beta, MORSE_Complex64_t *C, int LDC ) @@ -235,7 +235,7 @@ int MORSE_zherk( MORSE_enum uplo, MORSE_enum trans, int N, int K, * @sa MORSE_dherk * @sa MORSE_sherk * - ******************************************************************************/ + */ int MORSE_zherk_Tile( MORSE_enum uplo, MORSE_enum trans, double alpha, MORSE_desc_t *A, double beta, MORSE_desc_t *C ) @@ -290,7 +290,7 @@ int MORSE_zherk_Tile( MORSE_enum uplo, MORSE_enum trans, * @sa MORSE_dherk_Tile_Async * @sa MORSE_sherk_Tile_Async * - ******************************************************************************/ + */ int MORSE_zherk_Tile_Async( MORSE_enum uplo, MORSE_enum trans, double alpha, MORSE_desc_t *A, double beta, MORSE_desc_t *C, diff --git a/compute/zhetrd.c b/compute/zhetrd.c index 202dde2b1ac9a0b73a003bfc8d5bb4f88978a1ca..38d0f7abbbe3b9a22a5addf8d3933156253545ce 100644 --- a/compute/zhetrd.c +++ b/compute/zhetrd.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" #if !defined(CHAMELEON_SIMULATION) #include <coreblas/lapacke.h> @@ -107,7 +107,7 @@ * @sa MORSE_dsytrd * @sa MORSE_ssytrd * - ******************************************************************************/ + */ int MORSE_zhetrd( MORSE_enum jobz, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, double *D, @@ -261,7 +261,7 @@ int MORSE_zhetrd( MORSE_enum jobz, MORSE_enum uplo, int N, * @sa MORSE_ssytrd_Tile * @sa MORSE_zhetrd_Tile * - ******************************************************************************/ + */ int MORSE_zhetrd_Tile( MORSE_enum jobz, MORSE_enum uplo, MORSE_desc_t *A, double *D, double *E, MORSE_desc_t *T, MORSE_Complex64_t *Q, int LDQ ) @@ -320,7 +320,7 @@ int MORSE_zhetrd_Tile( MORSE_enum jobz, MORSE_enum uplo, * @sa MORSE_dsytrd_Tile_Async * @sa MORSE_ssytrd_Tile_Async * - ******************************************************************************/ + */ int MORSE_zhetrd_Tile_Async( MORSE_enum jobz, MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/zlacpy.c b/compute/zlacpy.c index 2b2ceb64c26bf7c46ace2b0403ed3a3853ff8383..ea1f0e0e7eb448effd083233cf9421e78c9409ea 100644 --- a/compute/zlacpy.c +++ b/compute/zlacpy.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -68,7 +68,7 @@ * @sa MORSE_dlacpy * @sa MORSE_slacpy * - ******************************************************************************/ + */ int MORSE_zlacpy( MORSE_enum uplo, int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -191,7 +191,7 @@ int MORSE_zlacpy( MORSE_enum uplo, int M, int N, * @sa MORSE_dlacpy_Tile * @sa MORSE_slacpy_Tile * - ******************************************************************************/ + */ int MORSE_zlacpy_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -243,7 +243,7 @@ int MORSE_zlacpy_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_dlacpy_Tile_Async * @sa MORSE_slacpy_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlacpy_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zlange.c b/compute/zlange.c index 3bed789f7181dc76f7842e27f6b5546cbd16639f..e0d4658470dc43728270a453372c2fd164a362ce 100644 --- a/compute/zlange.c +++ b/compute/zlange.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -77,7 +77,7 @@ * @sa MORSE_dlange * @sa MORSE_slange * - ******************************************************************************/ + */ double MORSE_zlange(MORSE_enum norm, int M, int N, MORSE_Complex64_t *A, int LDA ) { @@ -187,7 +187,7 @@ double MORSE_zlange(MORSE_enum norm, int M, int N, * @sa MORSE_dlange_Tile * @sa MORSE_slange_Tile * - ******************************************************************************/ + */ double MORSE_zlange_Tile(MORSE_enum norm, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -239,7 +239,7 @@ double MORSE_zlange_Tile(MORSE_enum norm, MORSE_desc_t *A ) * @sa MORSE_dlange_Tile_Async * @sa MORSE_slange_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlange_Tile_Async( MORSE_enum norm, MORSE_desc_t *A, double *value, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zlanhe.c b/compute/zlanhe.c index 23ac8c1e3f84e7851d5584d41ad05fbb16d8411c..20d6d2873527213c6d8575ca435151edfdf77460 100644 --- a/compute/zlanhe.c +++ b/compute/zlanhe.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -77,7 +77,7 @@ * @sa MORSE_dlanhe * @sa MORSE_slanhe * - ******************************************************************************/ + */ double MORSE_zlanhe(MORSE_enum norm, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -191,7 +191,7 @@ double MORSE_zlanhe(MORSE_enum norm, MORSE_enum uplo, int N, * @sa MORSE_dlanhe_Tile * @sa MORSE_slanhe_Tile * - ******************************************************************************/ + */ double MORSE_zlanhe_Tile( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -243,7 +243,7 @@ double MORSE_zlanhe_Tile( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_dlanhe_Tile_Async * @sa MORSE_slanhe_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlanhe_Tile_Async( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *value, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zlansy.c b/compute/zlansy.c index 06d94e6194d8e3f0b6eceecc7cf656b1d4708aec..10a2d3557283c1815585184480852bf62eb41d6c 100644 --- a/compute/zlansy.c +++ b/compute/zlansy.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -77,7 +77,7 @@ * @sa MORSE_dlansy * @sa MORSE_slansy * - ******************************************************************************/ + */ double MORSE_zlansy(MORSE_enum norm, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -191,7 +191,7 @@ double MORSE_zlansy(MORSE_enum norm, MORSE_enum uplo, int N, * @sa MORSE_dlansy_Tile * @sa MORSE_slansy_Tile * - ******************************************************************************/ + */ double MORSE_zlansy_Tile( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -243,7 +243,7 @@ double MORSE_zlansy_Tile( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_dlansy_Tile_Async * @sa MORSE_slansy_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlansy_Tile_Async( MORSE_enum norm, MORSE_enum uplo, MORSE_desc_t *A, double *value, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zlantr.c b/compute/zlantr.c index 9b1994339eca6cd60595f67fe4cd9d38050bbafd..42127a8b32fa5e669e886a61c1158906d9188b1e 100644 --- a/compute/zlantr.c +++ b/compute/zlantr.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -89,7 +89,7 @@ * @sa MORSE_dlantr * @sa MORSE_slantr * - ******************************************************************************/ + */ double MORSE_zlantr(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, int M, int N, MORSE_Complex64_t *A, int LDA ) { @@ -213,7 +213,7 @@ double MORSE_zlantr(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, * @sa MORSE_dlantr_Tile * @sa MORSE_slantr_Tile * - ******************************************************************************/ + */ double MORSE_zlantr_Tile(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -265,7 +265,7 @@ double MORSE_zlantr_Tile(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, MORS * @sa MORSE_dlantr_Tile_Async * @sa MORSE_slantr_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlantr_Tile_Async( MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A, double *value, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zlascal.c b/compute/zlascal.c index 446037cd67aa692db02faaea7c979912bc81b745..3b7df6dcaa560a4d1f74de803944c7ef485172a5 100644 --- a/compute/zlascal.c +++ b/compute/zlascal.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -67,7 +67,7 @@ * @sa MORSE_dlascal * @sa MORSE_slascal * - ******************************************************************************/ + */ int MORSE_zlascal( MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA ) { @@ -179,7 +179,7 @@ int MORSE_zlascal( MORSE_enum uplo, int M, int N, * @sa MORSE_dlascal_Tile * @sa MORSE_slascal_Tile * - ******************************************************************************/ + */ int MORSE_zlascal_Tile( MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A ) { @@ -233,7 +233,7 @@ int MORSE_zlascal_Tile( MORSE_enum uplo, * @sa MORSE_dlascal_Tile_Async * @sa MORSE_slascal_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlascal_Tile_Async( MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zlaset.c b/compute/zlaset.c index bac3898eebf6f1c164aa6d745e8daa6fdc51b66b..0a6617835206a801efdb70b58a4adaba04e26a2e 100644 --- a/compute/zlaset.c +++ b/compute/zlaset.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -69,7 +69,7 @@ * @sa MORSE_dlaset * @sa MORSE_slaset * - ******************************************************************************/ + */ int MORSE_zlaset( MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, MORSE_Complex64_t *A, int LDA ) @@ -178,7 +178,7 @@ int MORSE_zlaset( MORSE_enum uplo, int M, int N, * @sa MORSE_dlaset_Tile * @sa MORSE_slaset_Tile * - ******************************************************************************/ + */ int MORSE_zlaset_Tile( MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, MORSE_desc_t *A ) @@ -231,7 +231,7 @@ int MORSE_zlaset_Tile( MORSE_enum uplo, * @sa MORSE_dlaset_Tile_Async * @sa MORSE_slaset_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlaset_Tile_Async( MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, MORSE_desc_t *A, diff --git a/compute/zlauum.c b/compute/zlauum.c index eae56d29cec9bbad9c30afe3b848a3353a3aedf3..a21bfefcca440c2aa0c6925b776c09cd8e5b69eb 100644 --- a/compute/zlauum.c +++ b/compute/zlauum.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -71,7 +71,7 @@ * @sa MORSE_slauum * @sa MORSE_zpotri * - ******************************************************************************/ + */ int MORSE_zlauum( MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -177,7 +177,7 @@ int MORSE_zlauum( MORSE_enum uplo, int N, * @sa MORSE_slauum_Tile * @sa MORSE_zpotri_Tile * - ******************************************************************************/ + */ int MORSE_zlauum_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -232,7 +232,7 @@ int MORSE_zlauum_Tile( MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_slauum_Tile_Async * @sa MORSE_zpotri_Tile_Async * - ******************************************************************************/ + */ int MORSE_zlauum_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zplghe.c b/compute/zplghe.c index c8b5743210d8dc71a41390748c2944dfc26577bf..ee944a2a0f62f37c3c39feb6cba0c13fe5add018 100644 --- a/compute/zplghe.c +++ b/compute/zplghe.c @@ -23,7 +23,7 @@ * @date 2016-08-01 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -69,7 +69,7 @@ * @sa MORSE_splghe * @sa MORSE_zplghe * - ******************************************************************************/ + */ int MORSE_zplghe( double bump, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, unsigned long long int seed ) @@ -172,7 +172,7 @@ int MORSE_zplghe( double bump, MORSE_enum uplo, int N, * @sa MORSE_splghe_Tile * @sa MORSE_zplghe_Tile * - ******************************************************************************/ + */ int MORSE_zplghe_Tile( double bump, MORSE_enum uplo, MORSE_desc_t *A, unsigned long long int seed ) { @@ -226,7 +226,7 @@ int MORSE_zplghe_Tile( double bump, MORSE_enum uplo, MORSE_desc_t *A, * @sa MORSE_splghe_Tile_Async * @sa MORSE_zplghe_Tile_Async * - ******************************************************************************/ + */ int MORSE_zplghe_Tile_Async( double bump, MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/zplgsy.c b/compute/zplgsy.c index 985fbab4908cf94b1721a159a15a93f482ff819d..d7fb72be0f5397d951ddf63faf2256a084c48af0 100644 --- a/compute/zplgsy.c +++ b/compute/zplgsy.c @@ -23,7 +23,7 @@ * @date 2016-08-01 * @precisions normal z -> c d s * - **/ + */ #include "control/common.h" /** @@ -69,7 +69,7 @@ * @sa MORSE_splgsy * @sa MORSE_zplgsy * - ******************************************************************************/ + */ int MORSE_zplgsy( MORSE_Complex64_t bump, MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, unsigned long long int seed ) @@ -172,7 +172,7 @@ int MORSE_zplgsy( MORSE_Complex64_t bump, MORSE_enum uplo, int N, * @sa MORSE_splgsy_Tile * @sa MORSE_zplgsy_Tile * - ******************************************************************************/ + */ int MORSE_zplgsy_Tile( MORSE_Complex64_t bump, MORSE_enum uplo, MORSE_desc_t *A, unsigned long long int seed ) @@ -228,7 +228,7 @@ int MORSE_zplgsy_Tile( MORSE_Complex64_t bump, MORSE_enum uplo, * @sa MORSE_zplgsy_Tile_Async * @sa MORSE_zplgsy_Tile_Async * - ******************************************************************************/ + */ int MORSE_zplgsy_Tile_Async( MORSE_Complex64_t bump, MORSE_enum uplo, MORSE_desc_t *A, diff --git a/compute/zplrnt.c b/compute/zplrnt.c index 9f95d610618ee6acbfb5f8a84602aa2fbe7c2c00..62d8c12ddf0280c71bf114c3145ead2d5c199146 100644 --- a/compute/zplrnt.c +++ b/compute/zplrnt.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -63,7 +63,7 @@ * @sa MORSE_zplghe * @sa MORSE_zplgsy * - ******************************************************************************/ + */ int MORSE_zplrnt( int M, int N, MORSE_Complex64_t *A, int LDA, unsigned long long int seed ) @@ -163,7 +163,7 @@ int MORSE_zplrnt( int M, int N, * @sa MORSE_zplghe_Tile * @sa MORSE_zplgsy_Tile * - ******************************************************************************/ + */ int MORSE_zplrnt_Tile( MORSE_desc_t *A, unsigned long long int seed ) { @@ -218,7 +218,7 @@ int MORSE_zplrnt_Tile( MORSE_desc_t *A, * @sa MORSE_zplghe_Tile_Async * @sa MORSE_zplgsy_Tile_Async * - ******************************************************************************/ + */ int MORSE_zplrnt_Tile_Async( MORSE_desc_t *A, unsigned long long int seed, MORSE_sequence_t *sequence, diff --git a/compute/zposv.c b/compute/zposv.c index 3af535201b7bd77a6ead429b06ccbeebb28ad0c6..f4e3f185d5887e8a41d2df15215372c9e66e51a1 100644 --- a/compute/zposv.c +++ b/compute/zposv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -89,7 +89,7 @@ * @sa MORSE_dposv * @sa MORSE_sposv * - ******************************************************************************/ + */ int MORSE_zposv( MORSE_enum uplo, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -219,7 +219,7 @@ int MORSE_zposv( MORSE_enum uplo, int N, int NRHS, * @sa MORSE_dposv_Tile * @sa MORSE_sposv_Tile * - ******************************************************************************/ + */ int MORSE_zposv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -273,7 +273,7 @@ int MORSE_zposv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_dposv_Tile_Async * @sa MORSE_sposv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zposv_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zpotrf.c b/compute/zpotrf.c index 141637995f21b62969a4a81dffa0066380b63d5f..13dc5ca87e7cb548fd74b06701b45bbc865d3082 100644 --- a/compute/zpotrf.c +++ b/compute/zpotrf.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -77,7 +77,7 @@ * @sa MORSE_spotrf * @sa MORSE_zpotrs * - ******************************************************************************/ + */ int MORSE_zpotrf( MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -189,7 +189,7 @@ int MORSE_zpotrf( MORSE_enum uplo, int N, * @sa MORSE_spotrf_Tile * @sa MORSE_zpotrs_Tile * - ******************************************************************************/ + */ int MORSE_zpotrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -243,7 +243,7 @@ int MORSE_zpotrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_spotrf_Tile_Async * @sa MORSE_zpotrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zpotrf_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zpotri.c b/compute/zpotri.c index 109a540de99181d029327f265c057b075589c4e8..c4e4f3be8e84a443ebf8b658a1988509c6af7963 100644 --- a/compute/zpotri.c +++ b/compute/zpotri.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -68,7 +68,7 @@ * @sa MORSE_spotri * @sa MORSE_zpotrf * - ******************************************************************************/ + */ int MORSE_zpotri( MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -177,7 +177,7 @@ int MORSE_zpotri( MORSE_enum uplo, int N, * @sa MORSE_spotri_Tile * @sa MORSE_zpotrf_Tile * - ******************************************************************************/ + */ int MORSE_zpotri_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -232,7 +232,7 @@ int MORSE_zpotri_Tile( MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_spotri_Tile_Async * @sa MORSE_zpotrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zpotri_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zpotrimm.c b/compute/zpotrimm.c index 567cfce7c21b7e77da92f38b3c2f6ca68b46d8fa..4d393828dec9226fbcd25b5a6c73ff6db004c06b 100644 --- a/compute/zpotrimm.c +++ b/compute/zpotrimm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -68,7 +68,7 @@ * @sa MORSE_spotri * @sa MORSE_zpotrf * - ******************************************************************************/ + */ int MORSE_zpotrimm( MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, @@ -199,7 +199,7 @@ int MORSE_zpotrimm( MORSE_enum uplo, int N, * @sa MORSE_spotri_Tile * @sa MORSE_zpotrf_Tile * - ******************************************************************************/ + */ int MORSE_zpotrimm_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *C ) { MORSE_context_t *morse; @@ -256,7 +256,7 @@ int MORSE_zpotrimm_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORS * @sa MORSE_spotri_Tile_Async * @sa MORSE_zpotrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zpotrimm_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *C, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zpotrs.c b/compute/zpotrs.c index 57a29fa8ba368bfe7f33bba86a6651d54b2583ec..8b3a1ef7c7d0cc61e7ed8944685257626add47c3 100644 --- a/compute/zpotrs.c +++ b/compute/zpotrs.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -74,7 +74,7 @@ * @sa MORSE_spotrs * @sa MORSE_zpotrf * - ******************************************************************************/ + */ int MORSE_zpotrs( MORSE_enum uplo, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -195,7 +195,7 @@ int MORSE_zpotrs( MORSE_enum uplo, int N, int NRHS, * @sa MORSE_spotrs_Tile * @sa MORSE_zpotrf_Tile * - ******************************************************************************/ + */ int MORSE_zpotrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -250,7 +250,7 @@ int MORSE_zpotrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_spotrs_Tile_Async * @sa MORSE_zpotrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zpotrs_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zsymm.c b/compute/zsymm.c index 58cd0e7af5a6f5b440f660364f0e4dfa411cb918..dd1794d0ac0e0ee14530f41890c6bacc84f5dbe0 100644 --- a/compute/zsymm.c +++ b/compute/zsymm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -100,7 +100,7 @@ * @sa MORSE_dsymm * @sa MORSE_ssymm * - ******************************************************************************/ + */ int MORSE_zsymm( MORSE_enum side, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, @@ -259,7 +259,7 @@ int MORSE_zsymm( MORSE_enum side, MORSE_enum uplo, int M, int N, * @sa MORSE_dsymm_Tile * @sa MORSE_ssymm_Tile * - ******************************************************************************/ + */ int MORSE_zsymm_Tile( MORSE_enum side, MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C ) @@ -315,7 +315,7 @@ int MORSE_zsymm_Tile( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dsymm_Tile_Async * @sa MORSE_ssymm_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsymm_Tile_Async( MORSE_enum side, MORSE_enum uplo, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/zsyr2k.c b/compute/zsyr2k.c index d2b78621f7f9c909af2ac44e89413e75f8ac027b..a841aa60ae1b41899a859ebd9602cb70c6378ae7 100644 --- a/compute/zsyr2k.c +++ b/compute/zsyr2k.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "control/common.h" /** @@ -102,7 +102,7 @@ * @sa MORSE_dsyr2k * @sa MORSE_ssyr2k * - ******************************************************************************/ + */ int MORSE_zsyr2k( MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, MORSE_Complex64_t beta, MORSE_Complex64_t *C, int LDC ) @@ -259,7 +259,7 @@ int MORSE_zsyr2k( MORSE_enum uplo, MORSE_enum trans, int N, int K, * @sa MORSE_dsyr2k * @sa MORSE_ssyr2k * - ******************************************************************************/ + */ int MORSE_zsyr2k_Tile( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C ) @@ -315,7 +315,7 @@ int MORSE_zsyr2k_Tile( MORSE_enum uplo, MORSE_enum trans, * @sa MORSE_dsyr2k_Tile_Async * @sa MORSE_ssyr2k_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsyr2k_Tile_Async( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/zsyrk.c b/compute/zsyrk.c index f94f771d2755c86cfef95a39aaaf23385dbe6fe3..1e62c5aef92e3a2a6dc8f86a0491660cd1ccf2e8 100644 --- a/compute/zsyrk.c +++ b/compute/zsyrk.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -92,7 +92,7 @@ * @sa MORSE_dsyrk * @sa MORSE_ssyrk * - ******************************************************************************/ + */ int MORSE_zsyrk( MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t beta, MORSE_Complex64_t *C, int LDC ) @@ -235,7 +235,7 @@ int MORSE_zsyrk( MORSE_enum uplo, MORSE_enum trans, int N, int K, * @sa MORSE_dsyrk * @sa MORSE_ssyrk * - ******************************************************************************/ + */ int MORSE_zsyrk_Tile( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *C ) @@ -290,7 +290,7 @@ int MORSE_zsyrk_Tile( MORSE_enum uplo, MORSE_enum trans, * @sa MORSE_dsyrk_Tile_Async * @sa MORSE_ssyrk_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsyrk_Tile_Async( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *C, diff --git a/compute/zsysv.c b/compute/zsysv.c index f93af9ea7b45bd755c7135d889dd2883ab1c92ac..cbfbfb153c84ed0b0004c41bf6dc93047a6c6577 100644 --- a/compute/zsysv.c +++ b/compute/zsysv.c @@ -23,7 +23,7 @@ * @date 2014-10-09 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -86,7 +86,7 @@ * @sa MORSE_zsysv_Tile_Async * @sa MORSE_csysv * - ******************************************************************************/ + */ int MORSE_zsysv( MORSE_enum uplo, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -212,7 +212,7 @@ int MORSE_zsysv( MORSE_enum uplo, int N, int NRHS, * @sa MORSE_zsysv_Tile_Async * @sa MORSE_csysv_Tile * - ******************************************************************************/ + */ int MORSE_zsysv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -264,7 +264,7 @@ int MORSE_zsysv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_zsysv_Tile * @sa MORSE_csysv_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsysv_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zsytrf.c b/compute/zsytrf.c index 26710cfd04c7e06e59af0e4539d1b51785ae9159..023eb796491ab2f43ed739f3f33517a8a51c39b5 100644 --- a/compute/zsytrf.c +++ b/compute/zsytrf.c @@ -17,7 +17,7 @@ * @date 2014-10-09 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -72,7 +72,7 @@ * @sa MORSE_ssytrf * @sa MORSE_zpotrs * - ******************************************************************************/ + */ int MORSE_zsytrf( MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA ) { @@ -178,7 +178,7 @@ int MORSE_zsytrf( MORSE_enum uplo, int N, * @sa MORSE_zsytrf_Tile_Async * @sa MORSE_csytrf_Tile * - ******************************************************************************/ + */ int MORSE_zsytrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -229,7 +229,7 @@ int MORSE_zsytrf_Tile( MORSE_enum uplo, MORSE_desc_t *A ) * @sa MORSE_zsytrf_Tile * @sa MORSE_csytrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsytrf_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zsytrs.c b/compute/zsytrs.c index 6e6f0d8b1cd9a4afb206c4a38351faf5be908ff8..d5286a22b6656813a86bb0ddc55b72816eb4f589 100644 --- a/compute/zsytrs.c +++ b/compute/zsytrs.c @@ -23,7 +23,7 @@ * @date 2014-10-09 * @precisions normal z -> c * - **/ + */ #include "control/common.h" /** @@ -73,7 +73,7 @@ * @sa MORSE_zsytrs_Tile_Async * @sa MORSE_csytrs * - ******************************************************************************/ + */ int MORSE_zsytrs( MORSE_enum uplo, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB ) @@ -191,7 +191,7 @@ int MORSE_zsytrs( MORSE_enum uplo, int N, int NRHS, * @sa MORSE_zsytrs_Tile_Async * @sa MORSE_csytrs_Tile * - ******************************************************************************/ + */ int MORSE_zsytrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -243,7 +243,7 @@ int MORSE_zsytrs_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B ) * @sa MORSE_zsytrs_Tile * @sa MORSE_csytrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_zsytrs_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/ztile.c b/compute/ztile.c index cd2cf855bebfa66ee2af9b83706c9dd91fc25437..17a9e8a385293e34fcfcdccd455e413b546db73c 100644 --- a/compute/ztile.c +++ b/compute/ztile.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -55,7 +55,7 @@ * @sa MORSE_dLapack_to_Tile * @sa MORSE_sLapack_to_Tile * - ******************************************************************************/ + */ int MORSE_zLapack_to_Tile( MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -132,7 +132,7 @@ int MORSE_zLapack_to_Tile( MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A ) * @sa MORSE_dTile_to_Lapack * @sa MORSE_sTile_to_Lapack * - ******************************************************************************/ + */ int MORSE_zTile_to_Lapack( MORSE_desc_t *A, MORSE_Complex64_t *Af77, int LDA ) { MORSE_context_t *morse; diff --git a/compute/ztpgqrt.c b/compute/ztpgqrt.c index a9bc1b118f078b48fe45c421d4ca69ec22d90f38..d311c35ffd756c12f2445578d94524f108a614a2 100644 --- a/compute/ztpgqrt.c +++ b/compute/ztpgqrt.c @@ -17,7 +17,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -128,7 +128,7 @@ * @sa MORSE_stpgqrt * @sa MORSE_zgeqrs * - ******************************************************************************/ + */ int MORSE_ztpgqrt( int M, int N, int K, int L, MORSE_Complex64_t *V1, int LDV1, MORSE_desc_t *descT1, MORSE_Complex64_t *V2, int LDV2, MORSE_desc_t *descT2, @@ -270,7 +270,7 @@ int MORSE_ztpgqrt( int M, int N, int K, int L, * @sa MORSE_stpgqrt_Tile * @sa MORSE_zgeqrs_Tile * - ******************************************************************************/ + */ int MORSE_ztpgqrt_Tile( int L, MORSE_desc_t *V1, MORSE_desc_t *T1, MORSE_desc_t *V2, MORSE_desc_t *T2, @@ -331,7 +331,7 @@ int MORSE_ztpgqrt_Tile( int L, * @sa MORSE_stpgqrt_Tile_Async * @sa MORSE_zgeqrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztpgqrt_Tile_Async( int L, MORSE_desc_t *V1, MORSE_desc_t *T1, MORSE_desc_t *V2, MORSE_desc_t *T2, diff --git a/compute/ztpqrt.c b/compute/ztpqrt.c index 4d031a6f41551deec1c8f1dfdfe88074c17ac785..35426439d2104d0883e6fee2b41b5769eaf7d073 100644 --- a/compute/ztpqrt.c +++ b/compute/ztpqrt.c @@ -17,7 +17,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -123,7 +123,7 @@ * @sa MORSE_stpqrt * @sa MORSE_zgeqrs * - ******************************************************************************/ + */ int MORSE_ztpqrt( int M, int N, int L, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, @@ -247,7 +247,7 @@ int MORSE_ztpqrt( int M, int N, int L, * @sa MORSE_stpqrt_Tile * @sa MORSE_zgeqrs_Tile * - ******************************************************************************/ + */ int MORSE_ztpqrt_Tile( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T ) { MORSE_context_t *morse; @@ -302,7 +302,7 @@ int MORSE_ztpqrt_Tile( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T * @sa MORSE_stpqrt_Tile_Async * @sa MORSE_zgeqrs_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztpqrt_Tile_Async( int L, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/ztradd.c b/compute/ztradd.c index 2805c485cb9d77757398ad68b7582639276c6357..cf43736462fbfcd1fdf42cbc9be4edb0a32c44fb 100644 --- a/compute/ztradd.c +++ b/compute/ztradd.c @@ -18,7 +18,7 @@ * @date 2011-11-03 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -91,7 +91,7 @@ * @sa MORSE_dtradd * @sa MORSE_stradd * - ******************************************************************************/ + */ int MORSE_ztradd( MORSE_enum uplo, MORSE_enum trans, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t beta, MORSE_Complex64_t *B, int LDB ) @@ -238,7 +238,7 @@ int MORSE_ztradd( MORSE_enum uplo, MORSE_enum trans, int M, int N, * @sa MORSE_dtradd_Tile * @sa MORSE_stradd_Tile * - ******************************************************************************/ + */ int MORSE_ztradd_Tile( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B ) @@ -294,7 +294,7 @@ int MORSE_ztradd_Tile( MORSE_enum uplo, MORSE_enum trans, * @sa MORSE_dtradd_Tile_Async * @sa MORSE_stradd_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztradd_Tile_Async( MORSE_enum uplo, MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B, diff --git a/compute/ztrmm.c b/compute/ztrmm.c index ab5e246dacd3541d1fabd6dda3901c1690db1fdc..d1073ff69ee2dc29f91f6adce247ac46846ff278 100644 --- a/compute/ztrmm.c +++ b/compute/ztrmm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -94,7 +94,7 @@ * @sa MORSE_dtrmm * @sa MORSE_strmm * - ******************************************************************************/ + */ int MORSE_ztrmm( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int N, int NRHS, MORSE_Complex64_t alpha, @@ -260,7 +260,7 @@ int MORSE_ztrmm( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dtrmm_Tile * @sa MORSE_strmm_Tile * - ******************************************************************************/ + */ int MORSE_ztrmm_Tile( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B ) @@ -315,7 +315,7 @@ int MORSE_ztrmm_Tile( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dtrmm_Tile_Async * @sa MORSE_strmm_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztrmm_Tile_Async( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, diff --git a/compute/ztrsm.c b/compute/ztrsm.c index 3492409d315850ea6e3a3931b54850f29205952b..b403ab24baff8c05ec7b615e03023c12a345c4aa 100644 --- a/compute/ztrsm.c +++ b/compute/ztrsm.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -95,7 +95,7 @@ * @sa MORSE_dtrsm * @sa MORSE_strsm * - ******************************************************************************/ + */ int MORSE_ztrsm( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int N, int NRHS, MORSE_Complex64_t alpha, @@ -258,7 +258,7 @@ int MORSE_ztrsm( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dtrsm_Tile * @sa MORSE_strsm_Tile * - ******************************************************************************/ + */ int MORSE_ztrsm_Tile( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B ) @@ -313,7 +313,7 @@ int MORSE_ztrsm_Tile( MORSE_enum side, MORSE_enum uplo, * @sa MORSE_dtrsm_Tile_Async * @sa MORSE_strsm_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztrsm_Tile_Async( MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_desc_t *B, diff --git a/compute/ztrsmpl.c b/compute/ztrsmpl.c index 08ae9122a558d32a7ffc17369579a7bbf0d6cac7..4ec6fa35fe9e6de530b4dac04df734ca8bd4446d 100644 --- a/compute/ztrsmpl.c +++ b/compute/ztrsmpl.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -74,7 +74,7 @@ * @sa MORSE_strsmpl * @sa MORSE_zgetrf_incpiv * - ******************************************************************************/ + */ int MORSE_ztrsmpl( int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descL, int *IPIV, @@ -190,7 +190,7 @@ int MORSE_ztrsmpl( int N, int NRHS, * @sa MORSE_strsmpl_Tile * @sa MORSE_zgetrf_incpiv_Tile * - ******************************************************************************/ + */ int MORSE_ztrsmpl_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B ) { MORSE_context_t *morse; @@ -246,7 +246,7 @@ int MORSE_ztrsmpl_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_ * @sa MORSE_strsmpl_Tile_Async * @sa MORSE_zgetrf_incpiv_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztrsmpl_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/ztrtri.c b/compute/ztrtri.c index 9f2cc2643d992d468b34502952c7f185bf9a7d7e..0deff2a58259882f715b538fab6e154dd3fecbc5 100644 --- a/compute/ztrtri.c +++ b/compute/ztrtri.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -76,7 +76,7 @@ * @sa MORSE_strtri * @sa MORSE_zpotri * - ******************************************************************************/ + */ int MORSE_ztrtri( MORSE_enum uplo, MORSE_enum diag, int N, MORSE_Complex64_t *A, int LDA ) { @@ -196,7 +196,7 @@ int MORSE_ztrtri( MORSE_enum uplo, MORSE_enum diag, int N, * @sa MORSE_strtri_Tile * @sa MORSE_zpotri_Tile * - ******************************************************************************/ + */ int MORSE_ztrtri_Tile( MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A ) { MORSE_context_t *morse; @@ -250,7 +250,7 @@ int MORSE_ztrtri_Tile( MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A ) * @sa MORSE_strtri_Tile_Async * @sa MORSE_zpotri_Tile_Async * - ******************************************************************************/ + */ int MORSE_ztrtri_Tile_Async( MORSE_enum uplo, MORSE_enum diag, MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zunglq.c b/compute/zunglq.c index 4c21bde4143aef7b9402f7f76c94378f96fcd150..a684465c2f2f2366e46e508605e0263ef9c68adb 100644 --- a/compute/zunglq.c +++ b/compute/zunglq.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -75,7 +75,7 @@ * @sa MORSE_sorglq * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zunglq( int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -193,7 +193,7 @@ int MORSE_zunglq( int M, int N, int K, * @sa MORSE_sorglq_Tile * @sa MORSE_zgelqf_Tile * - ******************************************************************************/ + */ int MORSE_zunglq_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) { MORSE_context_t *morse; @@ -247,7 +247,7 @@ int MORSE_zunglq_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) * @sa MORSE_sorglq_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunglq_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zunglq_param.c b/compute/zunglq_param.c index 1ca4f517909101e6e74b49039e5cd1189ec87507..328a4e7137dadbb6dc4b6181d2dd3d1a42521174 100644 --- a/compute/zunglq_param.c +++ b/compute/zunglq_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -73,7 +73,7 @@ * @sa MORSE_sorglq * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zunglq_param( const libhqr_tree_t *qrtree, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, @@ -192,7 +192,7 @@ int MORSE_zunglq_param( const libhqr_tree_t *qrtree, int M, int N, int K, * @sa MORSE_sorglq_Tile * @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 ) { MORSE_context_t *morse; @@ -247,7 +247,7 @@ int MORSE_zunglq_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE * @sa MORSE_sorglq_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunglq_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 ) { diff --git a/compute/zungqr.c b/compute/zungqr.c index b2fc10a53a568b7e8c4f8195d93b40726cda3689..69153b4e954b4c0aaac8918de0dfc95d59b74550 100644 --- a/compute/zungqr.c +++ b/compute/zungqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -75,7 +75,7 @@ * @sa MORSE_sorgqr * @sa MORSE_zgeqrf * - ******************************************************************************/ + */ int MORSE_zungqr( int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -192,7 +192,7 @@ int MORSE_zungqr( int M, int N, int K, * @sa MORSE_sorgqr_Tile * @sa MORSE_zgeqrf_Tile * - ******************************************************************************/ + */ int MORSE_zungqr_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) { MORSE_context_t *morse; @@ -246,7 +246,7 @@ int MORSE_zungqr_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q ) * @sa MORSE_sorgqr_Tile_Async * @sa MORSE_zgeqrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zungqr_Tile_Async( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *Q, MORSE_sequence_t *sequence, MORSE_request_t *request ) { diff --git a/compute/zungqr_param.c b/compute/zungqr_param.c index 053c6365fba4cea00c7acc6d2c55c0d8487a4b65..111d85cc4ba079f56ecc924c2fc5a1530f0cda18 100644 --- a/compute/zungqr_param.c +++ b/compute/zungqr_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -73,7 +73,7 @@ * @sa MORSE_sorgqr * @sa MORSE_zgeqrf * - ******************************************************************************/ + */ int MORSE_zungqr_param( const libhqr_tree_t *qrtree, int M, int N, int K, MORSE_Complex64_t *A, int LDA, @@ -193,7 +193,7 @@ int MORSE_zungqr_param( const libhqr_tree_t *qrtree, * @sa MORSE_sorgqr_Tile * @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 ) { MORSE_context_t *morse; @@ -248,7 +248,7 @@ int MORSE_zungqr_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE * @sa MORSE_sorgqr_Tile_Async * @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 ) { MORSE_context_t *morse; diff --git a/compute/zunmlq.c b/compute/zunmlq.c index 5568d31bf799215ba2692fc568aae98aab643e92..fa23e7977d091b4ced4b9963ae850eb38a2976c9 100644 --- a/compute/zunmlq.c +++ b/compute/zunmlq.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -99,7 +99,7 @@ * @sa MORSE_sormlq * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zunmlq( MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -244,7 +244,7 @@ int MORSE_zunmlq( MORSE_enum side, MORSE_enum trans, int M, int N, int K, * @sa MORSE_sormlq_Tile * @sa MORSE_zgelqf_Tile * - ******************************************************************************/ + */ int MORSE_zunmlq_Tile( MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *C ) { @@ -299,7 +299,7 @@ int MORSE_zunmlq_Tile( MORSE_enum side, MORSE_enum trans, * @sa MORSE_sormlq_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunmlq_Tile_Async( MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *C, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zunmlq_param.c b/compute/zunmlq_param.c index 95f228d7b3f8c383f44387b138e0c87587b1ca06..67f8dfa0dfdae0cc99ffbfe751dba179493d366f 100644 --- a/compute/zunmlq_param.c +++ b/compute/zunmlq_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -99,7 +99,7 @@ * @sa MORSE_sormlq * @sa MORSE_zgelqf * - ******************************************************************************/ + */ int MORSE_zunmlq_param( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, @@ -245,7 +245,7 @@ int MORSE_zunmlq_param( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum * @sa MORSE_sormlq_Tile * @sa MORSE_zgelqf_Tile * - ******************************************************************************/ + */ int MORSE_zunmlq_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *C ) { @@ -301,7 +301,7 @@ int MORSE_zunmlq_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE * @sa MORSE_sormlq_Tile_Async * @sa MORSE_zgelqf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunmlq_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *C, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zunmqr.c b/compute/zunmqr.c index 512f0a28b373326b02db12ac9b58542b3a96cba4..27e01a1f5d4fd5ac2b669998dc1c1139ef0a1ec5 100644 --- a/compute/zunmqr.c +++ b/compute/zunmqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -101,7 +101,7 @@ * @sa MORSE_sormqr * @sa MORSE_zgeqrf * - ******************************************************************************/ + */ int MORSE_zunmqr( MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, @@ -248,7 +248,7 @@ int MORSE_zunmqr( MORSE_enum side, MORSE_enum trans, int M, int N, int K, * @sa MORSE_sormqr_Tile * @sa MORSE_zgeqrf_Tile * - ******************************************************************************/ + */ int MORSE_zunmqr_Tile( MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *C ) { @@ -303,7 +303,7 @@ int MORSE_zunmqr_Tile( MORSE_enum side, MORSE_enum trans, * @sa MORSE_sormqr_Tile_Async * @sa MORSE_zgeqrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunmqr_Tile_Async( MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *C, MORSE_sequence_t *sequence, MORSE_request_t *request ) diff --git a/compute/zunmqr_param.c b/compute/zunmqr_param.c index cd7e45ecaba36af7ea411215752f78f92e1ef243..c6903c21533e3e92b9b57253eba363c6d49ead50 100644 --- a/compute/zunmqr_param.c +++ b/compute/zunmqr_param.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> s d c * - **/ + */ #include "control/common.h" /** @@ -102,7 +102,7 @@ * @sa MORSE_sormqr * @sa MORSE_zgeqrf * - ******************************************************************************/ + */ int MORSE_zunmqr_param( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, @@ -251,7 +251,7 @@ int MORSE_zunmqr_param( const libhqr_tree_t *qrtree, * @sa MORSE_sormqr_Tile * @sa MORSE_zgeqrf_Tile * - ******************************************************************************/ + */ int MORSE_zunmqr_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *C ) { @@ -307,7 +307,7 @@ int MORSE_zunmqr_param_Tile( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE * @sa MORSE_sormqr_Tile_Async * @sa MORSE_zgeqrf_Tile_Async * - ******************************************************************************/ + */ int MORSE_zunmqr_param_Tile_Async( const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *C, diff --git a/control/async.c b/control/async.c index b6dee05fd28df42a3c6584116e1eeb4203ba319e..31ec1941e11aff629389b296724e84cfbc9c83fb 100644 --- a/control/async.c +++ b/control/async.c @@ -27,9 +27,9 @@ #include "control/common.h" #include "chameleon/morse_runtime.h" -/******************************************************************************* +/** * Register an exception. - **/ + */ int morse_request_fail(MORSE_sequence_t *sequence, MORSE_request_t *request, int status) { sequence->request = request; @@ -38,9 +38,9 @@ int morse_request_fail(MORSE_sequence_t *sequence, MORSE_request_t *request, int return status; } -/******************************************************************************* +/** * Create a sequence - **/ + */ int morse_sequence_create(MORSE_context_t *morse, MORSE_sequence_t **sequence) { if ((*sequence = malloc(sizeof(MORSE_sequence_t))) == NULL) { @@ -54,9 +54,9 @@ int morse_sequence_create(MORSE_context_t *morse, MORSE_sequence_t **sequence) return MORSE_SUCCESS; } -/******************************************************************************* +/** * Destroy a sequence - **/ + */ int morse_sequence_destroy(MORSE_context_t *morse, MORSE_sequence_t *sequence) { RUNTIME_sequence_destroy( morse, sequence ); @@ -64,16 +64,16 @@ int morse_sequence_destroy(MORSE_context_t *morse, MORSE_sequence_t *sequence) return MORSE_SUCCESS; } -/******************************************************************************* +/** * Wait for the completion of a sequence - **/ + */ int morse_sequence_wait(MORSE_context_t *morse, MORSE_sequence_t *sequence) { RUNTIME_sequence_wait( morse, sequence ); return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Sequences * @@ -89,7 +89,7 @@ int morse_sequence_wait(MORSE_context_t *morse, MORSE_sequence_t *sequence) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Sequence_Create(MORSE_sequence_t **sequence) { MORSE_context_t *morse; @@ -104,7 +104,7 @@ int MORSE_Sequence_Create(MORSE_sequence_t **sequence) return status; } -/** *************************************************************************** +/** * * @ingroup Sequences * @@ -120,7 +120,7 @@ int MORSE_Sequence_Create(MORSE_sequence_t **sequence) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Sequence_Destroy(MORSE_sequence_t *sequence) { MORSE_context_t *morse; @@ -139,7 +139,7 @@ int MORSE_Sequence_Destroy(MORSE_sequence_t *sequence) return status; } -/** *************************************************************************** +/** * * @ingroup Sequences * @@ -155,7 +155,7 @@ int MORSE_Sequence_Destroy(MORSE_sequence_t *sequence) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Sequence_Wait(MORSE_sequence_t *sequence) { MORSE_context_t *morse; @@ -174,7 +174,7 @@ int MORSE_Sequence_Wait(MORSE_sequence_t *sequence) return status; } -/** *************************************************************************** +/** * * @ingroup Sequences * @@ -193,7 +193,7 @@ int MORSE_Sequence_Wait(MORSE_sequence_t *sequence) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Sequence_Flush(MORSE_sequence_t *sequence, MORSE_request_t *request) { MORSE_context_t *morse; diff --git a/control/async.h b/control/async.h index a2196ffe459f9cbe4e3f2c6697ab6435d26bee79..3773cd34e821408397b0ce6c8e0f49004fd6a804 100644 --- a/control/async.h +++ b/control/async.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #ifndef _MORSE_ASYNC_H_ #define _MORSE_ASYNC_H_ @@ -26,9 +26,9 @@ extern "C" { #endif -/******************************************************************************* +/** * Internal routines - **/ + */ int morse_request_fail (MORSE_sequence_t *sequence, MORSE_request_t *request, int error); int morse_sequence_create (MORSE_context_t *MORSE, MORSE_sequence_t **sequence); int morse_sequence_destroy (MORSE_context_t *MORSE, MORSE_sequence_t *sequence); diff --git a/control/auxiliary.c b/control/auxiliary.c index 950dfb0de61fc0bb506ae393fe1ff2da0adc436c..db8c7e678dffcae5b2dda06e6c35f29adc9ca593 100644 --- a/control/auxiliary.c +++ b/control/auxiliary.c @@ -32,7 +32,7 @@ #include <stdlib.h> #include <limits.h> -/******************************************************************************* +/** * * Indicates a recoverable problem. * User's erroneous action without severe consequences. @@ -45,7 +45,7 @@ * @param[in] msg_text * Warning message to display. * - ******************************************************************************/ + */ void morse_warning(const char *func_name, const char *msg_text) { MORSE_context_t *morse; @@ -57,7 +57,7 @@ void morse_warning(const char *func_name, const char *msg_text) fprintf(stderr, "MORSE WARNING: %s(): %s\n", func_name, msg_text); } -/******************************************************************************* +/** * * Indicates a recoverable problem. * User's erroneous action with potentially severe consequences. @@ -70,13 +70,13 @@ void morse_warning(const char *func_name, const char *msg_text) * @param[in] msg_text * Warning message to display. * - ******************************************************************************/ + */ void morse_error(const char *func_name, const char *msg_text) { fprintf(stderr, "MORSE ERROR: %s(): %s\n", func_name, msg_text); } -/******************************************************************************* +/** * * Unexpected behavior within the library. * Unrecoverable user errors. @@ -88,24 +88,24 @@ void morse_error(const char *func_name, const char *msg_text) * @param[in] msg_text * Warning message to display. * - ******************************************************************************/ + */ void morse_fatal_error(const char *func_name, const char *msg_text) { fprintf(stderr, "MORSE FATAL ERROR: %s(): %s\n", func_name, msg_text); exit(0); } -/******************************************************************************* +/** * Returns core id - **/ + */ int morse_rank(MORSE_context_t *morse) { return RUNTIME_thread_rank( morse ); } -/******************************************************************************* +/** * Tune block size nb and internal block size ib - **/ + */ int morse_tune(MORSE_enum func, int M, int N, int NRHS) { MORSE_context_t *morse; @@ -120,7 +120,7 @@ int morse_tune(MORSE_enum func, int M, int N, int NRHS) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Auxiliary * @@ -142,7 +142,7 @@ int morse_tune(MORSE_enum func, int M, int N, int NRHS) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Version(int *ver_major, int *ver_minor, int *ver_micro) { if (! ver_major && ! ver_minor && ! ver_micro) @@ -160,7 +160,7 @@ int MORSE_Version(int *ver_major, int *ver_minor, int *ver_micro) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Auxiliary * @@ -183,7 +183,7 @@ int MORSE_Version(int *ver_major, int *ver_minor, int *ver_micro) * @return * \retval Element size in bytes * - *****************************************************************************/ + */ int MORSE_Element_Size(int type) { switch(type) { @@ -199,7 +199,7 @@ int MORSE_Element_Size(int type) } } -/** *************************************************************************** +/** * * @ingroup Auxiliary * @@ -212,7 +212,7 @@ int MORSE_Element_Size(int type) * @return * \retval MPI rank * - *****************************************************************************/ + */ int MORSE_My_Mpi_Rank(void) { #if defined(CHAMELEON_USE_MPI) @@ -227,9 +227,9 @@ int MORSE_My_Mpi_Rank(void) #endif } -/******************************************************************************* +/** * Display a progress percentage in stderr - **/ + */ void update_progress(int currentValue, int maximumValue) { div_t res ; static int progress = -1; /* varie de 0 a 100 au cours du calcul concerne */ diff --git a/control/auxiliary.h b/control/auxiliary.h index b80039a7bb40a1946a9bcb2367262d6b32ae1647..45ba468a8c5ed3917871b40bf0e30a4d26d39209 100644 --- a/control/auxiliary.h +++ b/control/auxiliary.h @@ -18,7 +18,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #ifndef _MORSE_AUXILIARY_H_ #define _MORSE_AUXILIARY_H_ @@ -28,18 +28,18 @@ extern "C" { #endif -/******************************************************************************* +/** * Internal routines - **/ + */ void morse_warning (const char *func_name, const char* msg_text); void morse_error (const char *func_name, const char* msg_text); void morse_fatal_error (const char *func_name, const char* msg_text); int morse_rank (MORSE_context_t *morse); int morse_tune (MORSE_enum func, int M, int N, int NRHS); -/******************************************************************************* +/** * API routines - **/ + */ int MORSE_Version (int *ver_major, int *ver_minor, int *ver_micro); int MORSE_Element_Size (int type); int MORSE_My_Mpi_Rank (void); diff --git a/control/common.h b/control/common.h index d3601deacedcf996952ce50339f130ef14bef609..ad11d04ddb68c8477e5cb43eb3dc5df7269e32d6 100644 --- a/control/common.h +++ b/control/common.h @@ -16,11 +16,11 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ -/******************************************************************************* + */ +/** * MORSE facilities of interest to both MORSE core developer * and also of interest to MORSE community contributor. - **/ + */ #ifndef _MORSE_COMMON_H_ #define _MORSE_COMMON_H_ @@ -31,9 +31,9 @@ #include <unistd.h> #endif -/** **************************************************************************** +/** * Implementation headers - **/ + */ #if defined(CHAMELEON_USE_CUDA) && !defined(CHAMELEON_SIMULATION) #include <cuda.h> #include <cuda_runtime.h> @@ -54,17 +54,17 @@ #include <mpi.h> #endif -/** **************************************************************************** +/** * Line to avoid conflict with other linear algebra libraries, because, we * don't know why but lapacke provide a wrong interface of lapack in fortran - **/ + */ #ifndef LAPACK_NAME #define LAPACK_NAME(a, b) lapackef77_##a #endif -/** **************************************************************************** +/** * Chameleon header files - **/ + */ #include "morse.h" #include "control/global.h" @@ -73,9 +73,9 @@ #include "control/descriptor.h" #include "control/async.h" -/******************************************************************************* +/** * Global shortcuts - **/ + */ #define MORSE_RANK morse_rank(morse) #define MORSE_SIZE morse->world_size #define MORSE_GRPSIZE morse->group_size @@ -93,16 +93,16 @@ #define MORSE_MPI_SIZE morse->mpi_comm_size #endif -/******************************************************************************* +/** * IPT internal define - **/ + */ #define MorseIPT_NoDep 0 #define MorseIPT_Panel 1 #define MorseIPT_All 2 -/******************************************************************************* +/** * Global array of LAPACK constants - **/ + */ extern char *morse_lapack_constants[]; #define morse_lapack_const(morse_const) morse_lapack_constants[morse_const][0] diff --git a/control/compute_z.h b/control/compute_z.h index 582faf667dfeecb6966a814741ef46209e2c9ba3..67c7815f4209f88bd510c82f8259f80dc6f96f6b 100644 --- a/control/compute_z.h +++ b/control/compute_z.h @@ -21,17 +21,17 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ -/******************************************************************************* + */ +/** * LAPACK/Tile Descriptor accesses - **/ + */ #define MorseDescInput 1 #define MorseDescOutput 2 #define MorseDescInout (MorseDescInput | MorseDescOutput) -/***************************************************************************//** +/** * Macro for matrix conversion / Lapack interface - **/ + */ #define morse_zdesc_alloc_diag( descA, mb, nb, lm, ln, i, j, m, n, p, q) \ descA = morse_desc_init_diag( \ MorseComplexDouble, (mb), (nb), ((mb)*(nb)), \ @@ -50,16 +50,16 @@ } \ RUNTIME_desc_create( &(descA) ); -/***************************************************************************//** +/** * Declarations of internal sequential functions - **/ + */ int morse_zshift(MORSE_context_t *morse, int m, int n, MORSE_Complex64_t *A, int nprob, int me, int ne, int L, MORSE_sequence_t *sequence, MORSE_request_t *request); -/***************************************************************************//** +/** * Declarations of parallel functions (dynamic scheduling) - alphabetical order - **/ + */ void morse_pzbarrier_pnl2tl(MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request); void morse_pzbarrier_row2tl(MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request); void morse_pzbarrier_tl2pnl(MORSE_desc_t *A, MORSE_sequence_t *sequence, MORSE_request_t *request); diff --git a/control/context.c b/control/context.c index 5b26edd7bce42afe8f3e33528c8077258a408b1c..444bf5ce696682b816fba90e8a512ea803e60a8a 100644 --- a/control/context.c +++ b/control/context.c @@ -40,15 +40,15 @@ #include "coreblas.h" #endif -/******************************************************************************* +/** * Global data - **/ + */ /* master threads context lookup table */ static MORSE_context_t *morse_ctxt = NULL; -/******************************************************************************* +/** * Create new context - **/ + */ MORSE_context_t *morse_context_create() { MORSE_context_t *morse; @@ -92,17 +92,17 @@ MORSE_context_t *morse_context_create() } -/******************************************************************************* +/** * Return context for a thread - **/ + */ MORSE_context_t *morse_context_self() { return morse_ctxt; } -/******************************************************************************* +/** * Clean the context - **/ + */ int morse_context_destroy(){ RUNTIME_context_destroy(morse_ctxt); @@ -112,7 +112,7 @@ int morse_context_destroy(){ return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Options * @@ -133,7 +133,7 @@ int morse_context_destroy(){ * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Enable(MORSE_enum option) { MORSE_context_t *morse; @@ -181,7 +181,7 @@ int MORSE_Enable(MORSE_enum option) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Options * @@ -202,7 +202,7 @@ int MORSE_Enable(MORSE_enum option) * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Disable(MORSE_enum option) { MORSE_context_t *morse; @@ -245,7 +245,7 @@ int MORSE_Disable(MORSE_enum option) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Options * @@ -266,7 +266,7 @@ int MORSE_Disable(MORSE_enum option) * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Set(MORSE_enum param, int value) { MORSE_context_t *morse; @@ -339,7 +339,7 @@ int MORSE_Set(MORSE_enum param, int value) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Options * @@ -360,7 +360,7 @@ int MORSE_Set(MORSE_enum param, int value) * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Get(MORSE_enum param, int *value) { MORSE_context_t *morse; diff --git a/control/context.h b/control/context.h index 52334df5198aeb683f7f840c4e2e44ca504c3953..6ddc295511287abb4c3eb3d236200dce37cf9eaf 100644 --- a/control/context.h +++ b/control/context.h @@ -18,15 +18,15 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #ifndef _MORSE_CONTEXT_H_ #define _MORSE_CONTEXT_H_ #include "chameleon/morse_struct.h" -/******************************************************************************* +/** * Routines to handle threads context - **/ + */ #ifdef __cplusplus extern "C" { #endif diff --git a/control/control.c b/control/control.c index 5dd372f8bcb2cceb163a33aa2226030451e30c81..b478c7eb3a5c39d6a33630559c0ad52df1a81fbd 100644 --- a/control/control.c +++ b/control/control.c @@ -30,7 +30,7 @@ #include "control/common.h" #include "chameleon/morse_runtime.h" -/** *************************************************************************** +/** * * @ingroup Control * @@ -49,13 +49,13 @@ * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Init(int cores, int gpus) { return MORSE_InitPar(cores, gpus, -1); } -/** *************************************************************************** +/** * * @ingroup Control * @@ -77,7 +77,7 @@ int MORSE_Init(int cores, int gpus) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_InitPar(int ncpus, int ncudas, int nthreads_per_worker) { MORSE_context_t *morse; @@ -108,7 +108,7 @@ int MORSE_InitPar(int ncpus, int ncudas, int nthreads_per_worker) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -119,7 +119,7 @@ int MORSE_InitPar(int ncpus, int ncudas, int nthreads_per_worker) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Finalize(void) { MORSE_context_t *morse = morse_context_self(); @@ -142,7 +142,7 @@ int MORSE_Finalize(void) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -153,7 +153,7 @@ int MORSE_Finalize(void) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Pause(void) { MORSE_context_t *morse = morse_context_self(); @@ -165,7 +165,7 @@ int MORSE_Pause(void) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -177,7 +177,7 @@ int MORSE_Pause(void) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Resume(void) { MORSE_context_t *morse = morse_context_self(); @@ -189,7 +189,7 @@ int MORSE_Resume(void) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -200,7 +200,7 @@ int MORSE_Resume(void) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Distributed_start(void) { MORSE_context_t *morse = morse_context_self(); @@ -212,7 +212,7 @@ int MORSE_Distributed_start(void) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -223,7 +223,7 @@ int MORSE_Distributed_start(void) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Distributed_stop(void) { MORSE_context_t *morse = morse_context_self(); @@ -235,7 +235,7 @@ int MORSE_Distributed_stop(void) return MORSE_SUCCESS; } -/** *************************************************************************** +/** * * @ingroup Control * @@ -246,7 +246,7 @@ int MORSE_Distributed_stop(void) * @retval The size of the distributed computation * @retval -1 if context not initialized * - *****************************************************************************/ + */ int MORSE_Comm_size() { MORSE_context_t *morse = morse_context_self(); @@ -258,7 +258,7 @@ int MORSE_Comm_size() return RUNTIME_comm_size( morse ); } -/** *************************************************************************** +/** * * @ingroup Control * @@ -269,7 +269,7 @@ int MORSE_Comm_size() * @retval The rank of the distributed computation * @retval -1 if context not initialized * - *****************************************************************************/ + */ int MORSE_Comm_rank() { MORSE_context_t *morse = morse_context_self(); @@ -281,7 +281,7 @@ int MORSE_Comm_rank() return RUNTIME_comm_rank( morse ); } -/** *************************************************************************** +/** * * @ingroup Control * @@ -293,7 +293,7 @@ int MORSE_Comm_rank() * @return * \retval The number of CPU workers started * - *****************************************************************************/ + */ int MORSE_GetThreadNbr( ) { MORSE_context_t *morse = morse_context_self(); diff --git a/control/descriptor.c b/control/descriptor.c index a9a43054e8386c448e59f1c2be7ba8d41d4fa4e1..227ae49707eede9ff9b2cc4ca4a9a0023c615020 100644 --- a/control/descriptor.c +++ b/control/descriptor.c @@ -95,7 +95,7 @@ static int nbdesc = 0; * * @return The descriptor with the matrix description parameters set. * - *****************************************************************************/ + */ MORSE_desc_t morse_desc_init_user(MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q, @@ -191,9 +191,9 @@ MORSE_desc_t morse_desc_init_user(MORSE_enum dtyp, int mb, int nb, int bsiz, return desc; } -/******************************************************************************* +/** * Internal static descriptor initializer - **/ + */ MORSE_desc_t morse_desc_init(MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q) @@ -202,9 +202,9 @@ MORSE_desc_t morse_desc_init(MORSE_enum dtyp, int mb, int nb, int bsiz, morse_getaddr_ccrb, morse_getblkldd_ccrb, morse_getrankof_2d); } -/******************************************************************************* +/** * Internal static descriptor initializer for a block diagonal matrix - **/ + */ MORSE_desc_t morse_desc_init_diag(MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q) @@ -213,9 +213,9 @@ MORSE_desc_t morse_desc_init_diag(MORSE_enum dtyp, int mb, int nb, int bsiz, morse_getaddr_ccrb, morse_getblkldd_ccrb, morse_getrankof_2d_diag); } -/******************************************************************************* +/** * Internal static descriptor initializer for submatrices - **/ + */ MORSE_desc_t* morse_desc_submatrix(MORSE_desc_t *descA, int i, int j, int m, int n) { MORSE_desc_t *descB = malloc(sizeof(MORSE_desc_t)); @@ -248,9 +248,9 @@ MORSE_desc_t* morse_desc_submatrix(MORSE_desc_t *descA, int i, int j, int m, int return descB; } -/******************************************************************************* +/** * Check for descriptor correctness - **/ + */ int morse_desc_check(const MORSE_desc_t *desc) { if (desc == NULL) { @@ -295,9 +295,9 @@ int morse_desc_check(const MORSE_desc_t *desc) return MORSE_SUCCESS; } -/******************************************************************************* +/** * - **/ + */ int morse_desc_mat_alloc( MORSE_desc_t *desc ) { size_t size = (size_t)(desc->llm) * (size_t)(desc->lln) @@ -313,9 +313,9 @@ int morse_desc_mat_alloc( MORSE_desc_t *desc ) return MORSE_SUCCESS; } -/******************************************************************************* +/** * - **/ + */ int morse_desc_mat_free( MORSE_desc_t *desc ) { if ( (desc->mat != NULL) && @@ -392,7 +392,7 @@ int morse_desc_mat_free( MORSE_desc_t *desc ) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Create(MORSE_desc_t **descptr, void *mat, MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q) { @@ -506,7 +506,7 @@ int MORSE_Desc_Create(MORSE_desc_t **descptr, void *mat, MORSE_enum dtyp, int mb * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Create_User(MORSE_desc_t **descptr, void *mat, MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q, void* (*get_blkaddr)( const MORSE_desc_t*, int, int ), @@ -603,7 +603,7 @@ int MORSE_Desc_Create_User(MORSE_desc_t **descptr, void *mat, MORSE_enum dtyp, i * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Create_OOC_User(MORSE_desc_t **descptr, MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q, int (*get_rankof)( const MORSE_desc_t*, int, int )) @@ -699,7 +699,7 @@ int MORSE_Desc_Create_OOC_User(MORSE_desc_t **descptr, MORSE_enum dtyp, int mb, * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Create_OOC(MORSE_desc_t **descptr, MORSE_enum dtyp, int mb, int nb, int bsiz, int lm, int ln, int i, int j, int m, int n, int p, int q) { @@ -725,7 +725,7 @@ int MORSE_Desc_Create_OOC(MORSE_desc_t **descptr, MORSE_enum dtyp, int mb, int n * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Destroy(MORSE_desc_t **desc) { MORSE_context_t *morse; @@ -766,7 +766,7 @@ int MORSE_Desc_Destroy(MORSE_desc_t **desc) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Acquire (MORSE_desc_t *desc) { return RUNTIME_desc_acquire( desc ); } @@ -790,7 +790,7 @@ int MORSE_Desc_Acquire (MORSE_desc_t *desc) { * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Release (MORSE_desc_t *desc) { return RUNTIME_desc_release( desc ); } @@ -812,7 +812,7 @@ int MORSE_Desc_Release (MORSE_desc_t *desc) { * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Desc_Flush( MORSE_desc_t *desc, MORSE_sequence_t *sequence ) { @@ -843,7 +843,7 @@ int MORSE_Desc_Flush( MORSE_desc_t *desc, * @return * \retval none * - *****************************************************************************/ + */ void MORSE_user_tag_size(int user_tag_width, int user_tag_sep) { RUNTIME_comm_set_tag_sizes( user_tag_width, user_tag_sep ); return; diff --git a/control/descriptor.h b/control/descriptor.h index 02c6d9730901e96e6ab2622136e2a3f14c9eb63f..549762e184fed9ef4523dbd046264c9fed1f9898 100644 --- a/control/descriptor.h +++ b/control/descriptor.h @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #ifndef _MORSE_DESCRIPTOR_H_ #define _MORSE_DESCRIPTOR_H_ @@ -30,9 +30,9 @@ extern "C" { #endif -/******************************************************************************* +/** * Internal routines - **/ + */ inline static void* morse_geteltaddr(const MORSE_desc_t *A, int m, int n, int eltsize); inline static void* morse_getaddr_cm (const MORSE_desc_t *A, int m, int n); inline static void* morse_getaddr_ccrb (const MORSE_desc_t *A, int m, int n); @@ -40,7 +40,7 @@ inline static void* morse_getaddr_null (const MORSE_desc_t *A, int m, int n); inline static int morse_getblkldd_cm (const MORSE_desc_t *A, int m); inline static int morse_getblkldd_ccrb(const MORSE_desc_t *A, int m); -/***************************************************************** +/** * Data distributions */ inline static int morse_getrankof_2d(const MORSE_desc_t *desc, int m, int n); @@ -64,9 +64,9 @@ int morse_desc_mat_free (MORSE_desc_t *desc); #define BLKLDD(A, k) A->get_blkldd( A,k ) -/******************************************************************************* +/** * Internal function to return address of block (m,n) with m,n = block indices - **/ + */ inline static void* morse_getaddr_ccrb(const MORSE_desc_t *A, int m, int n) { size_t mm = m + A->i / A->mb; @@ -96,9 +96,9 @@ inline static void* morse_getaddr_ccrb(const MORSE_desc_t *A, int m, int n) return (void*)((intptr_t)A->mat + (offset*eltsize) ); } -/******************************************************************************* +/** * Internal function to return address of block (m,n) with m,n = block indices - **/ + */ inline static void *morse_getaddr_cm(const MORSE_desc_t *A, int m, int n) { size_t mm = m + A->i / A->mb; @@ -116,19 +116,19 @@ inline static void *morse_getaddr_cm(const MORSE_desc_t *A, int m, int n) return (void*)((intptr_t)A->mat + (offset*eltsize) ); } -/******************************************************************************* +/** * Internal function to return address of block (m,n) with m,n = block indices * This version lets the runtime allocate on-demand. - **/ + */ inline static void *morse_getaddr_null(const MORSE_desc_t *A, int m, int n) { (void)A; (void)m; (void)n; return NULL; } -/******************************************************************************* +/** * Internal function to return address of element A(m,n) with m,n = matrix indices - **/ + */ inline static void* morse_geteltaddr(const MORSE_desc_t *A, int m, int n, int eltsize) // Not used anywhere ?! { size_t mm = (m + A->i)/A->mb; @@ -156,9 +156,9 @@ inline static void* morse_geteltaddr(const MORSE_desc_t *A, int m, int n, int el return (void*)((intptr_t)A->mat + (offset*eltsize) ); } -/******************************************************************************* +/** * Internal function to return the leading dimension of element A(m,*) with m,n = block indices - **/ + */ inline static int morse_getblkldd_ccrb(const MORSE_desc_t *A, int m) { int mm = m + A->i / A->mb; @@ -171,17 +171,17 @@ inline static int morse_getblkldd_cm(const MORSE_desc_t *A, int m) { } -/******************************************************************************* +/** * Internal function to return MPI rank of element A(m,n) with m,n = block indices - **/ + */ inline static int morse_getrankof_2d(const MORSE_desc_t *desc, int m, int n) { return (m % desc->p) * desc->q + (n % desc->q); } -/******************************************************************************* +/** * Internal function to return MPI rank of element DIAG(m,0) with m,n = block indices - **/ + */ inline static int morse_getrankof_2d_diag(const MORSE_desc_t *desc, int m, int n) { assert( n == 0 ); @@ -189,9 +189,9 @@ inline static int morse_getrankof_2d_diag(const MORSE_desc_t *desc, int m, int n } -/******************************************************************************* +/** * Detect if the tile is local or not - **/ + */ inline static int morse_desc_islocal( const MORSE_desc_t *A, int m, int n ) { #if defined(CHAMELEON_USE_MPI) @@ -202,7 +202,7 @@ inline static int morse_desc_islocal( const MORSE_desc_t *A, int m, int n ) #endif /* defined(CHAMELEON_USE_MPI) */ } -/******************************************************************************* +/** * Declare data accesses of codelets using these macros, for instance: * MORSE_BEGIN_ACCESS_DECLARATION * MORSE_ACCESS_R(A, Am, An) diff --git a/control/gkkleader.h b/control/gkkleader.h index 90ba2bce546f3402687174c6ee5341205232952c..6e4d17c18f37eb796dab48dee77ba99a91c59f6f 100644 --- a/control/gkkleader.h +++ b/control/gkkleader.h @@ -18,7 +18,7 @@ * based on the GKK algorithm by Gustavson, Karlsson, Kagstrom * and its fortran implementation. * - **/ + */ #ifndef GKKLEADERS_H #define GKKLEADERS_H diff --git a/control/global.h b/control/global.h index 50fbcbf923510d65076d3e608c914e936cffe950..7386a3600da16f6b2449af2c21defdeac12773b0 100644 --- a/control/global.h +++ b/control/global.h @@ -17,11 +17,11 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ -/******************************************************************************* + */ +/** * MORSE internals of interest to MORSE core developers, but not necessarily * of interest to MORSE community contributors. - **/ + */ #ifndef _MORSE_GLOBAL_H_ #define _MORSE_GLOBAL_H_ @@ -31,9 +31,9 @@ #include <pthread.h> #endif -/******************************************************************************* +/** * Numerical operations - **/ + */ #define MORSE_FUNC_SGELS 1 #define MORSE_FUNC_SPOSV 2 #define MORSE_FUNC_SGESV 3 diff --git a/control/morse_f77.c b/control/morse_f77.c index b0cec40dacd75ffbf0e6238128b2bdfa8441aabb..690dfd03bec7e175737a742bfff2c4736d798f77 100644 --- a/control/morse_f77.c +++ b/control/morse_f77.c @@ -17,7 +17,7 @@ * @author Florent Pruvost * @date 2010-11-15 * - **/ + */ #include <stdlib.h> #include "control/common.h" #include "morse.h" @@ -27,9 +27,9 @@ extern "C" { #endif - /******************************************************************************* + /** * FORTRAN API - auxiliary function prototypes - **/ + */ void MORSE_INIT(int *CORES, int *NGPUS, int *INFO) { *INFO = MORSE_Init(*CORES, *NGPUS); } @@ -60,9 +60,9 @@ extern "C" { *INFO = MORSE_SUCCESS; } - /*************************************************************************** + /** * FORTRAN API - descriptor allocation and deallocation - **/ + */ void MORSE_DESC_CREATE(MORSE_desc_t **desc, void *mat, MORSE_enum *dtyp, int *mb, int *nb, int *bsiz, int *lm, int *ln, int *i, int *j, int *m, int *n, int *p, int *q, @@ -93,9 +93,9 @@ extern "C" { void MORSE_DESC_DESTROY(MORSE_desc_t **desc, int *INFO) { *INFO = MORSE_Desc_Destroy(desc); } - /*************************************************************************** + /** * FORTRAN API - conversion from LAPACK F77 matrix layout to tile layout - **/ + */ void MORSE_LAPACK_TO_TILE(intptr_t *Af77, int *LDA, intptr_t *A, int *INFO) { *INFO = MORSE_Lapack_to_Tile( (void *)Af77, *LDA, (MORSE_desc_t *)(*A)); } diff --git a/control/morse_f77.h b/control/morse_f77.h index 7b8df94131fef6adf067a200537ddc5ae47b5083..32a52a62f4741e412f7608095be5e64848b47185 100644 --- a/control/morse_f77.h +++ b/control/morse_f77.h @@ -15,15 +15,15 @@ * @author Florent Pruvost * @date 2017-05-03 * - **/ + */ #ifndef _MORSE_F77_H_ #define _MORSE_F77_H_ #include "chameleon/morse_mangling.h" -/** **************************************************************************** +/** * Determine FORTRAN names - **/ + */ #define MORSE_FNAME(lcname, UCNAME) MORSE_GLOBAL(morse_##lcname, MORSE_##UCNAME) #define MORSE_TILE_FNAME(lcname, UCNAME) MORSE_GLOBAL(morse_##lcname##_tile, MORSE_##UCNAME##_TILE) #define MORSE_ASYNC_FNAME(lcname, UCNAME) MORSE_GLOBAL(morse_##lcname##_tile_async, MORSE_##UCNAME##_TILE_ASYNC) diff --git a/control/morse_mf77.c b/control/morse_mf77.c index e1875b1df737aa8998e58306907a14b9f68b752a..570b670bc290c2697015c3ddecfb334011718716 100644 --- a/control/morse_mf77.c +++ b/control/morse_mf77.c @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdlib.h> #include "control/common.h" @@ -42,9 +42,9 @@ extern "C" { #endif -/***************************************************************************//** +/** * FORTRAN API - math functions (simple interface) - **/ + */ //void MORSE_ZCGESV(int *N, int *NRHS, MORSE_Complex64_t *A, int *LDA, int *IPIV, MORSE_Complex64_t *B, int *LDB, MORSE_Complex64_t *X, int *LDX, int *ITER, int *INFO) //{ *INFO = MORSE_zcgesv(*N, *NRHS, A, *LDA, IPIV, B, *LDB, X, *LDX, ITER); } // @@ -73,9 +73,9 @@ extern "C" { } #endif -/***************************************************************************//** +/** * FORTRAN API - math functions (native interface) - **/ + */ //void MORSE_ZCGESV_TILE(intptr_t *A, int *IPIV, intptr_t *B, intptr_t *X, int *ITER, int *INFO) //{ *INFO = MORSE_zcgesv_Tile((MORSE_desc_t *)(*A), IPIV, (MORSE_desc_t *)(*B), (MORSE_desc_t *)(*X), ITER); } // diff --git a/control/morse_zf77.c b/control/morse_zf77.c index 2b75de7ca20cb1ba9b764c5bb1ad48b70bee875f..b600f740f77e6ae8c03add42c16e970221d81676 100644 --- a/control/morse_zf77.c +++ b/control/morse_zf77.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include "control/common.h" #include "control/morse_f77.h" @@ -31,9 +31,9 @@ #define COMPLEX -/***************************************************************************//** +/** * FORTRAN API - math functions (simple interface) - **/ + */ #define MORSE_ZLAPACK_TO_TILE MORSE_FNAME(zlapack_to_tile, ZLAPACK_TO_TILE) #define MORSE_ZTILE_TO_LAPACK MORSE_FNAME(ztile_to_lapack, ZTILE_TO_LAPACK) //#define MORSE_ZGEBRD MORSE_FNAME(zgebrd , ZGEBRD ) @@ -111,9 +111,9 @@ #define MORSE_ZUNMLQ MORSE_FNAME(zunmlq , ZUNMLQ ) #define MORSE_ZUNMQR MORSE_FNAME(zunmqr , ZUNMQR ) -/***************************************************************************//** +/** * FORTRAN API - math functions (native interface) - **/ + */ //#define MORSE_ZGEBRD_TILE MORSE_TILE_FNAME(zgebrd , ZGEBRD ) #define MORSE_ZGELQF_TILE MORSE_TILE_FNAME(zgelqf , ZGELQF ) #define MORSE_ZGELQS_TILE MORSE_TILE_FNAME(zgelqs , ZGELQS ) @@ -184,9 +184,9 @@ #define MORSE_ZUNMLQ_TILE MORSE_TILE_FNAME(zunmlq , ZUNMLQ ) #define MORSE_ZUNMQR_TILE MORSE_TILE_FNAME(zunmqr , ZUNMQR ) -/***************************************************************************//** +/** * FORTRAN API - math functions (asynchronous interface) - **/ + */ //#define MORSE_ZGEBRD_TILE_ASYNC MORSE_ASYNC_FNAME(zgebrd , ZGEBRD ) #define MORSE_ZGELQF_TILE_ASYNC MORSE_ASYNC_FNAME(zgelqf , ZGELQF ) #define MORSE_ZGELQS_TILE_ASYNC MORSE_ASYNC_FNAME(zgelqs , ZGELQS ) @@ -254,9 +254,9 @@ #define MORSE_ZUNMLQ_TILE_ASYNC MORSE_ASYNC_FNAME(zunmlq , ZUNMLQ ) #define MORSE_ZUNMQR_TILE_ASYNC MORSE_ASYNC_FNAME(zunmqr , ZUNMQR ) -/***************************************************************************//** +/** * FORTRAN API - workspace allocation - **/ + */ //#define MORSE_ALLOC_WORKSPACE_ZGEBRD MORSE_WS_FNAME(zgebrd , ZGEBRD ) //#define MORSE_ALLOC_WORKSPACE_ZGEEV MORSE_WS_FNAME(zgeev , ZGEEV ) //#define MORSE_ALLOC_WORKSPACE_ZGEHRD MORSE_WS_FNAME(zgehrd , ZGEHRD ) @@ -280,9 +280,9 @@ -/***************************************************************************//** +/** * FORTRAN API - math functions (simple interface) - **/ + */ void MORSE_ZLAPACK_TO_TILE(MORSE_Complex64_t *Af77, int *LDA, MORSE_desc_t *A, int *info) { *info = MORSE_zLapack_to_Tile(Af77, *LDA, A); } @@ -488,9 +488,9 @@ void MORSE_ZUNMQR(MORSE_enum *side, MORSE_enum *trans, int *M, int *N, int *K, M { *info = MORSE_zunmqr(*side, *trans, *M, *N, *K, A, *LDA, *descT, B, *LDB); } -/***************************************************************************//** +/** * FORTRAN API - math functions (native interface) - **/ + */ //void MORSE_ZGEBRD_TILE(MORSE_desc_t *A, double *D, double *E, MORSE_desc_t *T, int *info) //{ *info = MORSE_zgebrd_Tile(A, D, E, T); } @@ -678,9 +678,9 @@ void MORSE_ZUNMQR_TILE(MORSE_enum *side, MORSE_enum *trans, MORSE_desc_t *A, MOR { *info = MORSE_zunmqr_Tile(*side, *trans, A, T, B); } -/***************************************************************************//** +/** * FORTRAN API - math functions (asynchronous interface) - **/ + */ //void MORSE_ZGEBRD_TILE_ASYNC(MORSE_desc_t *A, double *D, double *E, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request, int *info) //{ *info = MORSE_zgebrd_Tile_Async(A, D, E, T, sequence, request); } @@ -868,9 +868,9 @@ void MORSE_ZUNMQR_TILE_ASYNC(MORSE_enum *side, MORSE_enum *trans, MORSE_desc_t * { *info = MORSE_zunmqr_Tile_Async(*side, *trans, A, T, B, sequence, request); } -/***************************************************************************//** +/** * FORTRAN API - workspace allocation - **/ + */ //void MORSE_ALLOC_WORKSPACE_ZGEBRD(int *M, int *N, MORSE_desc_t **descT, int *info) //{ *info = MORSE_Alloc_Workspace_zgebrd(*M, *N, descT); } // diff --git a/control/morsewinthread.c b/control/morsewinthread.c index 52390f7a536c09941fa92a24116dbcee343c0f7d..5aad40bd2730ea8aa58268fad45280c5ef05fb16 100644 --- a/control/morsewinthread.c +++ b/control/morsewinthread.c @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #include "control/morsewinthread.h" #include <limits.h> diff --git a/control/morsewinthread.h b/control/morsewinthread.h index f4e261425f35113e9faa65e088ad2577f453c8b5..a872b7f5e18fa287cabc15d8bae59405f2fb4bae 100644 --- a/control/morsewinthread.h +++ b/control/morsewinthread.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #ifndef MORSEWINTHREAD_H #define MORSEWINTHREAD_H diff --git a/control/primes.h b/control/primes.h index 0bb6660d3d224d25e5c645b979e682bc02c5bb8e..a503df5de21094a0de9ee75d914649b9420a7427 100644 --- a/control/primes.h +++ b/control/primes.h @@ -19,7 +19,7 @@ * based on the GKK algorithm by Gustavson, Karlsson, Kagstrom * and its fortran implementation. * - **/ + */ #ifndef PRIMES_H #define PRIMES_H diff --git a/control/tile.c b/control/tile.c index c32bd077e6819dcfcf80f4656aabe62bc6313cff..bcc9dd9fa1cda9135b25870d637dbe1cb42e7df2 100644 --- a/control/tile.c +++ b/control/tile.c @@ -25,7 +25,7 @@ #include "control/common.h" #include "control/auxiliary.h" -/** *************************************************************************** +/** * * @ingroup Tile * @@ -47,7 +47,7 @@ * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Lapack_to_Tile(void *Af77, int LDA, MORSE_desc_t *A) { switch( A->dtyp ) { @@ -67,7 +67,7 @@ int MORSE_Lapack_to_Tile(void *Af77, int LDA, MORSE_desc_t *A) return MORSE_ERR_ILLEGAL_VALUE; } -/** *************************************************************************** +/** * * @ingroup Tile * @@ -89,7 +89,7 @@ int MORSE_Lapack_to_Tile(void *Af77, int LDA, MORSE_desc_t *A) * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Tile_to_Lapack(MORSE_desc_t *A, void *Af77, int LDA) { switch( A->dtyp ) { diff --git a/control/workspace.c b/control/workspace.c index 73c2308b3a4e6aa4c9fb0c69eb295ab629ec58f8..1c8d6d0dfe454d687134e653bba979a0022f35d6 100644 --- a/control/workspace.c +++ b/control/workspace.c @@ -28,9 +28,9 @@ #include "control/auxiliary.h" #include "control/workspace.h" -/******************************************************************************* +/** * - **/ + */ int morse_alloc_ibnb_tile(int M, int N, MORSE_enum func, int type, MORSE_desc_t **desc, int p, int q) { int status; @@ -100,9 +100,9 @@ int morse_alloc_ibnb_tile(int M, int N, MORSE_enum func, int type, MORSE_desc_t return MORSE_SUCCESS; } -/******************************************************************************* +/** * - **/ + */ int morse_alloc_ipiv(int M, int N, MORSE_enum func, int type, MORSE_desc_t **desc, void **IPIV, int p, int q) { int status; @@ -156,7 +156,7 @@ int morse_alloc_ipiv(int M, int N, MORSE_enum func, int type, MORSE_desc_t **des return MORSE_SUCCESS; } -/******************************************************************************* +/** * * @ingroup Workspace * @@ -173,7 +173,7 @@ int morse_alloc_ipiv(int M, int N, MORSE_enum func, int type, MORSE_desc_t **des * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Dealloc_Workspace(MORSE_desc_t **desc) { MORSE_context_t *morse; diff --git a/control/workspace.h b/control/workspace.h index f8535feac8e85d5d535773472977bbce16bc3c46..70a6a30226230cfab571c8cba892362baf312aa1 100644 --- a/control/workspace.h +++ b/control/workspace.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #ifndef _MORSE_WORKSPACE_H_ #define _MORSE_WORKSPACE_H_ @@ -24,9 +24,9 @@ extern "C" { #endif -/******************************************************************************* +/** * Internal routines - **/ + */ int morse_alloc_ibnb_tile(int M, int N, MORSE_enum func, int type, MORSE_desc_t **desc, int p, int q); int morse_alloc_ipiv(int M, int N, MORSE_enum func, int type, MORSE_desc_t **desc, void **IPIV, int p, int q); diff --git a/control/workspace_z.c b/control/workspace_z.c index d0aab7d185d9f5ce983a5bc2845cf3f3a8acade5..e6e795b82991c7199cdef582be078ece58c7bc75 100644 --- a/control/workspace_z.c +++ b/control/workspace_z.c @@ -23,11 +23,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "control/common.h" #include "control/workspace.h" -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -48,11 +48,11 @@ * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgeev(int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(N, N, MORSE_FUNC_ZGEEV, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -73,11 +73,11 @@ int MORSE_Alloc_Workspace_zgeev(int N, MORSE_desc_t **descT, int p, int q) { * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgehrd(int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(N, N, MORSE_FUNC_ZGEHRD, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -100,11 +100,11 @@ int MORSE_Alloc_Workspace_zgehrd(int N, MORSE_desc_t **descT, int p, int q) { * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgebrd(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGEBRD, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -128,11 +128,11 @@ int MORSE_Alloc_Workspace_zgebrd(int M, int N, MORSE_desc_t **descT, int p, int * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgels(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -162,11 +162,11 @@ int MORSE_Alloc_Workspace_zgels(int M, int N, MORSE_desc_t **descT, int p, int q * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgels_Tile(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -196,11 +196,11 @@ int MORSE_Alloc_Workspace_zgels_Tile(int M, int N, MORSE_desc_t **descT, int p, * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgeqrf(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -230,11 +230,11 @@ int MORSE_Alloc_Workspace_zgeqrf(int M, int N, MORSE_desc_t **descT, int p, int * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgeqrf_Tile(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -264,11 +264,11 @@ int MORSE_Alloc_Workspace_zgeqrf_Tile(int M, int N, MORSE_desc_t **descT, int p, * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgelqf(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -297,11 +297,11 @@ int MORSE_Alloc_Workspace_zgelqf(int M, int N, MORSE_desc_t **descT, int p, int * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgelqf_Tile(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGELS, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -327,11 +327,11 @@ int MORSE_Alloc_Workspace_zgelqf_Tile(int M, int N, MORSE_desc_t **descT, int p, * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgesv_incpiv(int N, MORSE_desc_t **descL, int **IPIV, int p, int q) { return morse_alloc_ipiv(N, N, MORSE_FUNC_ZGESV, MorseComplexDouble, descL, (void**)IPIV, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -357,12 +357,12 @@ int MORSE_Alloc_Workspace_zgesv_incpiv(int N, MORSE_desc_t **descL, int **IPIV, * @return * \retval MORSE_SUCCESS successful exit * - *****************************************************************************/ + */ int MORSE_Alloc_Workspace_zgesv_incpiv_Tile(int N, MORSE_desc_t **descL, int **IPIV, int p, int q) { return morse_alloc_ipiv(N, N, MORSE_FUNC_ZGESV, MorseComplexDouble, descL, (void**)IPIV, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -391,11 +391,11 @@ int MORSE_Alloc_Workspace_zgesv_incpiv_Tile(int N, MORSE_desc_t **descL, int **I * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zgesvd(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZGESVD, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -430,11 +430,11 @@ int MORSE_Alloc_Workspace_zgesvd(int M, int N, MORSE_desc_t **descT, int p, int * @sa MORSE_zgetrf_incpiv_Tile * @sa MORSE_zgetrf_incpiv_Tile_Async * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zgetrf_incpiv(int M, int N, MORSE_desc_t **descL, int **IPIV, int p, int q) { return morse_alloc_ipiv(M, N, MORSE_FUNC_ZGESV, MorseComplexDouble, descL, (void**)IPIV, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -459,11 +459,11 @@ int MORSE_Alloc_Workspace_zgetrf_incpiv(int M, int N, MORSE_desc_t **descL, int * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zgetrf_incpiv_Tile(int N, MORSE_desc_t **descL, int **IPIV, int p, int q) { return morse_alloc_ipiv(N, N, MORSE_FUNC_ZGESV, MorseComplexDouble, descL, (void**)IPIV, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -491,11 +491,11 @@ int MORSE_Alloc_Workspace_zgetrf_incpiv_Tile(int N, MORSE_desc_t **descL, int ** * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zheev(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZHEEV, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -523,11 +523,11 @@ int MORSE_Alloc_Workspace_zheev(int M, int N, MORSE_desc_t **descT, int p, int q * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zheevd(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZHEEVD, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -555,11 +555,11 @@ int MORSE_Alloc_Workspace_zheevd(int M, int N, MORSE_desc_t **descT, int p, int * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zhegv(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZHEGV, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -587,11 +587,11 @@ int MORSE_Alloc_Workspace_zhegv(int M, int N, MORSE_desc_t **descT, int p, int q * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zhegvd(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZHEGVD, MorseComplexDouble, descT, p, q); } -/** *************************************************************************** +/** * * @ingroup Workspace * @@ -619,6 +619,6 @@ int MORSE_Alloc_Workspace_zhegvd(int M, int N, MORSE_desc_t **descT, int p, int * @return * \retval MORSE_SUCCESS successful exit * - ******************************************************************************/ + */ int MORSE_Alloc_Workspace_zhetrd(int M, int N, MORSE_desc_t **descT, int p, int q) { return morse_alloc_ibnb_tile(M, N, MORSE_FUNC_ZHETRD, MorseComplexDouble, descT, p, q); } diff --git a/coreblas/compute/core_dzasum.c b/coreblas/compute/core_dzasum.c index 8c40abe5da1899561790d856fbe9bda2f397c2e0..29694f6ef24aeffecb82ad4ffb0e75fcd256869a 100644 --- a/coreblas/compute/core_dzasum.c +++ b/coreblas/compute/core_dzasum.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include <math.h> #include "coreblas.h" @@ -30,7 +30,7 @@ * */ -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -67,7 +67,7 @@ * Array of dimension M if storev = MorseRowwise; N otherwise. * On exit, contains the sums of the absolute values per column or row. * - ******************************************************************************/ + */ void CORE_dzasum(MORSE_enum storev, MORSE_enum uplo, int M, int N, const MORSE_Complex64_t *A, int lda, double *work) diff --git a/coreblas/compute/core_zaxpy.c b/coreblas/compute/core_zaxpy.c index 141251cf7d6291b70b31865d0a9afddccca842eb..7e28d4e6cff06ac30cd9656140829be877cdffdb 100644 --- a/coreblas/compute/core_zaxpy.c +++ b/coreblas/compute/core_zaxpy.c @@ -14,10 +14,10 @@ * @date 2015-09-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -51,7 +51,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zaxpy(int M, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int incA, diff --git a/coreblas/compute/core_zgeadd.c b/coreblas/compute/core_zgeadd.c index 3b2c4523bc0163a983bbf0e67da63196acdcdf2b..d6d31f288e0cf7fe0d370e1b42623f4f6d6356c5 100644 --- a/coreblas/compute/core_zgeadd.c +++ b/coreblas/compute/core_zgeadd.c @@ -19,7 +19,7 @@ * @date 2015-11-03 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" /** @@ -75,7 +75,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_zgeadd = PCORE_zgeadd #define CORE_zgeadd PCORE_zgeadd diff --git a/coreblas/compute/core_zgelqt.c b/coreblas/compute/core_zgelqt.c index e37cc432f84d7fc809086d7fd3ed227cb5cb9206..2ec26732749c7b0024d9c7adc6a5c1919b20b5cf 100644 --- a/coreblas/compute/core_zgelqt.c +++ b/coreblas/compute/core_zgelqt.c @@ -22,11 +22,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -86,7 +86,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zgelqt(int M, int N, int IB, MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zgemm.c b/coreblas/compute/core_zgemm.c index a082b381b620febc4f1b8e4e78a7b0a6f0a8f7fc..f414f822d3cf8ee7304b3eee29490d1af9c3f6b4 100644 --- a/coreblas/compute/core_zgemm.c +++ b/coreblas/compute/core_zgemm.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zgemm(MORSE_enum transA, int transB, int M, int N, int K, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, @@ -57,7 +57,7 @@ void CORE_zgemm(MORSE_enum transA, int transB, } -/***************************************************************************/ +/**/ diff --git a/coreblas/compute/core_zgeqrt.c b/coreblas/compute/core_zgeqrt.c index 0ddd812bbc16d6bb59781d422b67a2f9993f5f25..bb9cd2c71ee57d804bc53e46862904c151190879 100644 --- a/coreblas/compute/core_zgeqrt.c +++ b/coreblas/compute/core_zgeqrt.c @@ -22,11 +22,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -87,7 +87,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zgeqrt(int M, int N, int IB, MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zgesplit.c b/coreblas/compute/core_zgesplit.c index 65831bffa752c6b3d28aa6d1fa104097223c79d8..e89c2c24c5166e90642e44c174bf81c928164bc5 100644 --- a/coreblas/compute/core_zgesplit.c +++ b/coreblas/compute/core_zgesplit.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" @@ -60,7 +60,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zgesplit(MORSE_enum side, MORSE_enum diag, int M, int N, diff --git a/coreblas/compute/core_zgessm.c b/coreblas/compute/core_zgessm.c index 55b31a4901105d4ede1e1600a0c9d87f92a25733..c2591f78b944293fbdb1b6f94e97669e39acec88 100644 --- a/coreblas/compute/core_zgessm.c +++ b/coreblas/compute/core_zgessm.c @@ -22,12 +22,12 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -71,7 +71,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zgessm(int M, int N, int K, int IB, const int *IPIV, diff --git a/coreblas/compute/core_zgessq.c b/coreblas/compute/core_zgessq.c index 81af3aede7169e016911e0c9db6a8564289a1da2..ac4547a370101b0e008e07b383f8810854aac3f2 100644 --- a/coreblas/compute/core_zgessq.c +++ b/coreblas/compute/core_zgessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "coreblas/lapacke.h" #include "coreblas.h" @@ -35,7 +35,7 @@ } \ } -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/coreblas/compute/core_zgetf2_nopiv.c b/coreblas/compute/core_zgetf2_nopiv.c index 4d64a20cdc5403581f8b32dd1e7c2f67f3d375bd..61b4802304674381a3755454c6828da33b15f82e 100644 --- a/coreblas/compute/core_zgetf2_nopiv.c +++ b/coreblas/compute/core_zgetf2_nopiv.c @@ -19,12 +19,12 @@ * @date 2013-02-01 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #include <math.h> #include "coreblas/lapacke.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -66,7 +66,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ int CORE_zgetf2_nopiv(int M, int N, MORSE_Complex64_t *A, int LDA) diff --git a/coreblas/compute/core_zgetrf.c b/coreblas/compute/core_zgetrf.c index 478c7e1e46dbc5f0b7581e1d79de58b8604a42ae..e466ea71f9676abdbec067753c760d72b01a5e96 100644 --- a/coreblas/compute/core_zgetrf.c +++ b/coreblas/compute/core_zgetrf.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" diff --git a/coreblas/compute/core_zgetrf_incpiv.c b/coreblas/compute/core_zgetrf_incpiv.c index e380ec3ad7604b9adabab79d5c20af5b84b708de..cec1a9bd95fe712d33fcfb4d62dd9e9965d339bf 100644 --- a/coreblas/compute/core_zgetrf_incpiv.c +++ b/coreblas/compute/core_zgetrf_incpiv.c @@ -22,11 +22,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -79,7 +79,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ int CORE_zgetrf_incpiv( int M, int N, int IB, MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zgetrf_nopiv.c b/coreblas/compute/core_zgetrf_nopiv.c index 48118cc6d8cae03eb5c640a96abe6e99bdd10877..6c919e9320e43a52564ee156603e6a85028ec28d 100644 --- a/coreblas/compute/core_zgetrf_nopiv.c +++ b/coreblas/compute/core_zgetrf_nopiv.c @@ -19,10 +19,10 @@ * @date 2013-02-01 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -68,7 +68,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ int CORE_zgetrf_nopiv(int M, int N, int IB, MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zhe2ge.c b/coreblas/compute/core_zhe2ge.c index e2f226ff00f2fa5790263db14d2834c49889a4a8..c4b5f785a8934f16f3623150cdc2d15871ccc2a8 100644 --- a/coreblas/compute/core_zhe2ge.c +++ b/coreblas/compute/core_zhe2ge.c @@ -22,15 +22,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zhe2ge(MORSE_enum uplo, int M, int N, const MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB) diff --git a/coreblas/compute/core_zhemm.c b/coreblas/compute/core_zhemm.c index d38a3de7d1328ea8a96f6f8246c6ec96b8a99add..ba7255f9cb26077177e95f77a4c52afc58d89335 100644 --- a/coreblas/compute/core_zhemm.c +++ b/coreblas/compute/core_zhemm.c @@ -22,17 +22,17 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "coreblas.h" #undef REAL #define COMPLEX #ifdef COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zhemm(MORSE_enum side, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zher2k.c b/coreblas/compute/core_zher2k.c index b5adc73513eb41876474fadad9bad79c5884fc67..8b894f50be7feb8bc612be0cbcc9cba314f7cc5c 100644 --- a/coreblas/compute/core_zher2k.c +++ b/coreblas/compute/core_zher2k.c @@ -22,17 +22,17 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "coreblas.h" #undef REAL #define COMPLEX #ifdef COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zher2k(MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zherfb.c b/coreblas/compute/core_zherfb.c index b65d0ee003a63eca53259766e783dc5eaa1851d5..06246c9dc1ca918f5a4c76a089e222ae504ffde6 100644 --- a/coreblas/compute/core_zherfb.c +++ b/coreblas/compute/core_zherfb.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #include "coreblas/lapacke.h" @@ -89,7 +89,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_zherfb = PCORE_zherfb #define CORE_zherfb PCORE_zherfb diff --git a/coreblas/compute/core_zherk.c b/coreblas/compute/core_zherk.c index 3f6a864ad43a06722518b5ec4fa0b1a4cb740878..bff780e94a1f0d0f7dbedf395aa23ee2470b69cd 100644 --- a/coreblas/compute/core_zherk.c +++ b/coreblas/compute/core_zherk.c @@ -22,17 +22,17 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "coreblas.h" #undef REAL #define COMPLEX #ifdef COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zherk(MORSE_enum uplo, MORSE_enum trans, int N, int K, double alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zhessq.c b/coreblas/compute/core_zhessq.c index 41c1ae6b2b455f49efa1864f1498280d48d55647..427c62cc210a67b87604f65957d297bf65e1d589 100644 --- a/coreblas/compute/core_zhessq.c +++ b/coreblas/compute/core_zhessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include <math.h> #include "coreblas/lapacke.h" #include "coreblas.h" @@ -35,7 +35,7 @@ } \ } -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/coreblas/compute/core_zlacpy.c b/coreblas/compute/core_zlacpy.c index ae6d3660df6f54cfee3da6f2dbad85f56fffe279..eab6dd892dd5d57af0c788a01c53ed6b2cd50600 100644 --- a/coreblas/compute/core_zlacpy.c +++ b/coreblas/compute/core_zlacpy.c @@ -22,15 +22,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zlacpy(MORSE_enum uplo, int M, int N, const MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB) diff --git a/coreblas/compute/core_zlag2c.c b/coreblas/compute/core_zlag2c.c index 11844180df418e8243260c9c8f953254e3418816..97e2ec26aff5bdf60d2c4e8f330aaef8ed995044 100644 --- a/coreblas/compute/core_zlag2c.c +++ b/coreblas/compute/core_zlag2c.c @@ -20,30 +20,30 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zlag2c(int m, int n, const MORSE_Complex64_t *A, int lda, MORSE_Complex32_t *B, int ldb, int *info) { *info = LAPACKE_zlag2c_work(LAPACK_COL_MAJOR, m, n, A, lda, B, ldb); } -/***************************************************************************/ +/**/ -/***************************************************************************/ +/**/ -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_clag2z(int m, int n, const MORSE_Complex32_t *A, int lda, MORSE_Complex64_t *B, int ldb) diff --git a/coreblas/compute/core_zlange.c b/coreblas/compute/core_zlange.c index 971b2b1775b7f6ab5da5ec52da42d6365fdc9f8e..a0f6be88564e42f3cfbf2de89ac49c8122eaa982 100644 --- a/coreblas/compute/core_zlange.c +++ b/coreblas/compute/core_zlange.c @@ -20,11 +20,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -71,7 +71,7 @@ * @param[out] normA * On exit, normA is the norm of matrix A. * - ******************************************************************************/ + */ void CORE_zlange(int norm, int M, int N, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zlanhe.c b/coreblas/compute/core_zlanhe.c index fe7ed18b0e8f0387bdad0607a1cdceb483f73feb..13275e0e580b31d696ebea60a63f4cc7a58fcd89 100644 --- a/coreblas/compute/core_zlanhe.c +++ b/coreblas/compute/core_zlanhe.c @@ -20,11 +20,11 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -73,7 +73,7 @@ * @param[out] normA * On exit, normA is the norm of matrix A. * - ******************************************************************************/ + */ void CORE_zlanhe(int norm, MORSE_enum uplo, int N, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zlansy.c b/coreblas/compute/core_zlansy.c index fbf104efa3f35238335e419d121037d82d6b16f3..580278f001e12fc383a7c4d62ed89a876903b32e 100644 --- a/coreblas/compute/core_zlansy.c +++ b/coreblas/compute/core_zlansy.c @@ -20,11 +20,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -73,7 +73,7 @@ * @param[out] normA * On exit, normA is the norm of matrix A. * - ******************************************************************************/ + */ void CORE_zlansy(int norm, MORSE_enum uplo, int N, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zlantr.c b/coreblas/compute/core_zlantr.c index 3f2f35dca9efbe268d62f0c50d3a1bb3508cff46..9d37166ad1ab13d69a4e234df1b05314cad12908 100644 --- a/coreblas/compute/core_zlantr.c +++ b/coreblas/compute/core_zlantr.c @@ -18,12 +18,12 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include <math.h> #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -83,7 +83,7 @@ * @param[out] normA * On exit, normA is the norm of matrix A. * - ******************************************************************************/ + */ void CORE_zlantr(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag, int M, int N, diff --git a/coreblas/compute/core_zlascal.c b/coreblas/compute/core_zlascal.c index 77aa12b4b1b0c6e67c578ee74eb3810997816a56..635411fd01c5383cea20dd6c42af5ec72ac067d1 100644 --- a/coreblas/compute/core_zlascal.c +++ b/coreblas/compute/core_zlascal.c @@ -17,7 +17,7 @@ * @date 2015-11-05 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #include "coreblas/cblas.h" #include <math.h> @@ -56,7 +56,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zlascal( MORSE_enum uplo, int m, int n, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int lda ) diff --git a/coreblas/compute/core_zlaset.c b/coreblas/compute/core_zlaset.c index b39e14d5663b2f3b65456e34bc666086096c25b8..1fbc621efadeb20c735e5219debad4650ec1a336 100644 --- a/coreblas/compute/core_zlaset.c +++ b/coreblas/compute/core_zlaset.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" @@ -60,7 +60,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void CORE_zlaset(MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, MORSE_Complex64_t *A, int LDA) diff --git a/coreblas/compute/core_zlaset2.c b/coreblas/compute/core_zlaset2.c index c42932d06c73250b126e40b1533ce4efd78d01ce..9cbe36fee5e9f6d16e0dfa967811cd641b78b05e 100644 --- a/coreblas/compute/core_zlaset2.c +++ b/coreblas/compute/core_zlaset2.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" @@ -58,7 +58,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void CORE_zlaset2(MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA) { diff --git a/coreblas/compute/core_zlatro.c b/coreblas/compute/core_zlatro.c index ff94bbf792c441ba3c81f91c814cfb85f300b1ea..73f726ccf1144e6427213fbdbddd24f5839e3364 100644 --- a/coreblas/compute/core_zlatro.c +++ b/coreblas/compute/core_zlatro.c @@ -16,11 +16,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #include "coreblas/lapacke.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -76,7 +76,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_zlatro = PCORE_zlatro #define CORE_zlatro PCORE_zlatro diff --git a/coreblas/compute/core_zlauum.c b/coreblas/compute/core_zlauum.c index 85e1b6be6be0fd30867d571390b1f8dbe36e99f6..fb3da879e2f790937edffb0d48f937819f0a73d6 100644 --- a/coreblas/compute/core_zlauum.c +++ b/coreblas/compute/core_zlauum.c @@ -22,15 +22,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zlauum(MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA) { LAPACKE_zlauum_work(LAPACK_COL_MAJOR, morse_lapack_const(uplo), N, A, LDA ); diff --git a/coreblas/compute/core_zpamm.c b/coreblas/compute/core_zpamm.c index 7091268ef23dbdefa21267414d9fb05527897713..60b126a816f550a5326c9238b5c9bec3c8d28f1d 100644 --- a/coreblas/compute/core_zpamm.c +++ b/coreblas/compute/core_zpamm.c @@ -21,7 +21,7 @@ * @date 2011-06-14 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "coreblas/lapacke.h" #include "coreblas.h" @@ -40,7 +40,7 @@ static inline int CORE_zpamm_w(MORSE_enum side, MORSE_enum trans, MORSE_enum upl const MORSE_Complex64_t *V, int LDV, MORSE_Complex64_t *W, int LDW); -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -178,7 +178,7 @@ static inline int CORE_zpamm_w(MORSE_enum side, MORSE_enum trans, MORSE_enum upl * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zpamm(int op, MORSE_enum side, MORSE_enum storev, int M, int N, int K, int L, @@ -301,7 +301,7 @@ CORE_zpamm(int op, MORSE_enum side, MORSE_enum storev, return MORSE_SUCCESS; } -/***************************************************************************/ +/**/ static inline int CORE_zpamm_w(MORSE_enum side, MORSE_enum trans, MORSE_enum uplo, int M, int N, int K, int L, @@ -443,7 +443,7 @@ CORE_zpamm_w(MORSE_enum side, MORSE_enum trans, MORSE_enum uplo, return MORSE_SUCCESS; } -/***************************************************************************/ +/**/ static inline int CORE_zpamm_a2(MORSE_enum side, MORSE_enum trans, MORSE_enum uplo, int M, int N, int K, int L, @@ -570,6 +570,6 @@ CORE_zpamm_a2(MORSE_enum side, MORSE_enum trans, MORSE_enum uplo, -/***************************************************************************//** +/** * - **/ + */ diff --git a/coreblas/compute/core_zparfb.c b/coreblas/compute/core_zparfb.c index 05fc18235d02c6a31a7b3a370384deb726233ad3..10d84ee12ee79cccbd2ad5a334636aa2619e60b4 100644 --- a/coreblas/compute/core_zparfb.c +++ b/coreblas/compute/core_zparfb.c @@ -21,12 +21,12 @@ * @date 2011-06-14 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -136,7 +136,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ /* This kernel is never traced so return type on previous line for convert2eztrace.pl script */ int CORE_zparfb(MORSE_enum side, MORSE_enum trans, MORSE_enum direct, MORSE_enum storev, diff --git a/coreblas/compute/core_zpemv.c b/coreblas/compute/core_zpemv.c index 6984102413c8fffec5e5b23b4c996daa96bc9431..b2d0161f18dc637665308c0e1c809e8343938a9b 100644 --- a/coreblas/compute/core_zpemv.c +++ b/coreblas/compute/core_zpemv.c @@ -21,12 +21,12 @@ * @date 2011-06-29 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -117,7 +117,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zpemv(MORSE_enum trans, int storev, diff --git a/coreblas/compute/core_zplghe.c b/coreblas/compute/core_zplghe.c index 31a16430aeac7509dcf729172ba31baedae28fcc..ff9f984a88df9d226a07c1887cdd21c2fd9463dd 100644 --- a/coreblas/compute/core_zplghe.c +++ b/coreblas/compute/core_zplghe.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "coreblas.h" #define COMPLEX diff --git a/coreblas/compute/core_zplgsy.c b/coreblas/compute/core_zplgsy.c index 2836ed9cba93d756ce43708a56b85a8eb4cfd3b3..4f61012aea9c2fa887764eec92a7920188d84fc6 100644 --- a/coreblas/compute/core_zplgsy.c +++ b/coreblas/compute/core_zplgsy.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #define COMPLEX diff --git a/coreblas/compute/core_zplrnt.c b/coreblas/compute/core_zplrnt.c index a65d4f69870888883c0f46100775c45a09b29f11..f272dd3f9b682244cc4a8b29ac0712fcf2d89d93 100644 --- a/coreblas/compute/core_zplrnt.c +++ b/coreblas/compute/core_zplrnt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #define COMPLEX diff --git a/coreblas/compute/core_zpotrf.c b/coreblas/compute/core_zpotrf.c index 5f8ce183e756fe00e51fc8d22aafea4c9ae37efc..082b30a369929e5e5f59b5858580f93fd6c2f512 100644 --- a/coreblas/compute/core_zpotrf.c +++ b/coreblas/compute/core_zpotrf.c @@ -22,15 +22,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zpotrf(MORSE_enum uplo, int N, MORSE_Complex64_t *A, int LDA, int *INFO) { *INFO = LAPACKE_zpotrf_work( diff --git a/coreblas/compute/core_zssssm.c b/coreblas/compute/core_zssssm.c index e10216c0d379e8778876d69de9cdaac17ca4b452..fbd6c7906525dbed9b8c2fda66951758f6921b43 100644 --- a/coreblas/compute/core_zssssm.c +++ b/coreblas/compute/core_zssssm.c @@ -22,11 +22,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -95,7 +95,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zssssm(int M1, int N1, int M2, int N2, int K, int IB, MORSE_Complex64_t *A1, int LDA1, diff --git a/coreblas/compute/core_zsymm.c b/coreblas/compute/core_zsymm.c index 2e50169ba69a73af8dd217ce6e80b1df941393eb..044206f95c2565f4b81cee344286e049ff066070 100644 --- a/coreblas/compute/core_zsymm.c +++ b/coreblas/compute/core_zsymm.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zsymm(MORSE_enum side, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zsyr2k.c b/coreblas/compute/core_zsyr2k.c index 8ac581c51a502731fbc55c37c3d7c10ed11c72cb..bac0e1b20645455a06efd4ab9323d20881fd81d6 100644 --- a/coreblas/compute/core_zsyr2k.c +++ b/coreblas/compute/core_zsyr2k.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zsyr2k(MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zsyrk.c b/coreblas/compute/core_zsyrk.c index 8b093e386764a6ba7511dad752e2e3c0dd7ed013..ef360ebd47e4b909ca561e8e949f504f07ff2ab2 100644 --- a/coreblas/compute/core_zsyrk.c +++ b/coreblas/compute/core_zsyrk.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_zsyrk(MORSE_enum uplo, MORSE_enum trans, int N, int K, MORSE_Complex64_t alpha, const MORSE_Complex64_t *A, int LDA, diff --git a/coreblas/compute/core_zsyssq.c b/coreblas/compute/core_zsyssq.c index 106600f650bfb5cbb15b255a1a22591bfbca613b..80b16a4ccb51cce643cad75864e6187180fb2dff 100644 --- a/coreblas/compute/core_zsyssq.c +++ b/coreblas/compute/core_zsyssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "coreblas/lapacke.h" #include "coreblas.h" @@ -35,7 +35,7 @@ } \ } -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/coreblas/compute/core_zsytf2_nopiv.c b/coreblas/compute/core_zsytf2_nopiv.c index 106ddeafa441aa191e9161555bd53fe6dbb93e54..21316c6491495a14ee4ccc20475e397de263b108 100644 --- a/coreblas/compute/core_zsytf2_nopiv.c +++ b/coreblas/compute/core_zsytf2_nopiv.c @@ -24,14 +24,14 @@ * @date 2014-10-10 * @precisions normal z -> c * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static MORSE_Complex64_t zone = 1.; static MORSE_Complex64_t mzone = -1.; diff --git a/coreblas/compute/core_ztplqt.c b/coreblas/compute/core_ztplqt.c index 002e796436aabdcdcf10da2cf9124902de72f39c..fedcd3d65eda9e176d0678593217174882890476 100644 --- a/coreblas/compute/core_ztplqt.c +++ b/coreblas/compute/core_ztplqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" @@ -81,7 +81,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztplqt( int M, int N, int L, int IB, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, diff --git a/coreblas/compute/core_ztpmlqt.c b/coreblas/compute/core_ztpmlqt.c index 1ead6d2dae4367d792b6317b66855323ef0a4ef5..e67dc7a3502b838c2be10180f4fa06877eedd9f7 100644 --- a/coreblas/compute/core_ztpmlqt.c +++ b/coreblas/compute/core_ztpmlqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" /** @@ -132,7 +132,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztpmlqt( MORSE_enum side, MORSE_enum trans, int M, int N, int K, int L, int IB, diff --git a/coreblas/compute/core_ztpmqrt.c b/coreblas/compute/core_ztpmqrt.c index 22857ede00b3632977111efc1f807aa74b96c3b8..168cf12aff66e88af00808caf83b137c4e9cda9e 100644 --- a/coreblas/compute/core_ztpmqrt.c +++ b/coreblas/compute/core_ztpmqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" /** @@ -133,7 +133,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztpmqrt( MORSE_enum side, MORSE_enum trans, int M, int N, int K, int L, int IB, diff --git a/coreblas/compute/core_ztpqrt.c b/coreblas/compute/core_ztpqrt.c index 896eee520cb75d84cc598c1f92dc5b319daf0ac8..c32ed347c4482f772249b3458b7b7ec509f95776 100644 --- a/coreblas/compute/core_ztpqrt.c +++ b/coreblas/compute/core_ztpqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" @@ -86,7 +86,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztpqrt( int M, int N, int L, int IB, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, diff --git a/coreblas/compute/core_ztradd.c b/coreblas/compute/core_ztradd.c index 7cc581fec5a809f0aaada9e03ea1396ce3b06c5f..2d67dc1d08931246a915590cdf58a95ad6e47204 100644 --- a/coreblas/compute/core_ztradd.c +++ b/coreblas/compute/core_ztradd.c @@ -18,7 +18,7 @@ * @date 2015-11-03 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" /** @@ -78,7 +78,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_ztradd = PCORE_ztradd #define CORE_ztradd PCORE_ztradd diff --git a/coreblas/compute/core_ztrasm.c b/coreblas/compute/core_ztrasm.c index 7ade90d3f49cac03cc72b1f28742184b8c20a232..5ca15d12ed967ab50adad14cb0154b59ebc40fcb 100644 --- a/coreblas/compute/core_ztrasm.c +++ b/coreblas/compute/core_ztrasm.c @@ -18,12 +18,12 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include <math.h> #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -65,7 +65,7 @@ * On exit, contains the sums of the absolute values per column or row * added to the input values. * - ******************************************************************************/ + */ void CORE_ztrasm(MORSE_enum storev, MORSE_enum uplo, MORSE_enum diag, int M, int N, diff --git a/coreblas/compute/core_ztrmm.c b/coreblas/compute/core_ztrmm.c index 3ecab572d2a25600adab9ff32a0ecea7b9cd6cd9..b6133fe86fd6590a1bd009d2b82bf16d4c527c85 100644 --- a/coreblas/compute/core_ztrmm.c +++ b/coreblas/compute/core_ztrmm.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_ztrmm(MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int M, int N, diff --git a/coreblas/compute/core_ztrsm.c b/coreblas/compute/core_ztrsm.c index e20680e978c620e78b06fec64ac87822bdb65b77..07060577c3ef0de11cf79ef720f789711f0a7c0f 100644 --- a/coreblas/compute/core_ztrsm.c +++ b/coreblas/compute/core_ztrsm.c @@ -22,14 +22,14 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_ztrsm(MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int M, int N, diff --git a/coreblas/compute/core_ztrssq.c b/coreblas/compute/core_ztrssq.c index 36464a418a167dab025d11630381a2933b30db1f..53eb52f0fa22fb005265ff0f77ecfabf61c0afb9 100644 --- a/coreblas/compute/core_ztrssq.c +++ b/coreblas/compute/core_ztrssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "coreblas/lapacke.h" #include "coreblas.h" @@ -35,7 +35,7 @@ } \ } -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/coreblas/compute/core_ztrtri.c b/coreblas/compute/core_ztrtri.c index be3feadc9e702edde7dcad308f03f1fe7534da2d..252c953f8e11d206bdbf23dba0377383e0d3602c 100644 --- a/coreblas/compute/core_ztrtri.c +++ b/coreblas/compute/core_ztrtri.c @@ -22,15 +22,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void CORE_ztrtri(MORSE_enum uplo, MORSE_enum diag, int N, MORSE_Complex64_t *A, int LDA, int *info) { *info = LAPACKE_ztrtri_work( diff --git a/coreblas/compute/core_ztslqt.c b/coreblas/compute/core_ztslqt.c index aaa00c95de228a0dfb31a773f396256bc19b0310..67817bc412ceb1c01c63eb1d73b3912a5a275007 100644 --- a/coreblas/compute/core_ztslqt.c +++ b/coreblas/compute/core_ztslqt.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" #undef REAL #define COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -100,7 +100,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztslqt(int M, int N, int IB, MORSE_Complex64_t *A1, int LDA1, diff --git a/coreblas/compute/core_ztsmlq.c b/coreblas/compute/core_ztsmlq.c index 1eb5b18558837d062af737f2a2c373aa0d921d76..1181e465c5868db2e84012efc12a785d78b3805b 100644 --- a/coreblas/compute/core_ztsmlq.c +++ b/coreblas/compute/core_ztsmlq.c @@ -24,10 +24,10 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -125,7 +125,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztsmlq(MORSE_enum side, MORSE_enum trans, int M1, int N1, int M2, int N2, int K, int IB, diff --git a/coreblas/compute/core_ztsmlq_hetra1.c b/coreblas/compute/core_ztsmlq_hetra1.c index 2ee761ba7f251cd2a33b26f019637d0d591610e5..e7edbe4befedd2f3eaf65592af49e836ae676e6d 100644 --- a/coreblas/compute/core_ztsmlq_hetra1.c +++ b/coreblas/compute/core_ztsmlq_hetra1.c @@ -18,11 +18,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <coreblas/lapacke.h> #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -112,7 +112,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_ztsmlq_hetra1 = PCORE_ztsmlq_hetra1 #define CORE_ztsmlq_hetra1 PCORE_ztsmlq_hetra1 diff --git a/coreblas/compute/core_ztsmqr.c b/coreblas/compute/core_ztsmqr.c index ea53fa7e23b5c48b1d145b050ebbd0c023d5609a..c18c2c392ee75ee68f2f8a762b7fb50e22cc86e9 100644 --- a/coreblas/compute/core_ztsmqr.c +++ b/coreblas/compute/core_ztsmqr.c @@ -24,10 +24,10 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -125,7 +125,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztsmqr(MORSE_enum side, MORSE_enum trans, int M1, int N1, int M2, int N2, int K, int IB, diff --git a/coreblas/compute/core_ztsmqr_hetra1.c b/coreblas/compute/core_ztsmqr_hetra1.c index 189039fc6ff26053335f103da86fff8905bcb0e1..e0675ddfff5193364dc3d803a68c2858302126c0 100644 --- a/coreblas/compute/core_ztsmqr_hetra1.c +++ b/coreblas/compute/core_ztsmqr_hetra1.c @@ -19,11 +19,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <coreblas/lapacke.h> #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -114,7 +114,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ #if defined(MORSE_HAVE_WEAK) #pragma weak CORE_ztsmqr_hetra1 = PCORE_ztsmqr_hetra1 #define CORE_ztsmqr_hetra1 PCORE_ztsmqr_hetra1 diff --git a/coreblas/compute/core_ztsqrt.c b/coreblas/compute/core_ztsqrt.c index da1ee2922778c758d7f448a9ee89021b6388177c..2a811493e5f0accd3f794a5e7c9e8bd990e1e35b 100644 --- a/coreblas/compute/core_ztsqrt.c +++ b/coreblas/compute/core_ztsqrt.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" #undef REAL #define COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -89,7 +89,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_ztsqrt(int M, int N, int IB, diff --git a/coreblas/compute/core_ztstrf.c b/coreblas/compute/core_ztstrf.c index 5733e30624a2d7d07c7a7129af79807fe4ca59a4..86888d73d43b6964d98e9af01bdbae9081d85034 100644 --- a/coreblas/compute/core_ztstrf.c +++ b/coreblas/compute/core_ztstrf.c @@ -22,12 +22,12 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" #include "coreblas/cblas.h" #include <math.h> -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -92,7 +92,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ int CORE_ztstrf(int M, int N, int IB, int NB, diff --git a/coreblas/compute/core_zttlqt.c b/coreblas/compute/core_zttlqt.c index dfb62d2ebaeb150e19267c09960fefb149dc1e85..4930772b9e9d0229105875dd6aedead4bc06d5dc 100644 --- a/coreblas/compute/core_zttlqt.c +++ b/coreblas/compute/core_zttlqt.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" #undef REAL #define COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -101,7 +101,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zttlqt(int M, int N, int IB, MORSE_Complex64_t *A1, int LDA1, diff --git a/coreblas/compute/core_zttmlq.c b/coreblas/compute/core_zttmlq.c index 5ed80116070281c73e3959a7046e35b2379d100a..d08418881a1925760d7bcdd1ebd78aee399329b1 100644 --- a/coreblas/compute/core_zttmlq.c +++ b/coreblas/compute/core_zttmlq.c @@ -22,10 +22,10 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -117,7 +117,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zttmlq(MORSE_enum side, MORSE_enum trans, int M1, int N1, int M2, int N2, int K, int IB, diff --git a/coreblas/compute/core_zttmqr.c b/coreblas/compute/core_zttmqr.c index 1676801121422b57f56725b24d2a5c0b56c56d16..446f7a875825664f46cf986396eb08c203ce47c1 100644 --- a/coreblas/compute/core_zttmqr.c +++ b/coreblas/compute/core_zttmqr.c @@ -21,10 +21,10 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -116,7 +116,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zttmqr(MORSE_enum side, MORSE_enum trans, int M1, int N1, int M2, int N2, int K, int IB, diff --git a/coreblas/compute/core_zttqrt.c b/coreblas/compute/core_zttqrt.c index 73d383686a3c0877c29d97009f100551a7098fba..f2d4dfbcf5b66b0708c7e1f6d0d09049999948fd 100644 --- a/coreblas/compute/core_zttqrt.c +++ b/coreblas/compute/core_zttqrt.c @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" #undef REAL #define COMPLEX -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -101,7 +101,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zttqrt(int M, int N, int IB, MORSE_Complex64_t *A1, int LDA1, diff --git a/coreblas/compute/core_zunmlq.c b/coreblas/compute/core_zunmlq.c index 9650278e691a3f919ad01999a8ed720fb92290ea..8b3f398cc01de09424ab1d73a4aee2313005d9f3 100644 --- a/coreblas/compute/core_zunmlq.c +++ b/coreblas/compute/core_zunmlq.c @@ -23,11 +23,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -109,7 +109,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zunmlq(MORSE_enum side, MORSE_enum trans, int M, int N, int K, int IB, diff --git a/coreblas/compute/core_zunmqr.c b/coreblas/compute/core_zunmqr.c index 479ad68d183f62b3599f645d00ebbd6c2868f04c..7504f2ca04044abaa1acd1f8f57cda5ee28f0dfe 100644 --- a/coreblas/compute/core_zunmqr.c +++ b/coreblas/compute/core_zunmqr.c @@ -7,7 +7,7 @@ * @copyright 2012-2014 Bordeaux INP, CNRS (LaBRI UMR 5800), Inria, * Univ. Bordeaux. All rights reserved. * - **/ + */ /** * * @brief Chameleon core_zunmqr CPU kernel @@ -23,11 +23,11 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/lapacke.h" #include "coreblas.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -110,7 +110,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CORE_zunmqr(MORSE_enum side, MORSE_enum trans, int M, int N, int K, int IB, diff --git a/coreblas/compute/global.c b/coreblas/compute/global.c index abb64da96d92133a28b865cc3133a6bf824defc1..7296f8f00b47b3a0b201fb03ba0fcb7eddcc005a 100644 --- a/coreblas/compute/global.c +++ b/coreblas/compute/global.c @@ -16,7 +16,7 @@ * @author Piotr Luszczek * @date 2010-11-15 * - **/ + */ static int coreblas_gemm3m_enabled = 0; void @@ -29,9 +29,9 @@ get_coreblas_gemm3m_enabled(void) { return coreblas_gemm3m_enabled; } -/******************************************************************************* +/** * LAPACK Constants - **/ + */ char *morse_lapack_constants[] = { "", "", "", "", "", "", "", "", "", "", diff --git a/coreblas/include/coreblas.h b/coreblas/include/coreblas.h index d92f517aa1f292b604f839f4e425441dfe43306a..d180bcfb121d1429c06d67d04e49165fc8185c3c 100644 --- a/coreblas/include/coreblas.h +++ b/coreblas/include/coreblas.h @@ -16,7 +16,7 @@ * @author Hatem Ltaief * @date 2010-11-15 * - **/ + */ #ifndef _CORE_BLAS_H_ #define _CORE_BLAS_H_ @@ -25,26 +25,26 @@ #include <string.h> #include <assert.h> -/** **************************************************************************** +/** * CBLAS requires for scalar arguments to be passed * by address rather than by value - **/ + */ #ifndef CBLAS_SADDR #define CBLAS_SADDR( _val_ ) &(_val_) #endif #include "coreblas/cblas.h" -/** **************************************************************************** +/** * MORSE types and constants - **/ + */ #include "chameleon/chameleon_config.h" #include "chameleon/morse_types.h" #include "chameleon/morse_struct.h" #include "chameleon/morse_constants.h" -/** **************************************************************************** +/** * CORE BLAS headers - **/ + */ BEGIN_C_DECLS #include "coreblas/coreblas_z.h" @@ -56,25 +56,25 @@ BEGIN_C_DECLS END_C_DECLS -/** **************************************************************************** +/** * Coreblas Error - **/ + */ #define coreblas_error(k, str) do { \ fprintf(stderr, "%s: Parameter %d / %s\n", __func__, k, str) ; \ assert(0); \ } while(0) -/** **************************************************************************** +/** * CBlas enum - **/ + */ #define CBLAS_TRANSPOSE enum CBLAS_TRANSPOSE #define CBLAS_UPLO enum CBLAS_UPLO #define CBLAS_DIAG enum CBLAS_DIAG #define CBLAS_SIDE enum CBLAS_SIDE -/** **************************************************************************** +/** * LAPACK Constants - **/ + */ BEGIN_C_DECLS extern char *morse_lapack_constants[]; diff --git a/coreblas/include/coreblas/cblas.h b/coreblas/include/coreblas/cblas.h index afa5483a9d024a3e80dbd90a78e63db51a34713e..34368b0f1bc05a1c470c9ae5d39081937f66c7e2 100644 --- a/coreblas/include/coreblas/cblas.h +++ b/coreblas/include/coreblas/cblas.h @@ -15,7 +15,7 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #ifndef CBLAS_H #define CBLAS_H #include <stddef.h> diff --git a/coreblas/include/coreblas/coreblas_z.h b/coreblas/include/coreblas/coreblas_z.h index ac774bfb185a82bef0a6ba53519e4600f9e5ee29..82d2febaec2e2eb118e2ffdee5342139da263764 100644 --- a/coreblas/include/coreblas/coreblas_z.h +++ b/coreblas/include/coreblas/coreblas_z.h @@ -23,15 +23,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #ifndef _MORSE_CORE_ZBLAS_H_ #define _MORSE_CORE_ZBLAS_H_ #define COMPLEX -/** **************************************************************************** +/** * Declarations of serial kernels - alphabetical order - **/ + */ void CORE_dzasum(int storev, MORSE_enum uplo, int M, int N, const MORSE_Complex64_t *A, int lda, double *work); void CORE_zbrdalg(MORSE_enum uplo, int N, int NB, diff --git a/coreblas/include/coreblas/coreblas_zc.h b/coreblas/include/coreblas/coreblas_zc.h index 097b1708e68c7efe205daa89a09cbed8aa3c5e35..d26e3dadcf895cf211f8bebc39ccc36b44af1a03 100644 --- a/coreblas/include/coreblas/coreblas_zc.h +++ b/coreblas/include/coreblas/coreblas_zc.h @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #ifndef _MORSE_CORE_ZCBLAS_H_ #define _MORSE_CORE_ZCBLAS_H_ -/** **************************************************************************** +/** * Declarations of serial kernels - alphabetical order - **/ + */ void CORE_clag2z(int m, int n, const MORSE_Complex32_t *A, int lda, MORSE_Complex64_t *B, int ldb); diff --git a/coreblas/include/coreblas/lapacke.h b/coreblas/include/coreblas/lapacke.h index 9fe8bef2f85e2ebb076523f9edc675878dafa28e..dfc5e3c841939b44279627e07c7e29188062deea 100644 --- a/coreblas/include/coreblas/lapacke.h +++ b/coreblas/include/coreblas/lapacke.h @@ -13,8 +13,8 @@ * * @version 1.0.0 * - **/ -/***************************************************************************** + */ +/** Copyright (c) 2010, Intel Corp. All rights reserved. @@ -45,7 +45,7 @@ * Contents: Native C interface to LAPACK * Author: Intel Corporation * Generated November, 2011 -*****************************************************************************/ +*/ #ifndef _LAPACKE_H_ #define _LAPACKE_H_ diff --git a/coreblas/include/coreblas/lapacke_config.h b/coreblas/include/coreblas/lapacke_config.h index 5c274e30638e588b8b4407a6287c3f5a603d3248..36dedcce09ecea38aa36e08854f4e32083152818 100644 --- a/coreblas/include/coreblas/lapacke_config.h +++ b/coreblas/include/coreblas/lapacke_config.h @@ -13,8 +13,8 @@ * * @version 1.0.0 * - **/ -/***************************************************************************** + */ +/** Copyright (c) 2010, Intel Corp. All rights reserved. @@ -45,7 +45,7 @@ * Contents: Native C interface to LAPACK * Author: Intel Corporation * Generated May, 2011 -*****************************************************************************/ +*/ #ifndef _LAPACKE_CONFIG_H_ #define _LAPACKE_CONFIG_H_ diff --git a/coreblas/include/coreblas/lapacke_mangling.h b/coreblas/include/coreblas/lapacke_mangling.h index 6a9051df876b315f7f01f5d3a96eadc8a97ffb5a..6dde725bb2b2567bc75c45abdc6719cbe923dc8c 100644 --- a/coreblas/include/coreblas/lapacke_mangling.h +++ b/coreblas/include/coreblas/lapacke_mangling.h @@ -13,7 +13,7 @@ * * @version 1.0.0 * - **/ + */ #ifndef LAPACK_HEADER_INCLUDED #define LAPACK_HEADER_INCLUDED diff --git a/cudablas/compute/cuda_zgeadd.c b/cudablas/compute/cuda_zgeadd.c index 0272303ba283ee072cb8fe7fe146bed5e267149e..d92b65346f08f6f5e67bbe9129977fef6856f7f2 100644 --- a/cudablas/compute/cuda_zgeadd.c +++ b/cudablas/compute/cuda_zgeadd.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if !defined(CHAMELEON_USE_CUBLAS_V2) @@ -76,7 +76,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CUDA_zgeadd(MORSE_enum trans, int m, int n, const cuDoubleComplex *alpha, diff --git a/cudablas/compute/cuda_zgelqt.c b/cudablas/compute/cuda_zgelqt.c index 24bc47e5b36c1b3237561d58faa9930bc285fef5..f033e63bbb26c2282ea20ee697f33fdf2882d192 100644 --- a/cudablas/compute/cuda_zgelqt.c +++ b/cudablas/compute/cuda_zgelqt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zgemerge.c b/cudablas/compute/cuda_zgemerge.c index 6d4b410fc4dd22c46f35979fd2860c809a81cc94..6ab3d87791602dc7fc3764e3314bd2b7579ef74c 100644 --- a/cudablas/compute/cuda_zgemerge.c +++ b/cudablas/compute/cuda_zgemerge.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cuda_zgemm.c b/cudablas/compute/cuda_zgemm.c index fce14417a3cae876b15f9ac63eb32555c61ba888..eb07ce43c6c74d4ccd38e23d42eefcb6518b6bcc 100644 --- a/cudablas/compute/cuda_zgemm.c +++ b/cudablas/compute/cuda_zgemm.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_zgemm(MORSE_enum transa, MORSE_enum transb, diff --git a/cudablas/compute/cuda_zgeqrt.c b/cudablas/compute/cuda_zgeqrt.c index 1af0a2477194af6050972c5eb45248bc5ce4e331..8601a9a9f1b135cb78ff84f0187dc0b3f36c472c 100644 --- a/cudablas/compute/cuda_zgeqrt.c +++ b/cudablas/compute/cuda_zgeqrt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zgessm.c b/cudablas/compute/cuda_zgessm.c index 4e2f1af0cdb61b7399714850793d68f278feb0ab..5cf21bab9e696eeff50ca446db8f080e8a73353b 100644 --- a/cudablas/compute/cuda_zgessm.c +++ b/cudablas/compute/cuda_zgessm.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zgetrf.c b/cudablas/compute/cuda_zgetrf.c index c0d054046b5afc32fb2ab4e2b7f5b1339956d9be..f7cc782ba3bc6e588a377a329f8a8d31739e418f 100644 --- a/cudablas/compute/cuda_zgetrf.c +++ b/cudablas/compute/cuda_zgetrf.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zhemm.c b/cudablas/compute/cuda_zhemm.c index 60acf47c7aaa57a8e9aad93922dfc23fb8406be2..87d6d6b9e1df30d95b921bc96d5e58c7947571bc 100644 --- a/cudablas/compute/cuda_zhemm.c +++ b/cudablas/compute/cuda_zhemm.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c * - **/ + */ #include "cudablas.h" int CUDA_zhemm(MORSE_enum side, MORSE_enum uplo, diff --git a/cudablas/compute/cuda_zher2k.c b/cudablas/compute/cuda_zher2k.c index cbd4aad4c1e57547619a752a9536ddc1aaf35aab..67aa6ccb099c90e26e77723a49c36078834e8891 100644 --- a/cudablas/compute/cuda_zher2k.c +++ b/cudablas/compute/cuda_zher2k.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c * - **/ + */ #include "cudablas.h" int CUDA_zher2k(MORSE_enum uplo, MORSE_enum trans, diff --git a/cudablas/compute/cuda_zherfb.c b/cudablas/compute/cuda_zherfb.c index a6ef527fb57342edecee0958f8b4257825bc02fb..d8b784c0bfa98f2fa8d37458a5be9980d4323154 100644 --- a/cudablas/compute/cuda_zherfb.c +++ b/cudablas/compute/cuda_zherfb.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cuda_zherk.c b/cudablas/compute/cuda_zherk.c index 8857c9352f5882e2a55373705f9a6d89e8cdbe6d..81b276916504b03da260d55f6125d7ef17f9ac3e 100644 --- a/cudablas/compute/cuda_zherk.c +++ b/cudablas/compute/cuda_zherk.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c * - **/ + */ #include "cudablas.h" int CUDA_zherk( MORSE_enum uplo, MORSE_enum trans, diff --git a/cudablas/compute/cuda_zlarfb.c b/cudablas/compute/cuda_zlarfb.c index 0c0f77b694a1c8ed7f64cee0e20d16bc50b3000e..52e64d179986d8a21fc66f8dca8ffc6777494d5b 100644 --- a/cudablas/compute/cuda_zlarfb.c +++ b/cudablas/compute/cuda_zlarfb.c @@ -18,7 +18,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cuda_zlauum.c b/cudablas/compute/cuda_zlauum.c index 1c474fd01086eac92cc80e288375943355a6bfce..e86f602e4196ae35d032c27c5312952928929aa1 100644 --- a/cudablas/compute/cuda_zlauum.c +++ b/cudablas/compute/cuda_zlauum.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zparfb.c b/cudablas/compute/cuda_zparfb.c index 0539453df43c092f6e1fd482f987d5e98096a26c..447f3c18253869b4647ede5c0f515233bb0f86df 100644 --- a/cudablas/compute/cuda_zparfb.c +++ b/cudablas/compute/cuda_zparfb.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" /** @@ -142,7 +142,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ int CUDA_zparfb(MORSE_enum side, MORSE_enum trans, MORSE_enum direct, MORSE_enum storev, diff --git a/cudablas/compute/cuda_zpotrf.c b/cudablas/compute/cuda_zpotrf.c index fea8b0841c8d1733709a104a9a8ecdc36bc15052..6174422da5803888b76f873971911adeb24bf7d0 100644 --- a/cudablas/compute/cuda_zpotrf.c +++ b/cudablas/compute/cuda_zpotrf.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zssssm.c b/cudablas/compute/cuda_zssssm.c index fc99b7c56af4c31ee958e980edc833d2b1c7d215..9291bf33cc239a0f8060246b1968be5957ecb877 100644 --- a/cudablas/compute/cuda_zssssm.c +++ b/cudablas/compute/cuda_zssssm.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_zsymm.c b/cudablas/compute/cuda_zsymm.c index 5290e5dfd646ed7159f1bc65a058eae605700558..cab5b91cb12c77c26c67cd5d51970ccf2e5dd2e9 100644 --- a/cudablas/compute/cuda_zsymm.c +++ b/cudablas/compute/cuda_zsymm.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_zsymm(MORSE_enum side, MORSE_enum uplo, diff --git a/cudablas/compute/cuda_zsyr2k.c b/cudablas/compute/cuda_zsyr2k.c index 3d71f3c6b5ab1774ac5deca74c4a40853d8116d8..984c36c3d25bf80637d7b172731eb8509cefd2d4 100644 --- a/cudablas/compute/cuda_zsyr2k.c +++ b/cudablas/compute/cuda_zsyr2k.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_zsyr2k( diff --git a/cudablas/compute/cuda_zsyrk.c b/cudablas/compute/cuda_zsyrk.c index 8e1f019405b006dc55ab34ffbe7e5bcc30345437..5cab678b8c022ea364b492802faf9e1b1ad432dd 100644 --- a/cudablas/compute/cuda_zsyrk.c +++ b/cudablas/compute/cuda_zsyrk.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_zsyrk(MORSE_enum uplo, MORSE_enum trans, diff --git a/cudablas/compute/cuda_ztpmqrt.c b/cudablas/compute/cuda_ztpmqrt.c index a408f0588185652d9b86bc57d1c81afadc17488d..e379c0faef4b1f15016086ce23e03d0605834421 100644 --- a/cudablas/compute/cuda_ztpmqrt.c +++ b/cudablas/compute/cuda_ztpmqrt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cuda_ztrmm.c b/cudablas/compute/cuda_ztrmm.c index 44b37efa0f9bc01457080cf468123b3b5f2e2f95..a878d2fe75aec70d4587bfb6007ccab16e89c6aa 100644 --- a/cudablas/compute/cuda_ztrmm.c +++ b/cudablas/compute/cuda_ztrmm.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_ztrmm( diff --git a/cudablas/compute/cuda_ztrsm.c b/cudablas/compute/cuda_ztrsm.c index 191db960e8a5e3414d5211a3cb16ff87e083ebe1..98da14e808cfd4b309138b21f2ed6255e78a2395 100644 --- a/cudablas/compute/cuda_ztrsm.c +++ b/cudablas/compute/cuda_ztrsm.c @@ -16,7 +16,7 @@ * @date 2015-09-17 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_ztrsm(MORSE_enum side, MORSE_enum uplo, diff --git a/cudablas/compute/cuda_ztrtri.c b/cudablas/compute/cuda_ztrtri.c index 2831951e5bc270ea1605cdf4ad8740b30f10680e..5bb77b8f9233a8ede70c01a77dac721e3ce42d4f 100644 --- a/cudablas/compute/cuda_ztrtri.c +++ b/cudablas/compute/cuda_ztrtri.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_ztslqt.c b/cudablas/compute/cuda_ztslqt.c index 579ec4d6a08c77ba3fb5b25b89fb340d678bf1b5..f7f36ec60bde7fc0d0a442d1d106271d1ae8c70c 100644 --- a/cudablas/compute/cuda_ztslqt.c +++ b/cudablas/compute/cuda_ztslqt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) && 0 diff --git a/cudablas/compute/cuda_ztsmlq.c b/cudablas/compute/cuda_ztsmlq.c index c5b188b4c0fa1013c634b60db84cbd3026065708..9b37777807ca552aecffd2febd940ba2d0eb0ea9 100644 --- a/cudablas/compute/cuda_ztsmlq.c +++ b/cudablas/compute/cuda_ztsmlq.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_ztsmlq( diff --git a/cudablas/compute/cuda_ztsmqr.c b/cudablas/compute/cuda_ztsmqr.c index 8a4201fd03fffe2323b4be4fa0969c2cb52f9b77..fdefdd3d87e3001a9cbe3435507e14bf218552c3 100644 --- a/cudablas/compute/cuda_ztsmqr.c +++ b/cudablas/compute/cuda_ztsmqr.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_ztsmqr( diff --git a/cudablas/compute/cuda_ztsqrt.c b/cudablas/compute/cuda_ztsqrt.c index 18eacfc48006604ae8e032f8994a33c4c793ea4b..8f635052c5fb2cdf9d0eece4ad79572c1ed959e2 100644 --- a/cudablas/compute/cuda_ztsqrt.c +++ b/cudablas/compute/cuda_ztsqrt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) diff --git a/cudablas/compute/cuda_ztstrf.c b/cudablas/compute/cuda_ztstrf.c index 05d9cfd996edcc5ec053fb500ad3c9d8683efc2b..4bc219b9ff5eb2a8eb02393a7cbdcd4f7cf70a09 100644 --- a/cudablas/compute/cuda_ztstrf.c +++ b/cudablas/compute/cuda_ztstrf.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" #if defined(CHAMELEON_USE_MAGMA) && 0 diff --git a/cudablas/compute/cuda_zttmqr.c b/cudablas/compute/cuda_zttmqr.c index aee924567e3d635bfcdbc4525854cdb634a60b49..a9156f9dc273ba0dbb50dabf66de202347c4112a 100644 --- a/cudablas/compute/cuda_zttmqr.c +++ b/cudablas/compute/cuda_zttmqr.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int CUDA_zttmqr( diff --git a/cudablas/compute/cuda_zunmlqt.c b/cudablas/compute/cuda_zunmlqt.c index bcd7991624a1d4caa163b50e541b65f497d8150c..1d2e0b6942e767ed3488f0ae7865b6e704fe49a4 100644 --- a/cudablas/compute/cuda_zunmlqt.c +++ b/cudablas/compute/cuda_zunmlqt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cuda_zunmqrt.c b/cudablas/compute/cuda_zunmqrt.c index 0fb9596370bb596c8c5f01c60f5789ba5b1ac9ee..acb99411fd554eea63eb1c1dbeca4fceacb30b34 100644 --- a/cudablas/compute/cuda_zunmqrt.c +++ b/cudablas/compute/cuda_zunmqrt.c @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "cudablas.h" int diff --git a/cudablas/compute/cudaglobal.c b/cudablas/compute/cudaglobal.c index df552a1644601f333645f9e12c516c98cbe27f2e..f74eb2f055544669d8aabbdb2feb221e74cfb8b4 100644 --- a/cudablas/compute/cudaglobal.c +++ b/cudablas/compute/cudaglobal.c @@ -15,12 +15,12 @@ * @author Mathieu Faverge * @date 2017-04-06 * - **/ + */ #include "cudablas.h" -/******************************************************************************* +/** * LAPACK Constants - **/ + */ int morse_cublas_constants[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, diff --git a/cudablas/include/cudablas.h b/cudablas/include/cudablas.h index 7cd6106e9c12499d1cb7a84455974c942e564a80..89b795691562c56d31608a5833228837b6116434 100644 --- a/cudablas/include/cudablas.h +++ b/cudablas/include/cudablas.h @@ -16,7 +16,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #ifndef _CUDA_BLAS_H_ #define _CUDA_BLAS_H_ @@ -60,16 +60,16 @@ #endif /* defined(CHAMELEON_USE_CUBLAS_V2) */ -/** **************************************************************************** +/** * MORSE types and constants - **/ + */ #include "chameleon/morse_types.h" #include "chameleon/morse_struct.h" #include "chameleon/morse_constants.h" -/** **************************************************************************** +/** * CUDA BLAS headers - **/ + */ BEGIN_C_DECLS #include "cudablas/cudablas_z.h" @@ -79,14 +79,14 @@ BEGIN_C_DECLS END_C_DECLS -/** **************************************************************************** +/** * Coreblas Error - **/ + */ #define cudablas_error(k, str) fprintf(stderr, "%s: Parameter %d / %s\n", __func__, k, str) -/** **************************************************************************** +/** * LAPACK Constants - **/ + */ BEGIN_C_DECLS extern char *morse_lapack_constants[]; diff --git a/cudablas/include/cudablas/cudablas_z.h b/cudablas/include/cudablas/cudablas_z.h index 0c68bef0710bae3748b828b3c551819bf4415547..e7c6a9d2e4c4c7de5662104b39d0f50d0be66f4c 100644 --- a/cudablas/include/cudablas/cudablas_z.h +++ b/cudablas/include/cudablas/cudablas_z.h @@ -16,13 +16,13 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #ifndef _MORSE_CUDA_ZBLAS_H_ #define _MORSE_CUDA_ZBLAS_H_ -/** **************************************************************************** +/** * Declarations of cuda kernels - alphabetical order - **/ + */ int CUDA_zgeadd( MORSE_enum trans, int m, int n, const cuDoubleComplex *alpha, const cuDoubleComplex *A, int lda, const cuDoubleComplex *beta, cuDoubleComplex *B, int ldb, CUBLAS_STREAM_PARAM ); int CUDA_zgemerge( MORSE_enum side, MORSE_enum diag, int M, int N, cuDoubleComplex *A, int LDA, cuDoubleComplex *B, int LDB, CUBLAS_STREAM_PARAM ); int CUDA_zgemm( MORSE_enum transa, MORSE_enum transb, int m, int n, int k, cuDoubleComplex *alpha, const cuDoubleComplex *A, int lda, const cuDoubleComplex *B, int ldb, cuDoubleComplex *beta, cuDoubleComplex *C, int ldc, CUBLAS_STREAM_PARAM ); diff --git a/doc/texinfo/chapters/using.texi b/doc/texinfo/chapters/using.texi index 9252989cddbe2165f7b873d0232fd205453e3486..0480af530e832f6fea2c8fa9946d2cb59d34ff21 100644 --- a/doc/texinfo/chapters/using.texi +++ b/doc/texinfo/chapters/using.texi @@ -894,7 +894,7 @@ Routines computing linear algebra of the form @uref{http://www.netlib.org/lapack/lug/node24.html} availables: @verbatim -/** ******************************************************** +/** * Declarations of computational functions (LAPACK layout) **/ int MORSE_zgelqf(int M, int N, MORSE_Complex64_t *A, int LDA, @@ -1065,7 +1065,7 @@ int MORSE_zunmqr(MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, MORSE_Complex64_t *B, int LDB); -/** ****************************************************** +/** * Declarations of computational functions (tile layout) **/ int MORSE_zgelqf_Tile(MORSE_desc_t *A, MORSE_desc_t *T); @@ -1199,7 +1199,7 @@ int MORSE_zunmlq_Tile(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, int MORSE_zunmqr_Tile(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B); -/** **************************************** +/** * Declarations of computational functions * (tile layout, asynchronous execution) **/ diff --git a/example/basic_zposv/basic_posv.h b/example/basic_zposv/basic_posv.h index 139dccb7b661d7c5b2c878299d3423fc38a199a0..04748c34f6b768f9fa2ff4a6bc7aa9206c9b13b5 100644 --- a/example/basic_zposv/basic_posv.h +++ b/example/basic_zposv/basic_posv.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-13 * - **/ + */ #ifndef BASIC_POSV_H #define BASIC_POSV_H diff --git a/example/basic_zposv/posv_morse_functions.h b/example/basic_zposv/posv_morse_functions.h index e647648832276728e0c04eafeba00139aab0d3bb..794edd96277a12b7ea6bb42f228819ac1c4df7c0 100644 --- a/example/basic_zposv/posv_morse_functions.h +++ b/example/basic_zposv/posv_morse_functions.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-13 * - **/ + */ #ifndef POSV_MORSE_FUNCTIONS_H #define POSV_MORSE_FUNCTIONS_H diff --git a/example/basic_zposv/posv_users_functions.h b/example/basic_zposv/posv_users_functions.h index a64417766d0f505aecde6b97165a5defcc47e6f8..8d023dd13eceb5f8eefc711eec90ef4ea4572356 100644 --- a/example/basic_zposv/posv_users_functions.h +++ b/example/basic_zposv/posv_users_functions.h @@ -15,15 +15,15 @@ * @author Florent Pruvost * @date 2014-10-13 * - **/ + */ #ifndef POSV_USERS_FUNCTIONS_H #define POSV_USERS_FUNCTIONS_H #include "basic_posv.h" -/******************************************************************************* +/** * Function to return address of block (m,n) - **/ + */ inline static void* user_getaddr_arrayofpointers(const MORSE_desc_t *A, int m, int n) { MORSE_Complex64_t **matA = (MORSE_Complex64_t **)A->mat; @@ -42,18 +42,18 @@ inline static void* user_getaddr_arrayofpointers(const MORSE_desc_t *A, int m, i return (void*)( *(matA + offset) ); } -/******************************************************************************* +/** * Function to return the leading dimension of element A(m,*) - **/ + */ inline static int user_getblkldd_arrayofpointers(const MORSE_desc_t *A, int m) { (void)m; return A->mb; } -/******************************************************************************* +/** * Function to return MPI rank of element A(m,n) - **/ + */ inline static int user_getrankof_2d(const MORSE_desc_t *desc, int m, int n) { return (m % desc->p) * desc->q + (n % desc->q); diff --git a/example/basic_zposv/zposv_morse_functions.c b/example/basic_zposv/zposv_morse_functions.c index 278beda4123f8de9e97752cc1c22b577bbb79b87..f676d2d3e3ce0ae65896914e616c62fd8018d53e 100644 --- a/example/basic_zposv/zposv_morse_functions.c +++ b/example/basic_zposv/zposv_morse_functions.c @@ -16,7 +16,7 @@ * @date 2014-10-13 * @precisions normal z -> s d c * - **/ + */ #include "posv_morse_functions.h" int main(int argc, char *argv[]) { diff --git a/example/basic_zposv/zposv_users_functions.c b/example/basic_zposv/zposv_users_functions.c index 2a4556ea4aa16861fed825d0b50c824f834017bd..e52593ae5137e2502d767182c99747a38755d9f0 100644 --- a/example/basic_zposv/zposv_users_functions.c +++ b/example/basic_zposv/zposv_users_functions.c @@ -16,12 +16,12 @@ * @date 2014-10-13 * @precisions normal z -> s d c * - **/ + */ #include "posv_users_functions.h" -/******************************************************************************* +/** * Function that allocate an array of pointers to square tiles (allocated to 0) - **/ + */ MORSE_Complex64_t **allocate_tile_matrix(int m, int n, int nb){ int i; int mt, nt; diff --git a/example/lapack_to_morse/lapack_to_morse.h b/example/lapack_to_morse/lapack_to_morse.h index dceec1b41c6d603c278dcb786f1a3eaba64fa1c4..a01e983e1d13ada4c235d5ce398ac055854b19cf 100644 --- a/example/lapack_to_morse/lapack_to_morse.h +++ b/example/lapack_to_morse/lapack_to_morse.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef LAPACK_TO_MORSE_H #define LAPACK_TO_MORSE_H diff --git a/example/lapack_to_morse/step0.c b/example/lapack_to_morse/step0.c index 99b344c07db7eb51a3fbb6b35206688d9f4a91a8..f5cbfc34408ab63bea44b72711df6f35fc7be6f2 100644 --- a/example/lapack_to_morse/step0.c +++ b/example/lapack_to_morse/step0.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step0.h" #include <coreblas.h> diff --git a/example/lapack_to_morse/step0.h b/example/lapack_to_morse/step0.h index 9ce65d722df8b53117c21f79567ca6f66ac9dfab..7ca73889108f9b0f770f223b5b55a318a011418e 100644 --- a/example/lapack_to_morse/step0.h +++ b/example/lapack_to_morse/step0.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP0_H #define STEP0_H @@ -43,7 +43,7 @@ enum iparam_step0 { /* Specific routines used in step0.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -55,7 +55,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -69,7 +69,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step0 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -91,7 +91,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { @@ -120,7 +120,7 @@ static void print_header(char *prog_name, int * iparam) { return; } -/****************************************************************************** +/** * Macro to allocate a matrix as a 1D array */ #define PASTE_CODE_ALLOCATE_MATRIX(_name_, _type_, _m_, _n_) \ diff --git a/example/lapack_to_morse/step1.c b/example/lapack_to_morse/step1.c index a10acb6034b58f3844952a32f927633aebf9c04b..930055a7617180052fff10e9c08a301f10f21238 100644 --- a/example/lapack_to_morse/step1.c +++ b/example/lapack_to_morse/step1.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step1.h" /* diff --git a/example/lapack_to_morse/step1.h b/example/lapack_to_morse/step1.h index d81515509c2dfc77389f6cf12c442bf1be2a07ee..0b76f1de5f61a221fe14707e95622a420277e8c8 100644 --- a/example/lapack_to_morse/step1.h +++ b/example/lapack_to_morse/step1.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP1_H #define STEP1_H @@ -37,7 +37,7 @@ enum iparam_step1 { /* Specific routines used in step1.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -46,7 +46,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -61,7 +61,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step1 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -83,7 +83,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { @@ -119,7 +119,7 @@ static void print_header(char *prog_name, int * iparam) { return; } -/****************************************************************************** +/** * Macro to allocate a matrix as a 1D array */ #define PASTE_CODE_ALLOCATE_MATRIX(_name_, _type_, _m_, _n_) \ diff --git a/example/lapack_to_morse/step2.c b/example/lapack_to_morse/step2.c index fe04762a225bb182a62719ef89a6397b763a8365..0a51acd1e39a8c03beb0f6dd8b5b62c8a159f080 100644 --- a/example/lapack_to_morse/step2.c +++ b/example/lapack_to_morse/step2.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step2.h" /* diff --git a/example/lapack_to_morse/step2.h b/example/lapack_to_morse/step2.h index cc651c54d5687572cd28f82c36c2d63dfb683498..86eb985dff1f9a49de90860b19dc49fe377c6c58 100644 --- a/example/lapack_to_morse/step2.h +++ b/example/lapack_to_morse/step2.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP2_H #define STEP2_H @@ -37,7 +37,7 @@ enum iparam_step2 { /* Specific routines used in step2.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -46,7 +46,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -61,7 +61,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step2 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -83,7 +83,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { @@ -119,7 +119,7 @@ static void print_header(char *prog_name, int * iparam) { return; } -/****************************************************************************** +/** * Macro to allocate a matrix as a 1D array */ #define PASTE_CODE_ALLOCATE_MATRIX(_name_, _type_, _m_, _n_) \ diff --git a/example/lapack_to_morse/step3.c b/example/lapack_to_morse/step3.c index 99552a33d14c26b387ec2b6231a6c53eec0787d0..fdad78747b24d0704f8be9e8d7be4bcc2bbf848a 100644 --- a/example/lapack_to_morse/step3.c +++ b/example/lapack_to_morse/step3.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step3.h" /* diff --git a/example/lapack_to_morse/step3.h b/example/lapack_to_morse/step3.h index 1c00f9e8b97f3e46653219e420ec5cff2ea8d4ca..2d02d920aedfc5c48392ae0df6ea6a432d242a86 100644 --- a/example/lapack_to_morse/step3.h +++ b/example/lapack_to_morse/step3.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP3_H #define STEP3_H @@ -37,7 +37,7 @@ enum iparam_step3 { /* Specific routines used in step3.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -46,7 +46,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -61,7 +61,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step3 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -83,7 +83,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { @@ -119,7 +119,7 @@ static void print_header(char *prog_name, int * iparam) { return; } -/******************************************************************************* +/** * Function that allocate an array of pointers to square tiles (allocated to 0) */ double **allocate_tile_matrix(int m, int n, int nb){ @@ -145,7 +145,7 @@ double **allocate_tile_matrix(int m, int n, int nb){ return mat; } -/******************************************************************************* +/** * Function that deallocate an array of pointers to square tiles */ static void deallocate_tile_matrix(double **mat, int m, int n, int nb){ @@ -159,7 +159,7 @@ static void deallocate_tile_matrix(double **mat, int m, int n, int nb){ free(mat); } -/******************************************************************************* +/** * Function to return address of block (m,n) */ inline static void* user_getaddr_arrayofpointers(const MORSE_desc_t *A, int m, int n) @@ -179,7 +179,7 @@ inline static void* user_getaddr_arrayofpointers(const MORSE_desc_t *A, int m, i return (void*)( *(matA + offset) ); } -/******************************************************************************* +/** * Function to return the leading dimension of element A(m,*) */ inline static int user_getblkldd_arrayofpointers(const MORSE_desc_t *A, int m) @@ -188,7 +188,7 @@ inline static int user_getblkldd_arrayofpointers(const MORSE_desc_t *A, int m) return A->mb; } -/******************************************************************************* +/** * Function to return MPI rank of element A(m,n) */ inline static int user_getrankof_zero(const MORSE_desc_t *A, int m, int n) diff --git a/example/lapack_to_morse/step4.c b/example/lapack_to_morse/step4.c index caacf292e7c712a379724dc6681c7e64cdd5652f..6eafc33b1b87f95a5822799e8068351de29a9e4a 100644 --- a/example/lapack_to_morse/step4.c +++ b/example/lapack_to_morse/step4.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step4.h" /* diff --git a/example/lapack_to_morse/step4.h b/example/lapack_to_morse/step4.h index da247a61e722b4ec37b90d63436d2d04fe6cd2c5..e68cd4eb632432686c216a34be0fae5b02f444bc 100644 --- a/example/lapack_to_morse/step4.h +++ b/example/lapack_to_morse/step4.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP4_H #define STEP4_H @@ -37,7 +37,7 @@ enum iparam_step4 { /* Specific routines used in step3.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -46,7 +46,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -61,7 +61,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step4 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -83,7 +83,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { diff --git a/example/lapack_to_morse/step5.c b/example/lapack_to_morse/step5.c index 5e73a6c4665f2b99ac195cfe5d36ac3c2a56e616..0b7c03a9b27ae942a2f2da93d786fa721fdd7f4f 100644 --- a/example/lapack_to_morse/step5.c +++ b/example/lapack_to_morse/step5.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step5.h" /* diff --git a/example/lapack_to_morse/step5.h b/example/lapack_to_morse/step5.h index f559a03823c56229dfcddacc5c96d7a07a01cf7e..b4ba0dc1b5506856f25ac435ab0a231aabc42473 100644 --- a/example/lapack_to_morse/step5.h +++ b/example/lapack_to_morse/step5.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP5_H #define STEP5_H @@ -40,7 +40,7 @@ enum iparam_step5 { /* Specific routines used in step5.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -52,7 +52,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -70,7 +70,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step5 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -98,7 +98,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { diff --git a/example/lapack_to_morse/step6.c b/example/lapack_to_morse/step6.c index 660c3c58383af3231f86a87e86423906879ed9e6..49e02c1b00f429c3dfa887a021d7c035f3ed76ff 100644 --- a/example/lapack_to_morse/step6.c +++ b/example/lapack_to_morse/step6.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "step6.h" /* diff --git a/example/lapack_to_morse/step6.h b/example/lapack_to_morse/step6.h index 2f7a65ce0beb921b984e7962ef2d69faed8bf026..bedf4909631d26e6bfe7d9dbdd163c296e250296 100644 --- a/example/lapack_to_morse/step6.h +++ b/example/lapack_to_morse/step6.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #ifndef STEP6_H #define STEP6_H @@ -46,7 +46,7 @@ enum iparam_step6 { /* Specific routines used in step6.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -61,7 +61,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_Q ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -80,7 +80,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step6 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -110,7 +110,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { diff --git a/example/lapack_to_morse/step7.c b/example/lapack_to_morse/step7.c index dfc7ccba002383de6052aeaeda8a0c85e7cbd6cc..4aa0b0001f3a8dfd4f71ec4b4892f47c62ab2016 100644 --- a/example/lapack_to_morse/step7.c +++ b/example/lapack_to_morse/step7.c @@ -16,7 +16,7 @@ * @author Guillaume Sylvand * @date 2016-09-05 * - **/ + */ #include "step7.h" /* diff --git a/example/lapack_to_morse/step7.h b/example/lapack_to_morse/step7.h index b3a04d6780073447a48945eb09bc9d3e783e451c..6d658bd96d7d495f06b8182ad8268abd48353e2e 100644 --- a/example/lapack_to_morse/step7.h +++ b/example/lapack_to_morse/step7.h @@ -16,7 +16,7 @@ * @author Guillaume Sylvand * @date 2016-09-05 * - **/ + */ #ifndef step7_H #define step7_H @@ -48,7 +48,7 @@ enum iparam_step7 { /* Specific routines used in step7.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -63,7 +63,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_Q ] = 1; } -/****************************************************************************** +/** * Callback function used to build matrix blocks * Morse_build_callback_plgsy : random symmetric positive definite * Morse_build_callback_plrnt : random @@ -88,7 +88,7 @@ static void Morse_build_callback_plrnt(int row_min, int row_max, int col_min, in CORE_dplrnt(row_max-row_min+1, col_max-col_min+1, buffer, ld, data->bigM, row_min, col_min, data->seed); } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -107,7 +107,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step7 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -137,7 +137,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { diff --git a/example/link_chameleon/link_chameleon.c b/example/link_chameleon/link_chameleon.c index b28e4a6d90baaca73ac412a59f72d25213445fa2..612a3c53188923fa0a9a40dbae6966b8f8492eea 100644 --- a/example/link_chameleon/link_chameleon.c +++ b/example/link_chameleon/link_chameleon.c @@ -50,7 +50,7 @@ enum iparam_step1 { /* Specific routines used in step1.c main program */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -59,7 +59,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_NRHS ] = 1; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -74,7 +74,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following step1 program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -96,7 +96,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { @@ -132,7 +132,7 @@ static void print_header(char *prog_name, int * iparam) { return; } -/****************************************************************************** +/** * Macro to allocate a matrix as a 1D array */ #define PASTE_CODE_ALLOCATE_MATRIX(_name_, _type_, _m_, _n_) \ diff --git a/example/out_of_core/out_of_core.c b/example/out_of_core/out_of_core.c index 3b1e9b37694533e374ec927041aecce152f71708..0db7f3af70c30d48d13f027c7c8fcd4731d34844 100644 --- a/example/out_of_core/out_of_core.c +++ b/example/out_of_core/out_of_core.c @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-29 * - **/ + */ #include "out_of_core.h" /* diff --git a/example/out_of_core/out_of_core.h b/example/out_of_core/out_of_core.h index da6049cb1e0707084eb12404fc0b1a22110a4602..ca5d1f29418a8416af4df9f2269686de8a20ced8 100644 --- a/example/out_of_core/out_of_core.h +++ b/example/out_of_core/out_of_core.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2016-08-23 * - **/ + */ #ifndef OOC_H #define OOC_H @@ -87,7 +87,7 @@ enum iparam_ooc { /* Specific routines */ -/****************************************************************************** +/** * Initialize integer parameters */ static void init_iparam(int iparam[IPARAM_SIZEOF]){ @@ -98,7 +98,7 @@ static void init_iparam(int iparam[IPARAM_SIZEOF]){ iparam[IPARAM_OUTOFCORE ] = 2000; } -/****************************************************************************** +/** * Print how to use the program */ static void show_help(char *prog_name) { @@ -115,7 +115,7 @@ static void show_help(char *prog_name) { "\n"); } -/****************************************************************************** +/** * Read arguments following ooc program call */ static void read_args(int argc, char *argv[], int *iparam){ @@ -141,7 +141,7 @@ static void read_args(int argc, char *argv[], int *iparam){ } } -/****************************************************************************** +/** * Print a header message to summarize main parameters */ static void print_header(char *prog_name, int * iparam) { diff --git a/include/chameleon/chameleon_config.h.in b/include/chameleon/chameleon_config.h.in index f89e54b0cc9bdfbc1e0ba23ad0b771bc7c86e650..1887fefcb1658ee51e46822ae42ca28170b1a604 100644 --- a/include/chameleon/chameleon_config.h.in +++ b/include/chameleon/chameleon_config.h.in @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2017-01-06 * - **/ + */ #ifndef CHAMELEON_CONFIG_H_HAS_BEEN_INCLUDED #define CHAMELEON_CONFIG_H_HAS_BEEN_INCLUDED diff --git a/include/chameleon/chameleon_timer.h b/include/chameleon/chameleon_timer.h index 996a0b693c3dc92057f9d806b9d2d22a7bd59072..effb62205d027c0816b8dbfb89aa1cc81543980a 100644 --- a/include/chameleon/chameleon_timer.h +++ b/include/chameleon/chameleon_timer.h @@ -14,7 +14,7 @@ * Provide a simple timer for examples and runtimes which do not provide their * own timer. * - **/ + */ #ifndef _chameleon_timer_h_ #define _chameleon_timer_h_ diff --git a/include/chameleon/morse_constants.h b/include/chameleon/morse_constants.h index 01f412b95506f0626bbe7ff7493958b2bba675f2..acc7c4fac10037e3362932a800106010151c758c 100644 --- a/include/chameleon/morse_constants.h +++ b/include/chameleon/morse_constants.h @@ -17,11 +17,11 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_CONSTANTS_H_ #define _MORSE_CONSTANTS_H_ -/** **************************************************************************** +/** * * @brief Chameleon constants - CBLAS & LAPACK * The naming and numbering is consistent with: @@ -29,7 +29,7 @@ * 1) CBLAS from Netlib (http://www.netlib.org/blas/blast-forum/cblas.tgz), * 2) C Interface to LAPACK from Netlib (http://www.netlib.org/lapack/lapwrapc/). * - **/ + */ #define MorseByte 0 #define MorseInteger 1 #define MorseRealFloat 2 @@ -102,18 +102,18 @@ #define morse_const_neg(const) (((const-1)^0x01)+1) -/** **************************************************************************** +/** * MORSE constants - boolean - **/ + */ #define MORSE_FALSE 0 #define MORSE_TRUE 1 #define MORSE_CPU ((1ULL)<<1) #define MORSE_CUDA ((1ULL)<<3) -/** **************************************************************************** +/** * State machine switches - **/ + */ #define MORSE_WARNINGS 1 #define MORSE_ERRORS 2 #define MORSE_AUTOTUNING 3 @@ -124,9 +124,9 @@ #define MORSE_PROGRESS 8 #define MORSE_GEMM3M 9 -/** **************************************************************************** +/** * MORSE constants - configuration parameters - **/ + */ #define MORSE_CONCURRENCY 1 #define MORSE_TILE_SIZE 2 #define MORSE_INNER_BLOCK_SIZE 3 @@ -140,9 +140,9 @@ #define MORSE_INPLACE 1 #define MORSE_OUTOFPLACE 2 -/** **************************************************************************** +/** * MORSE constants - success & error codes - **/ + */ #define MORSE_SUCCESS 0 #define MORSE_ERR_NOT_INITIALIZED -101 #define MORSE_ERR_REINITIALIZED -102 @@ -156,23 +156,23 @@ #define MORSE_ERR_UNEXPECTED -110 #define MORSE_ERR_SEQUENCE_FLUSHED -111 -/** **************************************************************************** +/** * Kernels options - **/ + */ #define MORSE_PRIORITY_MIN 0 #define MORSE_PRIORITY_MAX INT_MAX -/******************************************************************************* +/** * Scheduler properties - **/ + */ #define PRIORITY 16 #define CALLBACK 17 #define REDUX 18 -/** **************************************************************************** +/** * MORSE ??? - **/ + */ #define MORSE_REQUEST_INITIALIZER {MORSE_SUCCESS} #endif diff --git a/include/chameleon/morse_kernels.h b/include/chameleon/morse_kernels.h index 8427865968ca77b0b0abd4f3352685cf068ac2b7..ccfa33c13a3829b9ecbdc8a3cc6aa048c4d54027 100644 --- a/include/chameleon/morse_kernels.h +++ b/include/chameleon/morse_kernels.h @@ -16,13 +16,13 @@ * @author Cedric Augonnet * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_KERNELS_H_ #define _MORSE_KERNELS_H_ -/** **************************************************************************** +/** * Used to apply operations on specific kernels - **/ + */ typedef enum morse_kernel_e { MORSE_GEMM, diff --git a/include/chameleon/morse_runtime.h b/include/chameleon/morse_runtime.h index 7ab4e3b23eebaec4a39782cc536f76c0613ce652..e0f1092f609b769b644340b5d104ce4cff806b1c 100644 --- a/include/chameleon/morse_runtime.h +++ b/include/chameleon/morse_runtime.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_RUNTIME_H_ #define _MORSE_RUNTIME_H_ @@ -494,7 +494,7 @@ RUNTIME_data_getaddr( const MORSE_desc_t *A, int Am, int An ); * * @name RUNTIME Insert task options management * @{ - **/ + */ void RUNTIME_options_init (MORSE_option_t*, MORSE_context_t*, MORSE_sequence_t*, MORSE_request_t*); void RUNTIME_options_finalize (MORSE_option_t*, MORSE_context_t *); int RUNTIME_options_ws_alloc (MORSE_option_t*, size_t, size_t); @@ -507,7 +507,7 @@ int RUNTIME_options_ws_free (MORSE_option_t*); * * @name RUNTIME Kernel locality management * @{ - **/ + */ void RUNTIME_zlocality_allrestore (); void RUNTIME_clocality_allrestore (); void RUNTIME_dlocality_allrestore (); @@ -534,7 +534,7 @@ void RUNTIME_slocality_onerestore (MORSE_kernel_t); * * @name RUNTIME Profiling * @{ - **/ + */ void RUNTIME_schedprofile_display (); void RUNTIME_kernelprofile_display(); double RUNTIME_get_time(); diff --git a/include/chameleon/morse_simulate.h b/include/chameleon/morse_simulate.h index 40db7729f32a4ccc6b28ac8d334a861f102ec847..66e13b429e909d175052c058f77af8781c55b3f2 100644 --- a/include/chameleon/morse_simulate.h +++ b/include/chameleon/morse_simulate.h @@ -15,7 +15,7 @@ * @author Florent Pruvost * @date 2014-10-02 * - **/ + */ #ifndef _MORSE_SIMULATE_H_ #define _MORSE_SIMULATE_H_ diff --git a/include/chameleon/morse_struct.h b/include/chameleon/morse_struct.h index 9919d14dba2ed070ea3097a5968004194751c72c..32fcfbb46f53496520810e5925f58f4610c37722 100644 --- a/include/chameleon/morse_struct.h +++ b/include/chameleon/morse_struct.h @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_STRUCT_H_ #define _MORSE_STRUCT_H_ @@ -27,12 +27,12 @@ BEGIN_C_DECLS -/** **************************************************************************** +/** * RUNTIME headers to include types of : * - QUARK * - PaRSEC * - StarPU - **/ + */ typedef enum morse_sched_e { RUNTIME_SCHED_QUARK, RUNTIME_SCHED_PARSEC, @@ -40,7 +40,7 @@ typedef enum morse_sched_e { } MORSE_sched_t; -/** **************************************************************************** +/** * Tile matrix descriptor * * Matrices are stored in a contiguous data chunk containning in order @@ -109,9 +109,9 @@ struct morse_desc_s { }; -/** **************************************************************************** +/** * MORSE request uniquely identifies each asynchronous function call. - **/ + */ typedef struct morse_context_s { MORSE_sched_t scheduler; int nworkers; @@ -144,18 +144,18 @@ typedef struct morse_context_s { } MORSE_context_t; -/** **************************************************************************** +/** * MORSE request uniquely identifies each asynchronous function call. - **/ + */ typedef struct morse_request_s { MORSE_enum status; // MORSE_SUCCESS or appropriate error code } MORSE_request_t; -/** **************************************************************************** +/** * MORSE sequence uniquely identifies a set of asynchronous function calls * sharing common exception handling. - **/ + */ typedef struct morse_sequence_s { MORSE_bool status; /* MORSE_SUCCESS or appropriate error code */ MORSE_request_t *request; /* failed request */ @@ -163,9 +163,9 @@ typedef struct morse_sequence_s { } MORSE_sequence_t; -/** **************************************************************************** +/** * MORSE options - **/ + */ typedef struct morse_option_s { MORSE_sequence_t *sequence; MORSE_request_t *request; diff --git a/include/chameleon/morse_tasks.h b/include/chameleon/morse_tasks.h index 5babbd1c879b8c22824a606431029ec183d67698..eef463227047ef770b673e74bfeed5e0a9b720ec 100644 --- a/include/chameleon/morse_tasks.h +++ b/include/chameleon/morse_tasks.h @@ -16,7 +16,7 @@ * @author Cedric Augonnet * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_TASKS_H_ #define _MORSE_TASKS_H_ @@ -24,9 +24,9 @@ BEGIN_C_DECLS -/******************************************************************************* +/** * MORSE Task submission routines - **/ + */ void MORSE_TASK_ztile_zero(const MORSE_option_t *options, int X1, int X2, int Y1, int Y2, const MORSE_desc_t *A, int Am, int An, int lda); diff --git a/include/chameleon/morse_tasks_z.h b/include/chameleon/morse_tasks_z.h index 5e7dbc9160283ee8ec7e8435d7f827ce23eb4168..57ad2989b1f99108ec49cdb298b4137737acc767 100644 --- a/include/chameleon/morse_tasks_z.h +++ b/include/chameleon/morse_tasks_z.h @@ -23,15 +23,15 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #ifndef _MORSE_TASKS_Z_H_ #define _MORSE_TASKS_Z_H_ #define COMPLEX -/** **************************************************************************** +/** * Declarations of QUARK wrappers (called by MORSE) - alphabetical order - **/ + */ void MORSE_TASK_dzasum(const MORSE_option_t *options, MORSE_enum storev, MORSE_enum uplo, int M, int N, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/include/chameleon/morse_tasks_zc.h b/include/chameleon/morse_tasks_zc.h index 3ddd459460d49555401c86a46c277dd9b338f0b6..ffeafdb5c5477cd34115cdafc2abc78f5c714efa 100644 --- a/include/chameleon/morse_tasks_zc.h +++ b/include/chameleon/morse_tasks_zc.h @@ -22,13 +22,13 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #ifndef _MORSE_TASKS_Z_H_ #define _MORSE_TASKS_Z_H_ -/** **************************************************************************** +/** * Declarations of QUARK wrappers (called by MORSE) - alphabetical order - **/ + */ void MORSE_TASK_clag2z(MORSE_option_t *options, int m, int n, int nb, MORSE_desc_t *A, int Am, int An, int lda, diff --git a/include/chameleon/morse_types.h b/include/chameleon/morse_types.h index aca77a0eaf4940a51c40649170f9e36f3e80bcab..cc490bb96384c8713ae0ed8e538574783f9c431d 100644 --- a/include/chameleon/morse_types.h +++ b/include/chameleon/morse_types.h @@ -17,15 +17,15 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_TYPES_H_ #define _MORSE_TYPES_H_ #include "chameleon/chameleon_config.h" -/** **************************************************************************** +/** * System requirements - **/ + */ #include <stddef.h> #if defined( _WIN32 ) /* This must be included before INPUT is defined below, otherwise we @@ -37,18 +37,18 @@ #endif /* _WIN32 */ -/** **************************************************************************** +/** * MORSE types - **/ + */ typedef int MORSE_enum; typedef int MORSE_bool; typedef long MORSE_index; typedef long MORSE_size; -/** **************************************************************************** +/** * MORSE Complex numbers - **/ + */ #define MORSE_HAS_COMPLEX_H 1 #if defined(_WIN32) @@ -103,9 +103,9 @@ typedef long MORSE_size; #endif #endif /* MORSE_COMPLEX_CPP */ -/******************************************************************************* +/** * MORSE Deprecated attribute - **/ + */ #if (__GNUC__ > 3 || (__GNUC__ == 3 && __GNUC_MINOR__ >= 1)) #define MORSE_DEPRECATED __attribute__((__deprecated__)) #else @@ -114,9 +114,9 @@ typedef long MORSE_size; BEGIN_C_DECLS -/******************************************************************************* +/** * Global utilities - **/ + */ static inline int chameleon_max( int a, int b ) { if ( a > b ) return a; else return b; } diff --git a/include/chameleon/morse_z.h b/include/chameleon/morse_z.h index cee8b9808071f50e995a9b5a07e1563defac326e..ff3d6dd4ca37c3055e9686ed2b385867b7a09b51 100644 --- a/include/chameleon/morse_z.h +++ b/include/chameleon/morse_z.h @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #ifndef _MORSE_Z_H_ #define _MORSE_Z_H_ @@ -32,9 +32,9 @@ BEGIN_C_DECLS -/** **************************************************************************** +/** * Declarations of math functions (LAPACK layout) - alphabetical order - **/ + */ int MORSE_zgeadd(MORSE_enum trans, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t beta, MORSE_Complex64_t *B, int LDB); //int MORSE_zgebrd(int M, int N, MORSE_Complex64_t *A, int LDA, double *D, double *E, MORSE_desc_t *descT); //int MORSE_zgecon(MORSE_enum norm, int N, MORSE_Complex64_t *A, int LDA, double anorm, double *rcond); @@ -111,9 +111,9 @@ int MORSE_zunmqr(MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_C //int MORSE_zgecfi(int m, int n, MORSE_Complex64_t *A, MORSE_enum fin, int imb, int inb, MORSE_enum fout, int omb, int onb); //int MORSE_zgetmi(int m, int n, MORSE_Complex64_t *A, MORSE_enum fin, int mb, int nb); -/** **************************************************************************** +/** * Declarations of math functions (tile layout) - alphabetical order - **/ + */ int MORSE_zgeadd_Tile(MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B); //int MORSE_zgebrd_Tile(MORSE_desc_t *A, double *D, double *E, MORSE_desc_t *T); //int MORSE_zgecon_Tile(MORSE_enum norm, MORSE_desc_t *A, double anorm, double *rcond); @@ -187,9 +187,9 @@ int MORSE_zungqr_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B); int MORSE_zunmlq_Tile(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B); int MORSE_zunmqr_Tile(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B); -/** **************************************************************************** +/** * Declarations of math functions (tile layout, asynchronous execution) - alphabetical order - **/ + */ int MORSE_zgeadd_Tile_Async(MORSE_enum trans, MORSE_Complex64_t alpha, MORSE_desc_t *A, MORSE_Complex64_t beta, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request); //int MORSE_zgebrd_Tile_Async(MORSE_desc_t *A, double *D, double *E, MORSE_desc_t *T, MORSE_sequence_t *sequence, MORSE_request_t *request); //int MORSE_zgecon_Tile_Async(MORSE_enum norm, MORSE_desc_t *A, double anorm, double *rcond, MORSE_sequence_t *sequence, MORSE_request_t *request); @@ -269,9 +269,9 @@ int MORSE_zunmqr_Tile_Async(MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, /** * Declarations of libhqr dependent functions. */ -/** **************************************************************************** +/** * Declarations of math functions (LAPACK layout) - alphabetical order - **/ + */ int MORSE_zgels_param(const libhqr_tree_t *qrtree, MORSE_enum trans, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, MORSE_Complex64_t *B, int LDB); int MORSE_zgelqf_param(const libhqr_tree_t *qrtree, int M, int N, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT); int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *descTT, MORSE_Complex64_t *B, int LDB); @@ -282,9 +282,9 @@ int MORSE_zungqr_param(const libhqr_tree_t *qrtree, int M, int N, int K, MORSE_C int MORSE_zunmlq_param(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, MORSE_desc_t *TT, MORSE_Complex64_t *B, int LDB); int MORSE_zunmlq_param(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descT, MORSE_desc_t *TT, MORSE_Complex64_t *B, int LDB); int MORSE_zunmqr_param(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, int M, int N, int K, MORSE_Complex64_t *A, int LDA, MORSE_desc_t *descTS, MORSE_desc_t *TT, MORSE_Complex64_t *B, int LDB); -/** **************************************************************************** +/** * Declarations of math functions (tile layout) - alphabetical order - **/ + */ int MORSE_zgels_param_Tile(const libhqr_tree_t *qrtree, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B); int MORSE_zgelqf_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT); 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); @@ -295,9 +295,9 @@ int MORSE_zungqr_param_Tile(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_ 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 *B); int MORSE_zunmlq_param_Tile(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B); int MORSE_zunmqr_param_Tile(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B); -/** **************************************************************************** +/** * Declarations of math functions (tile layout, asynchronous execution) - alphabetical order - **/ + */ int MORSE_zgels_param_Tile_Async(const libhqr_tree_t *qrtree, MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request); int MORSE_zgelqf_param_Tile_Async(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_sequence_t *sequence, MORSE_request_t *request); int MORSE_zgelqs_param_Tile_Async(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B, MORSE_sequence_t *sequence, MORSE_request_t *request); @@ -327,9 +327,9 @@ int MORSE_Alloc_Workspace_zhegv( int M, int N, MORSE_desc_t **descT, int p, int int MORSE_Alloc_Workspace_zhegvd( int M, int N, MORSE_desc_t **descT, int p, int q); int MORSE_Alloc_Workspace_zhetrd(int M, int N, MORSE_desc_t **descT, int p, int q); -/** **************************************************************************** +/** * Declarations of workspace allocation functions (tile layout, asynchronous execution) - alphabetical order - **/ + */ int MORSE_Alloc_Workspace_zgetri_Tile_Async(MORSE_desc_t *A, MORSE_desc_t *W); /* Warning: Those functions are deprecated */ @@ -339,15 +339,15 @@ int MORSE_Alloc_Workspace_zgeqrf_Tile(int M, int N, MORSE_desc_t **descT, int p, int MORSE_Alloc_Workspace_zgesv_incpiv_Tile (int N, MORSE_desc_t **descL, int **IPIV, int p, int q); int MORSE_Alloc_Workspace_zgetrf_incpiv_Tile(int N, MORSE_desc_t **descL, int **IPIV, int p, int q); -/** **************************************************************************** +/** * Auxiliary function prototypes - **/ + */ int MORSE_zLapack_to_Tile(MORSE_Complex64_t *Af77, int LDA, MORSE_desc_t *A); int MORSE_zTile_to_Lapack(MORSE_desc_t *A, MORSE_Complex64_t *Af77, int LDA); -/** **************************************************************************** +/** * User Builder function prototypes - **/ + */ int MORSE_zbuild(MORSE_enum uplo, int M, int N, MORSE_Complex64_t *A, int LDA, void *user_data, void* user_build_callback); int MORSE_zbuild_Tile(MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* user_build_callback ); 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); diff --git a/include/chameleon/morse_zc.h b/include/chameleon/morse_zc.h index 39e2fbb41da80b84c40654a73c114d29fde35f63..c1ebf5e6ca902efd83437538d5761450b408cd8b 100644 --- a/include/chameleon/morse_zc.h +++ b/include/chameleon/morse_zc.h @@ -20,31 +20,31 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #ifndef _MORSE_ZC_H_ #define _MORSE_ZC_H_ BEGIN_C_DECLS -/** **************************************************************************** +/** * Declarations of math functions (LAPACK layout) - alphabetical order - **/ + */ //int MORSE_zcgesv(int N, int NRHS, MORSE_Complex64_t *A, int LDA, int * IPIV, MORSE_Complex64_t *B, int LDB, MORSE_Complex64_t *X, int LDX, int *ITER); //int MORSE_zcposv(MORSE_enum uplo, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, MORSE_Complex64_t *X, int LDX, int *ITER); //int MORSE_zcgels(MORSE_enum trans, int M, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, MORSE_Complex64_t *X, int LDX, int *ITER); //int MORSE_zcungesv(MORSE_enum trans, int N, int NRHS, MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *B, int LDB, MORSE_Complex64_t *X, int LDX, int *ITER); -/** **************************************************************************** +/** * Declarations of math functions (tile layout) - alphabetical order - **/ + */ //int MORSE_zcgesv_Tile(MORSE_desc_t *A, int *IPIV, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER); //int MORSE_zcposv_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER); /* int MORSE_zcgels_Tile(MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER); */ //int MORSE_zcungesv_Tile(MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER); -/** **************************************************************************** +/** * Declarations of math functions (tile layout, asynchronous execution) - alphabetical order - **/ + */ //int MORSE_zcgesv_Tile_Async(MORSE_desc_t *A, int *IPIV, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER, MORSE_sequence_t *sequence, MORSE_request_t *request); //int MORSE_zcposv_Tile_Async(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER, MORSE_sequence_t *sequence, MORSE_request_t *request); //int MORSE_zcgels_Tile_Async(MORSE_enum trans, MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B, MORSE_desc_t *X, int *ITER, MORSE_sequence_t *sequence, MORSE_request_t *request); diff --git a/include/morse.h b/include/morse.h index 4a1607f30de5c1e12f6e588c2b20a9297f249f1f..37c3d1fe0fbaf6473c82592876d3690035c2dd27 100644 --- a/include/morse.h +++ b/include/morse.h @@ -18,7 +18,7 @@ * @author Florent Pruvost * @date 2012-09-15 * - **/ + */ #ifndef _MORSE_H_ #define _MORSE_H_ diff --git a/runtime/parsec/codelets/codelet_zasum.c b/runtime/parsec/codelets/codelet_zasum.c index 520971f10c219cb246665f930e95485963f88164..ca99ee59c19abddef2fe8f4ba7314883e1eca822 100644 --- a/runtime/parsec/codelets/codelet_zasum.c +++ b/runtime/parsec/codelets/codelet_zasum.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zaxpy.c b/runtime/parsec/codelets/codelet_zaxpy.c index 1a2eb75daf2279648c447941507d61c8d1e03af4..9fcd774e56a8c87d74a199b9755d30bd2a57a7f8 100644 --- a/runtime/parsec/codelets/codelet_zaxpy.c +++ b/runtime/parsec/codelets/codelet_zaxpy.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zbuild.c b/runtime/parsec/codelets/codelet_zbuild.c index d6524930f52c3be30a14f5a4119fc636e86516df..17015a453d8acf91183f2fa95f032b0e426d2dff 100644 --- a/runtime/parsec/codelets/codelet_zbuild.c +++ b/runtime/parsec/codelets/codelet_zbuild.c @@ -17,7 +17,7 @@ * @date 2016-09-05 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zgeadd.c b/runtime/parsec/codelets/codelet_zgeadd.c index 732127b5b89fcad15ba6a132093dcf0376c1558e..b956a76b3c20e1f30e1c9f990ba36db8c5202891 100644 --- a/runtime/parsec/codelets/codelet_zgeadd.c +++ b/runtime/parsec/codelets/codelet_zgeadd.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -100,7 +100,7 @@ CORE_zgeadd_parsec( parsec_execution_stream_t *context, * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgeadd(const MORSE_option_t *options, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/parsec/codelets/codelet_zgelqt.c b/runtime/parsec/codelets/codelet_zgelqt.c index 51b7159bc7d738edf3c343d3a72e361d14eae91b..bfde58e8ae9e29fc70480cb1f03fd10e679aa895 100644 --- a/runtime/parsec/codelets/codelet_zgelqt.c +++ b/runtime/parsec/codelets/codelet_zgelqt.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -80,7 +80,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ static inline int CORE_zgelqt_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zgemm.c b/runtime/parsec/codelets/codelet_zgemm.c index dc57d0714824e298f96915213f50ccb3882f27f1..d79d23cc02c6e0811dcc3b26410c51739de464cf 100644 --- a/runtime/parsec/codelets/codelet_zgemm.c +++ b/runtime/parsec/codelets/codelet_zgemm.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zgemm_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zgeqrt.c b/runtime/parsec/codelets/codelet_zgeqrt.c index ab79a4bd2522650c8d1146d778301d0054a6c5b9..9d5901a623983eca522fb918c87ebbf84d290fe3 100644 --- a/runtime/parsec/codelets/codelet_zgeqrt.c +++ b/runtime/parsec/codelets/codelet_zgeqrt.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -81,7 +81,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ static inline int CORE_zgeqrt_parsec ( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zgessm.c b/runtime/parsec/codelets/codelet_zgessm.c index 02ab07c374a6c6e27e51911a5525eb6d824a5874..ebcf7b6c37cfd0b49fc7342b4d53e616afaca32b 100644 --- a/runtime/parsec/codelets/codelet_zgessm.c +++ b/runtime/parsec/codelets/codelet_zgessm.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -64,7 +64,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ static inline int CORE_zgessm_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zgessq.c b/runtime/parsec/codelets/codelet_zgessq.c index 6148dfe5f6a9e8bda7e3fb392723ad96a683bf10..71d2425a6e317cf1bf92c63904952100ff65fa0b 100644 --- a/runtime/parsec/codelets/codelet_zgessq.c +++ b/runtime/parsec/codelets/codelet_zgessq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zgetrf.c b/runtime/parsec/codelets/codelet_zgetrf.c index 43d0cf7916b518d60a7ae94ff3f328efd8c21044..67e7868200e0c4037b9dd9344e8ec1385e678a3d 100644 --- a/runtime/parsec/codelets/codelet_zgetrf.c +++ b/runtime/parsec/codelets/codelet_zgetrf.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zgetrf_incpiv.c b/runtime/parsec/codelets/codelet_zgetrf_incpiv.c index fdb709029b90cb4bd3e8b949f7b08568369b98d8..38b3405891789b6f8ffb9c9e30eb64ea42ebe52b 100644 --- a/runtime/parsec/codelets/codelet_zgetrf_incpiv.c +++ b/runtime/parsec/codelets/codelet_zgetrf_incpiv.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -73,7 +73,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ static inline int CORE_zgetrf_incpiv_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zgetrf_nopiv.c b/runtime/parsec/codelets/codelet_zgetrf_nopiv.c index 5b20516abf2a0e6157efd19794597004f9755f61..d4910970d16260712d7da2ea7b08600684cebb76 100644 --- a/runtime/parsec/codelets/codelet_zgetrf_nopiv.c +++ b/runtime/parsec/codelets/codelet_zgetrf_nopiv.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -66,7 +66,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ static inline int CORE_zgetrf_nopiv_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zhe2ge.c b/runtime/parsec/codelets/codelet_zhe2ge.c index 04933626e6be8fbf84c3e74d39be4092dcd3710b..f8a09c7661c89c451e7074e38166f05e927b1578 100644 --- a/runtime/parsec/codelets/codelet_zhe2ge.c +++ b/runtime/parsec/codelets/codelet_zhe2ge.c @@ -14,7 +14,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -23,7 +23,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zhe2ge_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zhemm.c b/runtime/parsec/codelets/codelet_zhemm.c index ba35b62ce852d00f8b1f91a25d04d8030f37a347..497a7554600b4064ae8370dafcc9f68b38fd5d97 100644 --- a/runtime/parsec/codelets/codelet_zhemm.c +++ b/runtime/parsec/codelets/codelet_zhemm.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zhemm_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zher2k.c b/runtime/parsec/codelets/codelet_zher2k.c index fdce69f3e4c1378ddd821b75dd613575da08d3a5..9f506af6cd2cef773c5805232314d626ac24b7e6 100644 --- a/runtime/parsec/codelets/codelet_zher2k.c +++ b/runtime/parsec/codelets/codelet_zher2k.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zher2k_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zherfb.c b/runtime/parsec/codelets/codelet_zherfb.c index 0220a1c89b9b1a176fa4eb49f6902bfb22c4a7f9..95aea6bc6575aeca82d303df5626fa610d7c971e 100644 --- a/runtime/parsec/codelets/codelet_zherfb.c +++ b/runtime/parsec/codelets/codelet_zherfb.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zherk.c b/runtime/parsec/codelets/codelet_zherk.c index 99eee5e31d0fbd01104cabff7bacc26ff138e696..fb3d4f768af06cdfd9328c62be676a55d9f7c561 100644 --- a/runtime/parsec/codelets/codelet_zherk.c +++ b/runtime/parsec/codelets/codelet_zherk.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zherk_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zhessq.c b/runtime/parsec/codelets/codelet_zhessq.c index dcf63681e09ce80443410cbc7ef2a5c2da71ccf8..eb8f30aa43fc02510899feee716f4105cbd84efa 100644 --- a/runtime/parsec/codelets/codelet_zhessq.c +++ b/runtime/parsec/codelets/codelet_zhessq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zlacpy.c b/runtime/parsec/codelets/codelet_zlacpy.c index 422818fbdd13668f951b4627d8ba1cd266c56778..c67a943b1d6e184649d683f28b76ce3187d2042f 100644 --- a/runtime/parsec/codelets/codelet_zlacpy.c +++ b/runtime/parsec/codelets/codelet_zlacpy.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zlacpyx_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zlag2c.c b/runtime/parsec/codelets/codelet_zlag2c.c index 4e943060157196671ca49341a02349e50a306c75..3d63b66c00a8fd0f0d979317343c34b21a5bc938 100644 --- a/runtime/parsec/codelets/codelet_zlag2c.c +++ b/runtime/parsec/codelets/codelet_zlag2c.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zlag2c_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) @@ -63,11 +63,11 @@ void MORSE_TASK_zlag2c(const MORSE_option_t *options, PARSEC_DTD_ARG_END ); } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_clag2z_parsec(parsec_execution_stream_t *context, parsec_task_t *this_task) { diff --git a/runtime/parsec/codelets/codelet_zlange.c b/runtime/parsec/codelets/codelet_zlange.c index 1b2f4e5e5587af8f2efac93d3dd8f3e294a45b6c..ad5e8dba521b9d849bd6367ae25fc299b7e7d307 100644 --- a/runtime/parsec/codelets/codelet_zlange.c +++ b/runtime/parsec/codelets/codelet_zlange.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zlanhe.c b/runtime/parsec/codelets/codelet_zlanhe.c index 89060247c425df0e49434e180c3982d575412875..52d6009d49f7d310c636be1ddee3e7ecf5f6b00a 100644 --- a/runtime/parsec/codelets/codelet_zlanhe.c +++ b/runtime/parsec/codelets/codelet_zlanhe.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zlansy.c b/runtime/parsec/codelets/codelet_zlansy.c index 6b84565d6f7ccd9a3d082320f765324a162ba5ff..2c6a5675effb92e811608ad14b8be1d56944ba23 100644 --- a/runtime/parsec/codelets/codelet_zlansy.c +++ b/runtime/parsec/codelets/codelet_zlansy.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zlantr.c b/runtime/parsec/codelets/codelet_zlantr.c index 6ccad8e651d86d4a5fb14958a24e0548cb95cf53..6616a149da8ac19169ebe4fb457601ef2de02221 100644 --- a/runtime/parsec/codelets/codelet_zlantr.c +++ b/runtime/parsec/codelets/codelet_zlantr.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zlascal.c b/runtime/parsec/codelets/codelet_zlascal.c index 9d5aac536e52df9f0013ebc694706b2d09c9890d..0fc697925111c1c6daeecdb3d0e86de5066e6d13 100644 --- a/runtime/parsec/codelets/codelet_zlascal.c +++ b/runtime/parsec/codelets/codelet_zlascal.c @@ -22,16 +22,16 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zlascal_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zlaset.c b/runtime/parsec/codelets/codelet_zlaset.c index a3d39a6f4b60735443fb2ea16009bfe3cada1399..44c0318e9909a2a4344c1a4a6aa3d9878f73163d 100644 --- a/runtime/parsec/codelets/codelet_zlaset.c +++ b/runtime/parsec/codelets/codelet_zlaset.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -54,7 +54,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ static inline int CORE_zlaset_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zlaset2.c b/runtime/parsec/codelets/codelet_zlaset2.c index 61689834ea4e9f238e458d66af3d129903f33579..4204df5d0cb7e21742a8ffce04c73d95eb2d32d1 100644 --- a/runtime/parsec/codelets/codelet_zlaset2.c +++ b/runtime/parsec/codelets/codelet_zlaset2.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -52,7 +52,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ static inline int CORE_zlaset2_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zlatro.c b/runtime/parsec/codelets/codelet_zlatro.c index 2121df5200f7d5e9a52bcde91d7d4c91407bf21f..791e9f143e987c835c44455fd0ae7c379bfc69b0 100644 --- a/runtime/parsec/codelets/codelet_zlatro.c +++ b/runtime/parsec/codelets/codelet_zlatro.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -44,9 +44,9 @@ CORE_zlatro_parsec( parsec_execution_stream_t *context, return PARSEC_HOOK_RETURN_DONE; } -/***************************************************************************//** +/** * - **/ + */ void MORSE_TASK_zlatro(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int m, int n, int mb, diff --git a/runtime/parsec/codelets/codelet_zlauum.c b/runtime/parsec/codelets/codelet_zlauum.c index a9b191bb3235d40e34b1f43bdbd8108a0c104dd6..06627c6ca2b67ddf8832656ddbba69445a747408 100644 --- a/runtime/parsec/codelets/codelet_zlauum.c +++ b/runtime/parsec/codelets/codelet_zlauum.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zlauum_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zpamm.c b/runtime/parsec/codelets/codelet_zpamm.c index 8a7e002064caf63bc3c6f1247681e1e07639e673..36da673a6c8c7c7214eb9eb7ee164321cf800e2b 100644 --- a/runtime/parsec/codelets/codelet_zpamm.c +++ b/runtime/parsec/codelets/codelet_zpamm.c @@ -15,12 +15,12 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -158,10 +158,10 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ -/***************************************************************************/ +/**/ static inline int CORE_zpamm_parsec( parsec_execution_stream_t *context, diff --git a/runtime/parsec/codelets/codelet_zplghe.c b/runtime/parsec/codelets/codelet_zplghe.c index c2d05eac1c2d203dfec9b2652188ee5eea7e7dd2..228aa415f17d46b0dae81a0167780e10fefadb65 100644 --- a/runtime/parsec/codelets/codelet_zplghe.c +++ b/runtime/parsec/codelets/codelet_zplghe.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zplgsy.c b/runtime/parsec/codelets/codelet_zplgsy.c index 4b700eac4a01d39011ee81c34d5d4adf48e0eeba..e1cb2606c30de6b6895c244026d05145116e2279 100644 --- a/runtime/parsec/codelets/codelet_zplgsy.c +++ b/runtime/parsec/codelets/codelet_zplgsy.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zplrnt.c b/runtime/parsec/codelets/codelet_zplrnt.c index 7e67b4bcdf7c27dffb30ef11c6b7abc5d9655fd9..b117329d2e9ae033e56fb09d35964de1f814c2c6 100644 --- a/runtime/parsec/codelets/codelet_zplrnt.c +++ b/runtime/parsec/codelets/codelet_zplrnt.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zplssq.c b/runtime/parsec/codelets/codelet_zplssq.c index b0716a75f04effb90b0bbac256c9a7b2981e4fb5..39fbc5b5c602002e067fb467d46feb3e4ba3657e 100644 --- a/runtime/parsec/codelets/codelet_zplssq.c +++ b/runtime/parsec/codelets/codelet_zplssq.c @@ -15,13 +15,13 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/runtime/parsec/codelets/codelet_zpotrf.c b/runtime/parsec/codelets/codelet_zpotrf.c index baea1d404c3a959f8dffd25830276c9299766f4a..434968089184f3b9f21ee77639ecf63a306430ca 100644 --- a/runtime/parsec/codelets/codelet_zpotrf.c +++ b/runtime/parsec/codelets/codelet_zpotrf.c @@ -15,16 +15,16 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline int CORE_zpotrf_parsec( parsec_execution_stream_t *context, parsec_task_t *this_task ) diff --git a/runtime/parsec/codelets/codelet_zssssm.c b/runtime/parsec/codelets/codelet_zssssm.c index 029c0bf50ec5a2e47b2c41b657bf9d0a49c4b5ff..be3193ae662886ecd6554075096a6faefbf1e664 100644 --- a/runtime/parsec/codelets/codelet_zssssm.c +++ b/runtime/parsec/codelets/codelet_zssssm.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zsymm.c b/runtime/parsec/codelets/codelet_zsymm.c index ce017b3ce2b5ca2a3c231851ce6da536fda4f02c..e52418ef12b69e7d68a1cea34dde9ca56fc8886e 100644 --- a/runtime/parsec/codelets/codelet_zsymm.c +++ b/runtime/parsec/codelets/codelet_zsymm.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zsyr2k.c b/runtime/parsec/codelets/codelet_zsyr2k.c index 3a6ab08513acb03c1009d030eb83baa813daa0aa..cc26d68d54afdfa36f32b32aa3b6299adaac6561 100644 --- a/runtime/parsec/codelets/codelet_zsyr2k.c +++ b/runtime/parsec/codelets/codelet_zsyr2k.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zsyrk.c b/runtime/parsec/codelets/codelet_zsyrk.c index b7c5c3f951604cc6e9bc377020ed3642a265b7b2..aef91156fc3d54ae5b0e10f410a637cb17235c34 100644 --- a/runtime/parsec/codelets/codelet_zsyrk.c +++ b/runtime/parsec/codelets/codelet_zsyrk.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zsyssq.c b/runtime/parsec/codelets/codelet_zsyssq.c index a5ad5ad0a9086f9a8a595f3ce0302689e9fd36b5..b00c92c77ce4be3d13dcdb767a54512227806854 100644 --- a/runtime/parsec/codelets/codelet_zsyssq.c +++ b/runtime/parsec/codelets/codelet_zsyssq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zsytrf_nopiv.c b/runtime/parsec/codelets/codelet_zsytrf_nopiv.c index 1b1995f004006b4008049cb87a4e17e57b84bf30..d75061e9844d2a01c889c22b7a19f2dbaba8d959 100644 --- a/runtime/parsec/codelets/codelet_zsytrf_nopiv.c +++ b/runtime/parsec/codelets/codelet_zsytrf_nopiv.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztile_zero.c b/runtime/parsec/codelets/codelet_ztile_zero.c index f55cd9b270a05f70b148512f53a3d0a3fcdc4f6b..14d4b32171c9220bcd4a02097535d7925d62f52e 100644 --- a/runtime/parsec/codelets/codelet_ztile_zero.c +++ b/runtime/parsec/codelets/codelet_ztile_zero.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztplqt.c b/runtime/parsec/codelets/codelet_ztplqt.c index 6fcd72a4d4b7d2ecc56e9d0f9b0b47c627325b1a..3c447650d2358ef25e39a3ebce9858fa3df045c1 100644 --- a/runtime/parsec/codelets/codelet_ztplqt.c +++ b/runtime/parsec/codelets/codelet_ztplqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztpmlqt.c b/runtime/parsec/codelets/codelet_ztpmlqt.c index 62661c2b9df3e2349e778ed1c341a6485a1e1862..667b63c5ee8ac3d3959db3047779f8a3704298e6 100644 --- a/runtime/parsec/codelets/codelet_ztpmlqt.c +++ b/runtime/parsec/codelets/codelet_ztpmlqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztpmqrt.c b/runtime/parsec/codelets/codelet_ztpmqrt.c index 0a4d2be62928d2dee462c329df300a394da19a43..0b3446d61eaea62d728a1bd9683f9c569193893c 100644 --- a/runtime/parsec/codelets/codelet_ztpmqrt.c +++ b/runtime/parsec/codelets/codelet_ztpmqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztpqrt.c b/runtime/parsec/codelets/codelet_ztpqrt.c index 1c8c6f317d10d5e608a35a1a09d7f5fa680f3d1c..a0f4628ed8c0ebf4899b4e1eb5fe93bbca09882e 100644 --- a/runtime/parsec/codelets/codelet_ztpqrt.c +++ b/runtime/parsec/codelets/codelet_ztpqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztradd.c b/runtime/parsec/codelets/codelet_ztradd.c index 79afa8b0622fc990cb90e3545ccfcb33b9eac663..53d9899288a0b173892497fdd6f9c067ed8eae85 100644 --- a/runtime/parsec/codelets/codelet_ztradd.c +++ b/runtime/parsec/codelets/codelet_ztradd.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -106,7 +106,7 @@ CORE_ztradd_parsec( parsec_execution_stream_t *context, * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztradd(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/parsec/codelets/codelet_ztrasm.c b/runtime/parsec/codelets/codelet_ztrasm.c index 0df7920a9069adfb119c9a98992721fe69f831ef..5b9b9f6f517a73243ea8ea4394e08bb201ac86d9 100644 --- a/runtime/parsec/codelets/codelet_ztrasm.c +++ b/runtime/parsec/codelets/codelet_ztrasm.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztrmm.c b/runtime/parsec/codelets/codelet_ztrmm.c index f6a79dd8bddef18acb4ce7de7a7b60a1a03446f5..ae2ef47f1385c509e94f4f4d17e95c7893d144e0 100644 --- a/runtime/parsec/codelets/codelet_ztrmm.c +++ b/runtime/parsec/codelets/codelet_ztrmm.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztrsm.c b/runtime/parsec/codelets/codelet_ztrsm.c index 93df26d9b5b6ea715884197178285705328da13a..697ac02e806b01ef032d6e36ffbd8303a129e062 100644 --- a/runtime/parsec/codelets/codelet_ztrsm.c +++ b/runtime/parsec/codelets/codelet_ztrsm.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztrssq.c b/runtime/parsec/codelets/codelet_ztrssq.c index d033107b447907584fc9c30fb49e4debbb6e4778..fc6428a91f6e242221ba3f155c6e23f1f4efb8ab 100644 --- a/runtime/parsec/codelets/codelet_ztrssq.c +++ b/runtime/parsec/codelets/codelet_ztrssq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztrtri.c b/runtime/parsec/codelets/codelet_ztrtri.c index a9e5ddbb455abd17b0f9bf8c5197c60956ed57cf..4fc0bcf0d2fdf131ac3d0ec317e6bd0c26beeb9e 100644 --- a/runtime/parsec/codelets/codelet_ztrtri.c +++ b/runtime/parsec/codelets/codelet_ztrtri.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztslqt.c b/runtime/parsec/codelets/codelet_ztslqt.c index b6b68f222db03c796f2014df6cce4d4d66c1ee5e..fde0eeeab677c2bd24ee5cca8a2a11719aa169a0 100644 --- a/runtime/parsec/codelets/codelet_ztslqt.c +++ b/runtime/parsec/codelets/codelet_ztslqt.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztsmlq.c b/runtime/parsec/codelets/codelet_ztsmlq.c index f8ad4f25c5e4cf023a86ec267f11cbd866f9d18e..5642007d9a15be6d99dbcb53e83c215bfe532727 100644 --- a/runtime/parsec/codelets/codelet_ztsmlq.c +++ b/runtime/parsec/codelets/codelet_ztsmlq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c b/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c index 5c205e1691832f0e7efd800e6ee76d11b29a37a9..5f3fa01d35346c70c24f641715b7e7ca272cd685 100644 --- a/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c +++ b/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztsmqr.c b/runtime/parsec/codelets/codelet_ztsmqr.c index bf7334eb4d5113247b41788ceb48df4a61ee59f9..607c58fe311d77160f0cf7fe078fde4685bcfd75 100644 --- a/runtime/parsec/codelets/codelet_ztsmqr.c +++ b/runtime/parsec/codelets/codelet_ztsmqr.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c b/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c index 27176cb310a09d52eb457a7a2d6e09c7ef8b7b06..a73d1fe46e21004bf8114de9919d1a249d62e4b2 100644 --- a/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c +++ b/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztsqrt.c b/runtime/parsec/codelets/codelet_ztsqrt.c index 4dab2b2692b979e044d1dcbc1d4e37b029162613..70e6255ae514492feef1c7b5b327513dadc121e4 100644 --- a/runtime/parsec/codelets/codelet_ztsqrt.c +++ b/runtime/parsec/codelets/codelet_ztsqrt.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_ztstrf.c b/runtime/parsec/codelets/codelet_ztstrf.c index 20702a0f027743da48cbf423097d8ff86fce8565..cc52a1203e1a1949cc6978458d93075d81701e0f 100644 --- a/runtime/parsec/codelets/codelet_ztstrf.c +++ b/runtime/parsec/codelets/codelet_ztstrf.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zttlqt.c b/runtime/parsec/codelets/codelet_zttlqt.c index b72adec2dd4a65e2f066e173230be10ff4bb5009..50b58208a5415f588b9ae11d1fc866bad4ead4f1 100644 --- a/runtime/parsec/codelets/codelet_zttlqt.c +++ b/runtime/parsec/codelets/codelet_zttlqt.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zttmlq.c b/runtime/parsec/codelets/codelet_zttmlq.c index 9edf73b267c297f0955c6735b1bedb325291764b..daf10d1a6a30303c11f9894db0b7c6aedf463b16 100644 --- a/runtime/parsec/codelets/codelet_zttmlq.c +++ b/runtime/parsec/codelets/codelet_zttmlq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zttmqr.c b/runtime/parsec/codelets/codelet_zttmqr.c index a273602433e08a632e5b21aadb3b174badf86f87..ef3ac2fca74e9115f72df0880a45336af92a6e23 100644 --- a/runtime/parsec/codelets/codelet_zttmqr.c +++ b/runtime/parsec/codelets/codelet_zttmqr.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zttqrt.c b/runtime/parsec/codelets/codelet_zttqrt.c index 60423daea9a43bc586cf352c0aa4fd8e203bd24d..498029a535a348ba6e399c942ea27edc37926374 100644 --- a/runtime/parsec/codelets/codelet_zttqrt.c +++ b/runtime/parsec/codelets/codelet_zttqrt.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zunmlq.c b/runtime/parsec/codelets/codelet_zunmlq.c index ea8cd6b8bfd2029824d02f559bfcf2e882aee0d3..3e189ad793f1bdb36a35b0adc3985d0c7deb710f 100644 --- a/runtime/parsec/codelets/codelet_zunmlq.c +++ b/runtime/parsec/codelets/codelet_zunmlq.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/codelets/codelet_zunmqr.c b/runtime/parsec/codelets/codelet_zunmqr.c index 515caac8e8731f5a9a691eb134f0d3bf13e4948c..904547eb5d59ef2fbb26f9e2d330216205a2b0c4 100644 --- a/runtime/parsec/codelets/codelet_zunmqr.c +++ b/runtime/parsec/codelets/codelet_zunmqr.c @@ -15,7 +15,7 @@ * @author Reazul Hoque * @precisions normal z -> c d s * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/parsec/control/runtime_async.c b/runtime/parsec/control/runtime_async.c index 43981f9d6aaac30970cd3338e4ba2b2b42685280..71d6832d24a7dac7a3639350f668b9e95eecc71d 100644 --- a/runtime/parsec/control/runtime_async.c +++ b/runtime/parsec/control/runtime_async.c @@ -16,13 +16,13 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include <stdlib.h> #include "chameleon_parsec.h" -/******************************************************************************* +/** * Create a sequence - **/ + */ int RUNTIME_sequence_create( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -37,9 +37,9 @@ int RUNTIME_sequence_create( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Destroy a sequence - **/ + */ int RUNTIME_sequence_destroy( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -54,9 +54,9 @@ int RUNTIME_sequence_destroy( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Wait for the completion of a sequence - **/ + */ int RUNTIME_sequence_wait( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -69,9 +69,9 @@ int RUNTIME_sequence_wait( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Terminate a sequence - **/ + */ void RUNTIME_sequence_flush( MORSE_context_t *morse, MORSE_sequence_t *sequence, MORSE_request_t *request, diff --git a/runtime/parsec/control/runtime_context.c b/runtime/parsec/control/runtime_context.c index 4a66c19f31c9d63aa930f8d0914bee4af38f33e1..58f41212ac776c5dffd276c9e4fb04ff93c8c422 100644 --- a/runtime/parsec/control/runtime_context.c +++ b/runtime/parsec/control/runtime_context.c @@ -16,13 +16,13 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include <stdlib.h> #include "chameleon_parsec.h" -/******************************************************************************* +/** * Create new context - **/ + */ void RUNTIME_context_create( MORSE_context_t *morse ) { /* In case of PaRSEC, this is done in init */ @@ -30,16 +30,16 @@ void RUNTIME_context_create( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Clean the context - **/ + */ void RUNTIME_context_destroy( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * */ void RUNTIME_enable(MORSE_enum lever) @@ -54,9 +54,9 @@ void RUNTIME_enable(MORSE_enum lever) return; } -/******************************************************************************* +/** * - **/ + */ void RUNTIME_disable(MORSE_enum lever) { switch (lever) diff --git a/runtime/parsec/control/runtime_control.c b/runtime/parsec/control/runtime_control.c index 95eeb3701c162b69ebe26569739c871c6323d40f..128c1bcd99627eeed38217ad9dbcbd38d75c1dab 100644 --- a/runtime/parsec/control/runtime_control.c +++ b/runtime/parsec/control/runtime_control.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_parsec.h" @@ -25,9 +25,9 @@ #include <mpi.h> #endif -/******************************************************************************* +/** * Initialize MORSE - **/ + */ int RUNTIME_init( MORSE_context_t *morse, int ncpus, int ncudas, @@ -56,7 +56,7 @@ int RUNTIME_init( MORSE_context_t *morse, return hres; } -/******************************************************************************* +/** * Finalize MORSE */ void RUNTIME_finalize( MORSE_context_t *morse ) @@ -66,28 +66,28 @@ void RUNTIME_finalize( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * To suspend the processing of new tasks by workers - **/ + */ void RUNTIME_pause( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * This is the symmetrical call to RUNTIME_pause, * used to resume the workers polling for new tasks. - **/ + */ void RUNTIME_resume( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * Barrier MORSE. - **/ + */ void RUNTIME_barrier( MORSE_context_t *morse ) { parsec_context_t *parsec = (parsec_context_t*)(morse->schedopt); @@ -96,27 +96,27 @@ void RUNTIME_barrier( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Display a progress information when executing the tasks - **/ + */ void RUNTIME_progress( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * Thread rank. - **/ + */ int RUNTIME_thread_rank( MORSE_context_t *morse ) { (void)morse; return 0; } -/******************************************************************************* +/** * Thread rank. - **/ + */ int RUNTIME_thread_size( MORSE_context_t *morse ) { // TODO: fixme @@ -125,9 +125,9 @@ int RUNTIME_thread_size( MORSE_context_t *morse ) return 1; } -/******************************************************************************* +/** * This returns the rank of this process - **/ + */ int RUNTIME_comm_rank( MORSE_context_t *morse ) { int rank = 0; @@ -139,9 +139,9 @@ int RUNTIME_comm_rank( MORSE_context_t *morse ) return rank; } -/******************************************************************************* +/** * This returns the size of the distributed computation - **/ + */ int RUNTIME_comm_size( MORSE_context_t *morse ) { int size = 0; diff --git a/runtime/parsec/control/runtime_descriptor.c b/runtime/parsec/control/runtime_descriptor.c index 6aa19fbb09d56d5c7780b629c5deee8b345c42c7..14804e77f4dfc0c12682971dac7da8c59a7343d9 100644 --- a/runtime/parsec/control/runtime_descriptor.c +++ b/runtime/parsec/control/runtime_descriptor.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include <stdlib.h> #include "chameleon_parsec.h" #include <parsec/data.h> @@ -199,9 +199,9 @@ morse_parsec_key_to_string(parsec_data_collection_t *data_collection, parsec_dat } #endif -/******************************************************************************* +/** * Create data descriptor - **/ + */ void RUNTIME_desc_create( MORSE_desc_t *mdesc ) { parsec_data_collection_t *data_collection; @@ -270,9 +270,9 @@ void RUNTIME_desc_create( MORSE_desc_t *mdesc ) return; } -/******************************************************************************* +/** * Destroy data descriptor - **/ + */ void RUNTIME_desc_destroy( MORSE_desc_t *mdesc ) { morse_parsec_desc_t *pdesc = (morse_parsec_desc_t*)(mdesc->schedopt); @@ -301,27 +301,27 @@ void RUNTIME_desc_destroy( MORSE_desc_t *mdesc ) return; } -/******************************************************************************* +/** * Acquire data - **/ + */ int RUNTIME_desc_acquire( const MORSE_desc_t *desc ) { (void)desc; return MORSE_SUCCESS; } -/******************************************************************************* +/** * Release data - **/ + */ int RUNTIME_desc_release( const MORSE_desc_t *desc ) { (void)desc; return MORSE_SUCCESS; } -/******************************************************************************* +/** * Flush cached data - **/ + */ void RUNTIME_flush() { } @@ -357,9 +357,9 @@ void RUNTIME_data_migrate( const MORSE_sequence_t *sequence, } #endif -/******************************************************************************* +/** * Get data addr - **/ + */ void *RUNTIME_desc_getaddr( const MORSE_desc_t *desc, int m, int n ) { assert(0); /* This should not be called because we also need the handle to match the address we need. */ diff --git a/runtime/parsec/control/runtime_options.c b/runtime/parsec/control/runtime_options.c index 374e5d74f7d262ff0eb67f5d15a0dbed61565e65..4c92b3447cd83a681e584599540c3c84c69472bf 100644 --- a/runtime/parsec/control/runtime_options.c +++ b/runtime/parsec/control/runtime_options.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_parsec.h" diff --git a/runtime/parsec/control/runtime_profiling.c b/runtime/parsec/control/runtime_profiling.c index 8147e49eed76ad116793cb50d09abcdbdc635a56..a64b312b811dd714c7ef3c3590ca013a2aa2bc3f 100644 --- a/runtime/parsec/control/runtime_profiling.c +++ b/runtime/parsec/control/runtime_profiling.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include "chameleon_parsec.h" #include "chameleon/chameleon_timer.h" @@ -54,9 +54,9 @@ void RUNTIME_kernelprofile_display(void) morse_warning("RUNTIME_kernelprofile_display(parsec)", "Kernel profiling is not available with PaRSEC\n"); } -/******************************************************************************* +/** * Set iteration numbers for traces - **/ + */ void RUNTIME_iteration_push( MORSE_context_t *morse, unsigned long iteration ) { (void)morse; (void)iteration; diff --git a/runtime/parsec/control/runtime_zlocality.c b/runtime/parsec/control/runtime_zlocality.c index 71ac488ba3d9113a470ada698d6072b1b6876db3..58d6aeaa741d12d270c16301685756f287e0ed14 100644 --- a/runtime/parsec/control/runtime_zlocality.c +++ b/runtime/parsec/control/runtime_zlocality.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include "runtime/PaRSEC/include/chameleon_parsec.h" void RUNTIME_zlocality_allrestrict( uint32_t where ) diff --git a/runtime/parsec/control/runtime_zprofiling.c b/runtime/parsec/control/runtime_zprofiling.c index 42db58aedcc584b2dcc3a965b8bdc0fa8c7f7223..4e1f7a0a4a05cb731d1e7199f4c2d9b433e5d03c 100644 --- a/runtime/parsec/control/runtime_zprofiling.c +++ b/runtime/parsec/control/runtime_zprofiling.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2017-01-12 * - **/ + */ #include "chameleon_parsec.h" void RUNTIME_zdisplay_allprofile() diff --git a/runtime/parsec/include/chameleon_parsec.h b/runtime/parsec/include/chameleon_parsec.h index 367bdde50377b58132f46b3d83f9ffffffcd1adf..b7cafbcf2f165d1c07baf45fe9cc4652f2ea120a 100644 --- a/runtime/parsec/include/chameleon_parsec.h +++ b/runtime/parsec/include/chameleon_parsec.h @@ -16,7 +16,7 @@ * @author Reazul Hoque * @date 2018-02-06 * - **/ + */ #ifndef _MORSE_PARSEC_H_ #define _MORSE_PARSEC_H_ diff --git a/runtime/quark/codelets/codelet_zasum.c b/runtime/quark/codelets/codelet_zasum.c index 25a7790589c784b0495785094b774ee679a8bb5c..b180b5ec0cadcb8633adc827b4cdc2853844a013 100644 --- a/runtime/quark/codelets/codelet_zasum.c +++ b/runtime/quark/codelets/codelet_zasum.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zaxpy.c b/runtime/quark/codelets/codelet_zaxpy.c index a1f90c5d153a6189ec07de0eb4eac7dd5bb045ad..17b35efff21bd17b39612b964024246dd81d1953 100644 --- a/runtime/quark/codelets/codelet_zaxpy.c +++ b/runtime/quark/codelets/codelet_zaxpy.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zbuild.c b/runtime/quark/codelets/codelet_zbuild.c index 7fa52914f974749a4fde0da0e9115c3236c9c453..6cc5fc3776d4d88ef3061df9cf1531b6e86c80eb 100644 --- a/runtime/quark/codelets/codelet_zbuild.c +++ b/runtime/quark/codelets/codelet_zbuild.c @@ -23,7 +23,7 @@ * @date 2016-09-05 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zgeadd.c b/runtime/quark/codelets/codelet_zgeadd.c index 9c9996d753f9c02d77c7a397008349a45e6aced4..4054ace96cada78481385b61903bbeff1c5eaa83 100644 --- a/runtime/quark/codelets/codelet_zgeadd.c +++ b/runtime/quark/codelets/codelet_zgeadd.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -95,7 +95,7 @@ void CORE_zgeadd_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgeadd(const MORSE_option_t *options, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_zgelqt.c b/runtime/quark/codelets/codelet_zgelqt.c index 5169c5261699a1fef0a960731c1e4266449cc029..4ec64f0fe671b6f0b5786dc5421544411d3dd6cb 100644 --- a/runtime/quark/codelets/codelet_zgelqt.c +++ b/runtime/quark/codelets/codelet_zgelqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -103,7 +103,7 @@ void CORE_zgelqt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgelqt(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_zgemm.c b/runtime/quark/codelets/codelet_zgemm.c index b57802f91982f350bdda1b230c0bca591c1b1964..7bbc396f0369f7aa3a374bb6e9fcb66e7a5f6b60 100644 --- a/runtime/quark/codelets/codelet_zgemm.c +++ b/runtime/quark/codelets/codelet_zgemm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zgeqrt.c b/runtime/quark/codelets/codelet_zgeqrt.c index 64807f139cae939aa674ba86165afb882e6f20c9..3d0d447b1d2a0abbed35fc7fb9bd3ca6c03fb594 100644 --- a/runtime/quark/codelets/codelet_zgeqrt.c +++ b/runtime/quark/codelets/codelet_zgeqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -104,7 +104,7 @@ void CORE_zgeqrt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgeqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_zgessm.c b/runtime/quark/codelets/codelet_zgessm.c index 8b8a3ed67afdca24de35b489c393a0b63049aa48..fb3768e83ff2e1ca38821c8b5c59173c2a2b61c4 100644 --- a/runtime/quark/codelets/codelet_zgessm.c +++ b/runtime/quark/codelets/codelet_zgessm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" @@ -46,7 +46,7 @@ void CORE_zgessm_quark(Quark *quark) CORE_zgessm(m, n, k, ib, IPIV, D, ldd, A, lda); } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -90,7 +90,7 @@ void CORE_zgessm_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgessm(const MORSE_option_t *options, int m, int n, int k, int ib, int nb, int *IPIV, diff --git a/runtime/quark/codelets/codelet_zgessq.c b/runtime/quark/codelets/codelet_zgessq.c index 81e33e3f8356d5ad8a2f3e4b47b7a537b3bafeb6..aae97be3d4f5b23ebd7445d4197bc81fd9d936b1 100644 --- a/runtime/quark/codelets/codelet_zgessq.c +++ b/runtime/quark/codelets/codelet_zgessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zgetrf.c b/runtime/quark/codelets/codelet_zgetrf.c index fdf5c721cac00e37ea88cd7c0654274102e10304..e057507193796997dffa8ad8bab5c9175744b505 100644 --- a/runtime/quark/codelets/codelet_zgetrf.c +++ b/runtime/quark/codelets/codelet_zgetrf.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zgetrf_incpiv.c b/runtime/quark/codelets/codelet_zgetrf_incpiv.c index f4a24af2e49379d1db40fc82b122dd4b62d2a990..7ce7da4d167b98649605ae76aa57d83707941ec6 100644 --- a/runtime/quark/codelets/codelet_zgetrf_incpiv.c +++ b/runtime/quark/codelets/codelet_zgetrf_incpiv.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -49,7 +49,7 @@ void CORE_zgetrf_incpiv_quark(Quark *quark) } } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -102,7 +102,7 @@ void CORE_zgetrf_incpiv_quark(Quark *quark) * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_zgetrf_incpiv(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_zgetrf_nopiv.c b/runtime/quark/codelets/codelet_zgetrf_nopiv.c index 02e70c546362d2745e0cea67f0770b68d7b9bf64..0436e2e2eeaf34fbb923eccead39c3077edc34d1 100644 --- a/runtime/quark/codelets/codelet_zgetrf_nopiv.c +++ b/runtime/quark/codelets/codelet_zgetrf_nopiv.c @@ -19,7 +19,7 @@ * @date 2013-02-01 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -43,7 +43,7 @@ void CORE_zgetrf_nopiv_quark(Quark *quark) } } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -89,7 +89,7 @@ void CORE_zgetrf_nopiv_quark(Quark *quark) * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_zgetrf_nopiv(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_zhe2ge.c b/runtime/quark/codelets/codelet_zhe2ge.c index 56f77657939acfc96e9bcdb82bcd9f175da9c9d2..b010e2b9b63f7c1f538528f6ef24bd8af5f0dd36 100644 --- a/runtime/quark/codelets/codelet_zhe2ge.c +++ b/runtime/quark/codelets/codelet_zhe2ge.c @@ -14,7 +14,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -23,7 +23,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ static inline void CORE_zhe2ge_quark(Quark *quark) { MORSE_enum uplo; diff --git a/runtime/quark/codelets/codelet_zhemm.c b/runtime/quark/codelets/codelet_zhemm.c index f30985c48854df7ff009a5e9fae221e7bcd95874..b5d7a0c8ad2c22ad2dbda64456d0d0c29694d7e5 100644 --- a/runtime/quark/codelets/codelet_zhemm.c +++ b/runtime/quark/codelets/codelet_zhemm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zher2k.c b/runtime/quark/codelets/codelet_zher2k.c index 0b44741be02dc3e8d00767b6a8eee3d5ee001678..6cbde40ecd03d40fd7585fb85252999c7c8e4768 100644 --- a/runtime/quark/codelets/codelet_zher2k.c +++ b/runtime/quark/codelets/codelet_zher2k.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zherfb.c b/runtime/quark/codelets/codelet_zherfb.c index 98b404a6c4a8ea115a4eeebf6c1fa901599418f5..a51082c7119bd8a745a5744e98248bb2a803b861 100644 --- a/runtime/quark/codelets/codelet_zherfb.c +++ b/runtime/quark/codelets/codelet_zherfb.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zherk.c b/runtime/quark/codelets/codelet_zherk.c index f6a39d2268a49e3f47c76c669f64f915794ce8e8..b7935f187045258333e1f605e8c4e1816c405c3f 100644 --- a/runtime/quark/codelets/codelet_zherk.c +++ b/runtime/quark/codelets/codelet_zherk.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zhessq.c b/runtime/quark/codelets/codelet_zhessq.c index 37e48e8bf0bf02925276f63d748628b67d975144..d32e0fb2b73a41954abbcfeebf9a11ba779b4040 100644 --- a/runtime/quark/codelets/codelet_zhessq.c +++ b/runtime/quark/codelets/codelet_zhessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlacpy.c b/runtime/quark/codelets/codelet_zlacpy.c index b97d1b2ef8b304dac09ad3441464624be5e308c6..bac49ebec954643fd1b1656af7e1435485320f85 100644 --- a/runtime/quark/codelets/codelet_zlacpy.c +++ b/runtime/quark/codelets/codelet_zlacpy.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlag2c.c b/runtime/quark/codelets/codelet_zlag2c.c index d75f82508eda389e166fb306b217c53cbe394c5c..cf89a7b90e7e1b6caadfaa3c80f9fe83d3a7168c 100644 --- a/runtime/quark/codelets/codelet_zlag2c.c +++ b/runtime/quark/codelets/codelet_zlag2c.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlange.c b/runtime/quark/codelets/codelet_zlange.c index 62c0e2183ec88ca1f215354196077ac342ca4ae9..9b477d02ac9ab85aaf51dfa4e62a9b637eca8164 100644 --- a/runtime/quark/codelets/codelet_zlange.c +++ b/runtime/quark/codelets/codelet_zlange.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlanhe.c b/runtime/quark/codelets/codelet_zlanhe.c index f01f07a4b7039d761eff2f6327de3ddb24a595d9..0c09ec7b5d0fbb99c0bc0a5335a9d18c691b13f9 100644 --- a/runtime/quark/codelets/codelet_zlanhe.c +++ b/runtime/quark/codelets/codelet_zlanhe.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlansy.c b/runtime/quark/codelets/codelet_zlansy.c index 3ce23f5120147bb8c871fc9bfef607308571bf09..3f11f37bbe192b5a2a6fe172e67a809202a6732d 100644 --- a/runtime/quark/codelets/codelet_zlansy.c +++ b/runtime/quark/codelets/codelet_zlansy.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlantr.c b/runtime/quark/codelets/codelet_zlantr.c index 760e1cbb34d8d1547006afd7e674a7365ea35987..cfa76672facae4120c2d7ab238b1d1dd673698c4 100644 --- a/runtime/quark/codelets/codelet_zlantr.c +++ b/runtime/quark/codelets/codelet_zlantr.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlascal.c b/runtime/quark/codelets/codelet_zlascal.c index d001ed77e36f4524e532f4636c019ec6a42cc039..2bbdde5b2c41c15b7228bc43433bdf9847f5c859 100644 --- a/runtime/quark/codelets/codelet_zlascal.c +++ b/runtime/quark/codelets/codelet_zlascal.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlaset.c b/runtime/quark/codelets/codelet_zlaset.c index f8ff74f9ea0a0d6da1f36fad6e1ff6e1a8015fe6..7dabbce58bca2b82de811d41fa9f47b943272ed9 100644 --- a/runtime/quark/codelets/codelet_zlaset.c +++ b/runtime/quark/codelets/codelet_zlaset.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -74,7 +74,7 @@ void CORE_zlaset_quark(Quark *quark) * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void MORSE_TASK_zlaset(const MORSE_option_t *options, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, diff --git a/runtime/quark/codelets/codelet_zlaset2.c b/runtime/quark/codelets/codelet_zlaset2.c index cd3e62ed30a962a0d914fdcbc52fa8d53324b6f0..5ab04bf0d9fc665387b5098824ed6daed7a7df75 100644 --- a/runtime/quark/codelets/codelet_zlaset2.c +++ b/runtime/quark/codelets/codelet_zlaset2.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -71,7 +71,7 @@ void CORE_zlaset2_quark(Quark *quark) * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void MORSE_TASK_zlaset2(const MORSE_option_t *options, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int LDA) diff --git a/runtime/quark/codelets/codelet_zlatro.c b/runtime/quark/codelets/codelet_zlatro.c index c3cfac6003091ebe09b5ddd6885961631bd818ec..ec9f630716410ecd6a2f47211d4ee83eb1f40788 100644 --- a/runtime/quark/codelets/codelet_zlatro.c +++ b/runtime/quark/codelets/codelet_zlatro.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zlauum.c b/runtime/quark/codelets/codelet_zlauum.c index 41e3e3b8a326543552873a377868dc7ae4b92af5..798358ffec731ac5bdd682c5e3ce32a28a93b65d 100644 --- a/runtime/quark/codelets/codelet_zlauum.c +++ b/runtime/quark/codelets/codelet_zlauum.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zpamm.c b/runtime/quark/codelets/codelet_zpamm.c index 307610622b8e70d7c14ea87c15bf04af46051eca..22b2ea670032493e946b3f190a498dd0c0c26f5d 100644 --- a/runtime/quark/codelets/codelet_zpamm.c +++ b/runtime/quark/codelets/codelet_zpamm.c @@ -21,7 +21,7 @@ * @date 2011-06-14 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" @@ -190,7 +190,7 @@ CORE_zpamm_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zpamm(const MORSE_option_t *options, int op, MORSE_enum side, int storev, diff --git a/runtime/quark/codelets/codelet_zplghe.c b/runtime/quark/codelets/codelet_zplghe.c index 31f7402ec1c94273dd2ad4a8702b7a007f552e0a..cea0f08c1ba269675dc85a484dc82d3c23e072f6 100644 --- a/runtime/quark/codelets/codelet_zplghe.c +++ b/runtime/quark/codelets/codelet_zplghe.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zplgsy.c b/runtime/quark/codelets/codelet_zplgsy.c index 62f866a81b82e3ccbd5ee3b2399c1db917923401..a5102abbc620213d1a34903193c280d948654b54 100644 --- a/runtime/quark/codelets/codelet_zplgsy.c +++ b/runtime/quark/codelets/codelet_zplgsy.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zplrnt.c b/runtime/quark/codelets/codelet_zplrnt.c index 9da24dec013ffd0c777aefa0474d09bea8eb74af..d92e937459fd7bf58600a8956f7c6823741739f2 100644 --- a/runtime/quark/codelets/codelet_zplrnt.c +++ b/runtime/quark/codelets/codelet_zplrnt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zplssq.c b/runtime/quark/codelets/codelet_zplssq.c index 7a5a1da3246cbdfc0dd0a4cef0abbc836eef622e..bde4acc37e1c83ca25824a399e110dbfb0e762d5 100644 --- a/runtime/quark/codelets/codelet_zplssq.c +++ b/runtime/quark/codelets/codelet_zplssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" @@ -39,7 +39,7 @@ void CORE_zplssq_quark(Quark *quark) } } -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/runtime/quark/codelets/codelet_zpotrf.c b/runtime/quark/codelets/codelet_zpotrf.c index e260b85d4c8a2cbebca0e70d7c136f63f7124ee5..ae8298bec23786ac2f328f73a0c0ce5e58abb11c 100644 --- a/runtime/quark/codelets/codelet_zpotrf.c +++ b/runtime/quark/codelets/codelet_zpotrf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zssssm.c b/runtime/quark/codelets/codelet_zssssm.c index ed0af9521dcd52a3e39d6229a05cc65dd422cd6f..bfb3f321ba1e07faaef6f000ca9552a4d8260414 100644 --- a/runtime/quark/codelets/codelet_zssssm.c +++ b/runtime/quark/codelets/codelet_zssssm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "coreblas/cblas.h" #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" @@ -50,7 +50,7 @@ void CORE_zssssm_quark(Quark *quark) CORE_zssssm(m1, n1, m2, n2, k, ib, A1, lda1, A2, lda2, L1, ldl1, L2, ldl2, IPIV); } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -119,7 +119,7 @@ void CORE_zssssm_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zssssm(const MORSE_option_t *options, int m1, int n1, int m2, int n2, int k, int ib, int nb, const MORSE_desc_t *A1, int A1m, int A1n, int lda1, diff --git a/runtime/quark/codelets/codelet_zsymm.c b/runtime/quark/codelets/codelet_zsymm.c index c143d3f450bcf9a3bb1762aa5aa66aa9fafe00dd..b2c82145d3f21a658704577c6f00978520347b7d 100644 --- a/runtime/quark/codelets/codelet_zsymm.c +++ b/runtime/quark/codelets/codelet_zsymm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zsyr2k.c b/runtime/quark/codelets/codelet_zsyr2k.c index eb19a2e65c1b52c8de4244df11576c8186ec74ec..c3534145272e0a6f83c1dd356516527444029dc5 100644 --- a/runtime/quark/codelets/codelet_zsyr2k.c +++ b/runtime/quark/codelets/codelet_zsyr2k.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zsyrk.c b/runtime/quark/codelets/codelet_zsyrk.c index 1ba014584018d3e461b0aaa6965e7157b3991604..afedbc67f3366af661eaab00568f6fda69594778 100644 --- a/runtime/quark/codelets/codelet_zsyrk.c +++ b/runtime/quark/codelets/codelet_zsyrk.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zsyssq.c b/runtime/quark/codelets/codelet_zsyssq.c index d88dc3344da7c60de44d8956c8cf275d4c1e96d8..a29ecb6fd9dab2a598743af79bb199d71dbf7e07 100644 --- a/runtime/quark/codelets/codelet_zsyssq.c +++ b/runtime/quark/codelets/codelet_zsyssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_zsytrf_nopiv.c b/runtime/quark/codelets/codelet_zsytrf_nopiv.c index 4517750117e0de0a9f4c781be89d22f66d68df63..b7de65360a818ec5ffbec1a6565c9c5238cf3d34 100644 --- a/runtime/quark/codelets/codelet_zsytrf_nopiv.c +++ b/runtime/quark/codelets/codelet_zsytrf_nopiv.c @@ -22,7 +22,7 @@ * @date 2011-10-09 * @precisions normal z -> c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztile_zero.c b/runtime/quark/codelets/codelet_ztile_zero.c index c4c7e22aee88cce7c1717dd1e28f8cb0f66df534..c9a10feac1e16698d38fba38a752c1e2cb61638a 100644 --- a/runtime/quark/codelets/codelet_ztile_zero.c +++ b/runtime/quark/codelets/codelet_ztile_zero.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztplqt.c b/runtime/quark/codelets/codelet_ztplqt.c index bc384f6fa5a7f5501af61d19dca03a80018166fb..2682e3a40313e343cda534e775c0d011617c2af2 100644 --- a/runtime/quark/codelets/codelet_ztplqt.c +++ b/runtime/quark/codelets/codelet_ztplqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztpmlqt.c b/runtime/quark/codelets/codelet_ztpmlqt.c index 83a2741866e4533971fd007b71b5c15befaae7d9..50bb9ff8ffdae9223b848ebb31039b22377cfc6f 100644 --- a/runtime/quark/codelets/codelet_ztpmlqt.c +++ b/runtime/quark/codelets/codelet_ztpmlqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztpmqrt.c b/runtime/quark/codelets/codelet_ztpmqrt.c index acf3380fea81c913016e68be18e7b6928ca72434..4d551981099a7797659d46e372e0f18d3fccb507 100644 --- a/runtime/quark/codelets/codelet_ztpmqrt.c +++ b/runtime/quark/codelets/codelet_ztpmqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztpqrt.c b/runtime/quark/codelets/codelet_ztpqrt.c index 1bfdfdd0ae96e685ffc1620207d5ae416f9bd5e8..9f650d1544f86f093a90db3d80a736a6e467812d 100644 --- a/runtime/quark/codelets/codelet_ztpqrt.c +++ b/runtime/quark/codelets/codelet_ztpqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztradd.c b/runtime/quark/codelets/codelet_ztradd.c index 7585c273b010019853a849c261fc8a46d988b449..4a6293771d116eed8cb96945894c91e12cf00cc3 100644 --- a/runtime/quark/codelets/codelet_ztradd.c +++ b/runtime/quark/codelets/codelet_ztradd.c @@ -18,7 +18,7 @@ * @date 2011-11-03 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -100,7 +100,7 @@ void CORE_ztradd_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztradd(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/quark/codelets/codelet_ztrasm.c b/runtime/quark/codelets/codelet_ztrasm.c index 6e25be5b4ad59b365a22d4f31a2da27e68618506..c72168a22f5d861bd777b4de539fdf026e494f56 100644 --- a/runtime/quark/codelets/codelet_ztrasm.c +++ b/runtime/quark/codelets/codelet_ztrasm.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztrmm.c b/runtime/quark/codelets/codelet_ztrmm.c index e36b0cc76b216e5a63be058e2474be4322f61415..387043785be7bf08a47ec7c87affca0073a96a7a 100644 --- a/runtime/quark/codelets/codelet_ztrmm.c +++ b/runtime/quark/codelets/codelet_ztrmm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztrsm.c b/runtime/quark/codelets/codelet_ztrsm.c index 4ffaa5c96a4b37c3d505ea92bb36415430166441..7057099e751528897aaf1c27a1ee91049f2a7008 100644 --- a/runtime/quark/codelets/codelet_ztrsm.c +++ b/runtime/quark/codelets/codelet_ztrsm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztrssq.c b/runtime/quark/codelets/codelet_ztrssq.c index 19f64ecc4b58be9242d70ef7a8cdb68477652239..078ac63aea1ee662f1031082795aaa30c25d9bad 100644 --- a/runtime/quark/codelets/codelet_ztrssq.c +++ b/runtime/quark/codelets/codelet_ztrssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztrtri.c b/runtime/quark/codelets/codelet_ztrtri.c index 6da41f430d3f59f13045d51b7c546104f0b68ad3..586ef5718baf2b879b146f962effcb3eb10877f8 100644 --- a/runtime/quark/codelets/codelet_ztrtri.c +++ b/runtime/quark/codelets/codelet_ztrtri.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztslqt.c b/runtime/quark/codelets/codelet_ztslqt.c index ffa53767a1de4cf1c866a2630076fc0ea37897b2..ea61c4cb0e3199b3585989ca43bb5890852552d0 100644 --- a/runtime/quark/codelets/codelet_ztslqt.c +++ b/runtime/quark/codelets/codelet_ztslqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -117,7 +117,7 @@ void CORE_ztslqt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztslqt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_ztsmlq.c b/runtime/quark/codelets/codelet_ztsmlq.c index 395601cb5fbb74a89cf1582bfa5736df5993c0d5..f68dfd0d717f9ebd0471105426a69b2394975a0d 100644 --- a/runtime/quark/codelets/codelet_ztsmlq.c +++ b/runtime/quark/codelets/codelet_ztsmlq.c @@ -24,7 +24,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -154,7 +154,7 @@ void CORE_ztsmlq_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_ztsmlq_hetra1.c b/runtime/quark/codelets/codelet_ztsmlq_hetra1.c index b584be44208596be2472b76bef0586cf0f9d6741..0afa54ddaa114a7df4398f2231202a3eaba0c537 100644 --- a/runtime/quark/codelets/codelet_ztsmlq_hetra1.c +++ b/runtime/quark/codelets/codelet_ztsmlq_hetra1.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztsmqr.c b/runtime/quark/codelets/codelet_ztsmqr.c index f2c3b4d0e18063701eb3da3bacd752aac2d70367..b0251b7bdee704eb346dd74081f9d1f2b8955531 100644 --- a/runtime/quark/codelets/codelet_ztsmqr.c +++ b/runtime/quark/codelets/codelet_ztsmqr.c @@ -24,7 +24,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -154,7 +154,7 @@ void CORE_ztsmqr_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_ztsmqr_hetra1.c b/runtime/quark/codelets/codelet_ztsmqr_hetra1.c index 83fe22903ad20e336a38559219c203da79d3720c..75b1fc36b127a89a5ce4ffeb0e197b940c282e70 100644 --- a/runtime/quark/codelets/codelet_ztsmqr_hetra1.c +++ b/runtime/quark/codelets/codelet_ztsmqr_hetra1.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" diff --git a/runtime/quark/codelets/codelet_ztsqrt.c b/runtime/quark/codelets/codelet_ztsqrt.c index e6b6f5ee47e618b6d0d5da8287cdd3e2f04cce2e..bb479da91455475f4d4f87f70ca6712b23760d06 100644 --- a/runtime/quark/codelets/codelet_ztsqrt.c +++ b/runtime/quark/codelets/codelet_ztsqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -106,7 +106,7 @@ void CORE_ztsqrt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A1, int A1m, int A1n, int lda1, diff --git a/runtime/quark/codelets/codelet_ztstrf.c b/runtime/quark/codelets/codelet_ztstrf.c index f2a572672cab2c7de2773df84ee7d9352a98252f..3e635c5c17eb7fdec01a8feaa6918594086877fd 100644 --- a/runtime/quark/codelets/codelet_ztstrf.c +++ b/runtime/quark/codelets/codelet_ztstrf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -58,7 +58,7 @@ void CORE_ztstrf_quark(Quark *quark) } } -/***************************************************************************//** +/** * * @ingroup CORE_MORSE_Complex64_t * @@ -123,7 +123,7 @@ void CORE_ztstrf_quark(Quark *quark) * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_ztstrf(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *U, int Um, int Un, int ldu, diff --git a/runtime/quark/codelets/codelet_zttlqt.c b/runtime/quark/codelets/codelet_zttlqt.c index 085b4bc8f6aeb75d619324e42314e6e5ee1eec65..e22fe7901ba07f0e015f65cbd36e1c6ce2a9a049 100644 --- a/runtime/quark/codelets/codelet_zttlqt.c +++ b/runtime/quark/codelets/codelet_zttlqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -118,7 +118,7 @@ void CORE_zttlqt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttlqt(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A1, int A1m, int A1n, int lda1, diff --git a/runtime/quark/codelets/codelet_zttmlq.c b/runtime/quark/codelets/codelet_zttmlq.c index e6a8eb1323d858b70796f1f5faa8ef351952242b..dfcdc8bb00d54226986042c9f1f42dda2fcaa994 100644 --- a/runtime/quark/codelets/codelet_zttmlq.c +++ b/runtime/quark/codelets/codelet_zttmlq.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -146,7 +146,7 @@ void CORE_zttmlq_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_zttmqr.c b/runtime/quark/codelets/codelet_zttmqr.c index 454de39e7a9d002451831614e0394ecde79c4f4a..000825e44d82fc1a7835c3a20fb4da8cee40d572 100644 --- a/runtime/quark/codelets/codelet_zttmqr.c +++ b/runtime/quark/codelets/codelet_zttmqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -147,7 +147,7 @@ CORE_zttmqr_quark( Quark *quark ) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_zttqrt.c b/runtime/quark/codelets/codelet_zttqrt.c index c06b15b1d60bd67569158ef2920501f6d1229355..abccebbc2d448ec5b4433024056eec6b1054f6ed 100644 --- a/runtime/quark/codelets/codelet_zttqrt.c +++ b/runtime/quark/codelets/codelet_zttqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -118,7 +118,7 @@ void CORE_zttqrt_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, const MORSE_desc_t *A1, int A1m, int A1n, int lda1, diff --git a/runtime/quark/codelets/codelet_zunmlq.c b/runtime/quark/codelets/codelet_zunmlq.c index ca992aefcf2825210a8c293a9aeb65a8fd628637..1d1642e30ba718e4400ceeed41a3d5f56db301b5 100644 --- a/runtime/quark/codelets/codelet_zunmlq.c +++ b/runtime/quark/codelets/codelet_zunmlq.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -133,7 +133,7 @@ void CORE_zunmlq_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zunmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m, int n, int k, int ib, int nb, diff --git a/runtime/quark/codelets/codelet_zunmqr.c b/runtime/quark/codelets/codelet_zunmqr.c index b67b1017755ac4cec530d005fcda050bb0d006a6..ab89b5ddd6d76f44e5653b95e55fa6faa878baac 100644 --- a/runtime/quark/codelets/codelet_zunmqr.c +++ b/runtime/quark/codelets/codelet_zunmqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_quark.h" #include "chameleon/morse_tasks_z.h" #include "coreblas/coreblas_z.h" @@ -133,7 +133,7 @@ void CORE_zunmqr_quark(Quark *quark) * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zunmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m, int n, int k, int ib, int nb, diff --git a/runtime/quark/control/runtime_async.c b/runtime/quark/control/runtime_async.c index 1c1247c5e4fdea065509903ea8ea84c5b04ab817..5583e5839d077327d30215fa21f57a0a3153d17a 100644 --- a/runtime/quark/control/runtime_async.c +++ b/runtime/quark/control/runtime_async.c @@ -17,13 +17,13 @@ * @author Cedric Castagnede * @date 2011-10-29 * - **/ + */ #include <stdlib.h> #include "chameleon_quark.h" -/******************************************************************************* +/** * Create a sequence - **/ + */ int RUNTIME_sequence_create( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -37,9 +37,9 @@ int RUNTIME_sequence_create( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Destroy a sequence - **/ + */ int RUNTIME_sequence_destroy( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -48,9 +48,9 @@ int RUNTIME_sequence_destroy( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Wait for the completion of a sequence - **/ + */ int RUNTIME_sequence_wait( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -59,9 +59,9 @@ int RUNTIME_sequence_wait( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Terminate a sequence - **/ + */ void RUNTIME_sequence_flush( MORSE_context_t *morse, MORSE_sequence_t *sequence, MORSE_request_t *request, diff --git a/runtime/quark/control/runtime_context.c b/runtime/quark/control/runtime_context.c index cb552f122ce2c49dba814e8f8c1ad07b60e46678..8b87d345ff1e30bc5f30bc3abff21afe27ac5c04 100644 --- a/runtime/quark/control/runtime_context.c +++ b/runtime/quark/control/runtime_context.c @@ -16,13 +16,13 @@ * @author Cedric Castagnede * @date 2011-10-29 * - **/ + */ #include <stdlib.h> #include "chameleon_quark.h" -/******************************************************************************* +/** * Create new context - **/ + */ void RUNTIME_context_create( MORSE_context_t *morse ) { morse->scheduler = RUNTIME_SCHED_QUARK; @@ -30,16 +30,16 @@ void RUNTIME_context_create( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Clean the context - **/ + */ void RUNTIME_context_destroy( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * */ void RUNTIME_enable( MORSE_enum lever ) @@ -58,9 +58,9 @@ void RUNTIME_enable( MORSE_enum lever ) return; } -/******************************************************************************* +/** * - **/ + */ void RUNTIME_disable( MORSE_enum lever ) { switch (lever) diff --git a/runtime/quark/control/runtime_control.c b/runtime/quark/control/runtime_control.c index 3f541cc1b20b1ce8e529fbc77dd755f8a3495542..6e3ca134d0bd3718f52b753f8f25810d06e72400 100644 --- a/runtime/quark/control/runtime_control.c +++ b/runtime/quark/control/runtime_control.c @@ -16,14 +16,14 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_quark.h" -/******************************************************************************* +/** * - **/ + */ int RUNTIME_init( MORSE_context_t *morse, int ncpus, int ncudas, @@ -43,7 +43,7 @@ int RUNTIME_init( MORSE_context_t *morse, return hres; } -/******************************************************************************* +/** * */ void RUNTIME_finalize( MORSE_context_t *morse ) @@ -52,53 +52,53 @@ void RUNTIME_finalize( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * To suspend the processing of new tasks by workers - **/ + */ void RUNTIME_pause( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * This is the symmetrical call to RUNTIME_pause, * used to resume the workers polling for new tasks. - **/ + */ void RUNTIME_resume( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * Busy-waiting barrier - **/ + */ void RUNTIME_barrier( MORSE_context_t *morse ) { QUARK_Barrier((Quark*)(morse->schedopt)); } -/******************************************************************************* +/** * Display a progress information when executing the tasks - **/ + */ void RUNTIME_progress( MORSE_context_t *morse ) { (void)morse; return; } -/******************************************************************************* +/** * Thread rank. - **/ + */ int RUNTIME_thread_rank( MORSE_context_t *morse ) { return QUARK_Thread_Rank((Quark*)(morse->schedopt)); } -/******************************************************************************* +/** * Number of threads. - **/ + */ int RUNTIME_thread_size( MORSE_context_t *morse ) { (void)morse; @@ -109,18 +109,18 @@ int RUNTIME_thread_size( MORSE_context_t *morse ) return quark_get_numthreads(); } -/******************************************************************************* +/** * The process rank - **/ + */ int RUNTIME_comm_rank( MORSE_context_t *morse ) { (void)morse; return 0; } -/******************************************************************************* +/** * This returns the size of the distributed computation - **/ + */ int RUNTIME_comm_size( MORSE_context_t *morse ) { (void)morse; diff --git a/runtime/quark/control/runtime_descriptor.c b/runtime/quark/control/runtime_descriptor.c index 7dfddf61e878e022f4b71f06d44cb7101d4fc4f4..ffc4f2e7e4165bb0b931540a98bef0bead20b3d7 100644 --- a/runtime/quark/control/runtime_descriptor.c +++ b/runtime/quark/control/runtime_descriptor.c @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2012-09-15 * - **/ + */ #include <stdlib.h> #include "chameleon_quark.h" diff --git a/runtime/quark/control/runtime_options.c b/runtime/quark/control/runtime_options.c index 88f7ba73ecb3c304e253c700468dc8c32c4f74bd..5d6eb4c3c61d48242d9951a956aa8c2d5f5fc501 100644 --- a/runtime/quark/control/runtime_options.c +++ b/runtime/quark/control/runtime_options.c @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2011-10-29 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_quark.h" diff --git a/runtime/quark/control/runtime_profiling.c b/runtime/quark/control/runtime_profiling.c index ab4e5e89488b0345701a2007e1ff884bd8304e77..a988af8d92b210db0af03242d1d8cf6a1b07077a 100644 --- a/runtime/quark/control/runtime_profiling.c +++ b/runtime/quark/control/runtime_profiling.c @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2011-10-29 * - **/ + */ #include "chameleon_quark.h" #include "chameleon/chameleon_timer.h" @@ -54,9 +54,9 @@ void RUNTIME_kernelprofile_display(void) morse_warning("RUNTIME_kernelprofile_display(quark)", "Kernel profiling is not available with Quark\n"); } -/******************************************************************************* +/** * Set iteration numbers for traces - **/ + */ void RUNTIME_iteration_push( MORSE_context_t *morse, unsigned long iteration ) { (void)morse; (void)iteration; diff --git a/runtime/quark/control/runtime_zlocality.c b/runtime/quark/control/runtime_zlocality.c index 38a92b78f942e7605b4d66ada43e704594e1a7a5..7194444cfa6f69223344728f5f042fda66a05d0f 100644 --- a/runtime/quark/control/runtime_zlocality.c +++ b/runtime/quark/control/runtime_zlocality.c @@ -16,7 +16,7 @@ * @date 2011-10-29 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" void RUNTIME_zlocality_allrestrict( uint32_t where ) diff --git a/runtime/quark/control/runtime_zprofiling.c b/runtime/quark/control/runtime_zprofiling.c index e59ba01ca51cf7d8669442806685b790c686903d..eab3fb23f53cd1a25a41d6bb97bfea75e896db60 100644 --- a/runtime/quark/control/runtime_zprofiling.c +++ b/runtime/quark/control/runtime_zprofiling.c @@ -18,7 +18,7 @@ * @date 2011-06-01 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_quark.h" void RUNTIME_zdisplay_allprofile() diff --git a/runtime/quark/include/chameleon_quark.h b/runtime/quark/include/chameleon_quark.h index 90c221218ed69e173edec9dad4502c3b74af7ec2..673f7bf6c93c583e86f0d03b16ae4606e7be2339 100644 --- a/runtime/quark/include/chameleon_quark.h +++ b/runtime/quark/include/chameleon_quark.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_QUARK_H_ #define _MORSE_QUARK_H_ diff --git a/runtime/quark/include/core_blas_dag.h b/runtime/quark/include/core_blas_dag.h index a375eaa192ccfd64ddc84da0d9a09aafbe8883fe..e5fed8c3a7d386f3213d9d5cfa423736f22cffa5 100644 --- a/runtime/quark/include/core_blas_dag.h +++ b/runtime/quark/include/core_blas_dag.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #ifndef _MORSE_CORE_BLAS_DAG_H_ #define _MORSE_CORE_BLAS_DAG_H_ diff --git a/runtime/starpu/codelets/codelet_zasum.c b/runtime/starpu/codelets/codelet_zasum.c index 5ad9b827bce56a7fd9d3de159a06178ec563c5e3..58e0f796f82310db4c8e4de7bc7aae5d68e5d543 100644 --- a/runtime/starpu/codelets/codelet_zasum.c +++ b/runtime/starpu/codelets/codelet_zasum.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zaxpy.c b/runtime/starpu/codelets/codelet_zaxpy.c index 1cea2b43279856e6e9679582f9b0d0dace1f6c52..c3133b8d0996e874bdf59ff5642c7b88816cc4a3 100644 --- a/runtime/starpu/codelets/codelet_zaxpy.c +++ b/runtime/starpu/codelets/codelet_zaxpy.c @@ -16,7 +16,7 @@ * @date 2014-07-18 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zbuild.c b/runtime/starpu/codelets/codelet_zbuild.c index e7b02ec92151875292192729ad055b69ca02cba4..70e3a664f7f676be53f4bfa88a147ece4bd8ce5e 100644 --- a/runtime/starpu/codelets/codelet_zbuild.c +++ b/runtime/starpu/codelets/codelet_zbuild.c @@ -23,7 +23,7 @@ * @date 2016-09-05 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zcallback.c b/runtime/starpu/codelets/codelet_zcallback.c index 5b8b872424c7eb175bb7c4cbd2a86ff96a3e66fd..1b227f403d28c110b1a82d0b6322672f5a19d4a5 100644 --- a/runtime/starpu/codelets/codelet_zcallback.c +++ b/runtime/starpu/codelets/codelet_zcallback.c @@ -18,7 +18,7 @@ * @date 2015-09-16 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zgeadd.c b/runtime/starpu/codelets/codelet_zgeadd.c index f5032fd7f224669558ddab18a95dea5d973b1a09..15f174a6542efb6937c7589be263ffa8f59b61aa 100644 --- a/runtime/starpu/codelets/codelet_zgeadd.c +++ b/runtime/starpu/codelets/codelet_zgeadd.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -77,7 +77,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgeadd(const MORSE_option_t *options, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/starpu/codelets/codelet_zgelqt.c b/runtime/starpu/codelets/codelet_zgelqt.c index 910fc836edd07735d68910c7ece8f5ecd0be7e35..a98b6c7847433eff190e9aa1a12ea83fb9e6bba1 100644 --- a/runtime/starpu/codelets/codelet_zgelqt.c +++ b/runtime/starpu/codelets/codelet_zgelqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -86,7 +86,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgelqt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zgemm.c b/runtime/starpu/codelets/codelet_zgemm.c index 166a24ad800253344953a0ef28984f4da6dad04c..7fa98e57072324ed6261b601ba94e108d2919c2d 100644 --- a/runtime/starpu/codelets/codelet_zgemm.c +++ b/runtime/starpu/codelets/codelet_zgemm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zgemm(const MORSE_option_t *options, MORSE_enum transA, int transB, int m, int n, int k, int nb, diff --git a/runtime/starpu/codelets/codelet_zgeqrt.c b/runtime/starpu/codelets/codelet_zgeqrt.c index 4cd2b4a328cba34fd7daaae7d4b930873b4b27cd..148e885128bf89c139dfbd8880ad003fccd7f14d 100644 --- a/runtime/starpu/codelets/codelet_zgeqrt.c +++ b/runtime/starpu/codelets/codelet_zgeqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -87,7 +87,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgeqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zgessm.c b/runtime/starpu/codelets/codelet_zgessm.c index 97a24e0de1fcf01be5ba4281481f54ce983329be..64503c8eff82a107890690888d0477bc9c950d42 100644 --- a/runtime/starpu/codelets/codelet_zgessm.c +++ b/runtime/starpu/codelets/codelet_zgessm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -70,7 +70,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zgessm(const MORSE_option_t *options, int m, int n, int k, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zgessq.c b/runtime/starpu/codelets/codelet_zgessq.c index 3692bebac7269ec6531ad6d4cd3e9138798ddcf4..c4c2d6065b70a19a6283f800629ddbf3ca51f6fc 100644 --- a/runtime/starpu/codelets/codelet_zgessq.c +++ b/runtime/starpu/codelets/codelet_zgessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zgetrf.c b/runtime/starpu/codelets/codelet_zgetrf.c index 056928670456b2e024fa0d5d91cd8bd557f55222..11bda33e04038937702abae98341f79f7a391c3d 100644 --- a/runtime/starpu/codelets/codelet_zgetrf.c +++ b/runtime/starpu/codelets/codelet_zgetrf.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zgetrf_incpiv.c b/runtime/starpu/codelets/codelet_zgetrf_incpiv.c index d51f80a5b946ff3bfee05b31ea5fae6fdff58aee..4186bc2d51f424c36da3e9885ae8aa6e1013dca1 100644 --- a/runtime/starpu/codelets/codelet_zgetrf_incpiv.c +++ b/runtime/starpu/codelets/codelet_zgetrf_incpiv.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -79,7 +79,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_zgetrf_incpiv(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zgetrf_nopiv.c b/runtime/starpu/codelets/codelet_zgetrf_nopiv.c index eec47a0364d5b0431795db4414558dc5bc81b03c..16967e714afc31cc560d43adfd631263b97d816e 100644 --- a/runtime/starpu/codelets/codelet_zgetrf_nopiv.c +++ b/runtime/starpu/codelets/codelet_zgetrf_nopiv.c @@ -19,7 +19,7 @@ * @date 2013-02-01 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -69,7 +69,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_zgetrf_nopiv(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zhe2ge.c b/runtime/starpu/codelets/codelet_zhe2ge.c index f0a310568bcc24c44eebae4a28aa09f0ac0ba9ef..e5fa14ec7c4c934cdf7298fb4d6cc35bb54cde6d 100644 --- a/runtime/starpu/codelets/codelet_zhe2ge.c +++ b/runtime/starpu/codelets/codelet_zhe2ge.c @@ -14,7 +14,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -22,7 +22,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zhe2ge(const MORSE_option_t *options, MORSE_enum uplo, int m, int n, int mb, diff --git a/runtime/starpu/codelets/codelet_zhemm.c b/runtime/starpu/codelets/codelet_zhemm.c index 6d20422b037c7176acee51750d1a5c001e9739ec..4bc085d69736cb4a78dc2398c703db9a2d9500f6 100644 --- a/runtime/starpu/codelets/codelet_zhemm.c +++ b/runtime/starpu/codelets/codelet_zhemm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zhemm(const MORSE_option_t *options, MORSE_enum side, MORSE_enum uplo, int m, int n, int nb, diff --git a/runtime/starpu/codelets/codelet_zher2k.c b/runtime/starpu/codelets/codelet_zher2k.c index b33a01c7dbe8359129a3d27609976d6417ba38d3..251cce1dc1847cdc979c59e7cc364b0aef478f0b 100644 --- a/runtime/starpu/codelets/codelet_zher2k.c +++ b/runtime/starpu/codelets/codelet_zher2k.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zher2k(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int n, int k, int nb, diff --git a/runtime/starpu/codelets/codelet_zherfb.c b/runtime/starpu/codelets/codelet_zherfb.c index fe978b4c983cbaa9a670141a3a98ee9453f4f470..a737eadcfa79cff85cdbfd49b04dc927a56ad8dd 100644 --- a/runtime/starpu/codelets/codelet_zherfb.c +++ b/runtime/starpu/codelets/codelet_zherfb.c @@ -16,7 +16,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -24,7 +24,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zherfb(const MORSE_option_t *options, MORSE_enum uplo, int n, int k, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zherk.c b/runtime/starpu/codelets/codelet_zherk.c index 181f28556d635cdd0106c2df3b62c1915b97055f..8e8beda81d975a379d9971b1529a61a92ec699bc 100644 --- a/runtime/starpu/codelets/codelet_zherk.c +++ b/runtime/starpu/codelets/codelet_zherk.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zherk(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int n, int k, int nb, diff --git a/runtime/starpu/codelets/codelet_zhessq.c b/runtime/starpu/codelets/codelet_zhessq.c index 993efbb928471ff8c266b7bbe3373a6a319af251..d2235e62419ad9d8dc64ac23ec39f9e14c6c9bba 100644 --- a/runtime/starpu/codelets/codelet_zhessq.c +++ b/runtime/starpu/codelets/codelet_zhessq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zlacpy.c b/runtime/starpu/codelets/codelet_zlacpy.c index c77405ab02921b5a1f0ff1779c105fd88bb4502c..d323c270ae72c72d43dcec6b080256f65af206ae 100644 --- a/runtime/starpu/codelets/codelet_zlacpy.c +++ b/runtime/starpu/codelets/codelet_zlacpy.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zlacpyx(const MORSE_option_t *options, MORSE_enum uplo, int m, int n, int nb, int displA, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/starpu/codelets/codelet_zlag2c.c b/runtime/starpu/codelets/codelet_zlag2c.c index 1659880d370fd099a34fb7e203f8a0227b8850de..9a2dacf1099a706e252f0b6e681f83cbd2a4ffa3 100644 --- a/runtime/starpu/codelets/codelet_zlag2c.c +++ b/runtime/starpu/codelets/codelet_zlag2c.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions mixed zc -> ds * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -28,7 +28,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zlag2c(const MORSE_option_t *options, int m, int n, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/starpu/codelets/codelet_zlange.c b/runtime/starpu/codelets/codelet_zlange.c index 455951b27dfa9e68663a7d99c402263bd3f3f080..2c58d92c8e0eb8bfd8dc921a8a4402dc20720e5d 100644 --- a/runtime/starpu/codelets/codelet_zlange.c +++ b/runtime/starpu/codelets/codelet_zlange.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zlanhe.c b/runtime/starpu/codelets/codelet_zlanhe.c index b7a019a5ffcba751d2c9db2a43413d72485b22bf..aaa1c44a60d08a8fd17d63905cf304496ce3dfac 100644 --- a/runtime/starpu/codelets/codelet_zlanhe.c +++ b/runtime/starpu/codelets/codelet_zlanhe.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zlansy.c b/runtime/starpu/codelets/codelet_zlansy.c index 531a5fa5b634fa9efe25ac43cf4c0794bc970c1b..4f55c68801461ca05c06c28aa198976bca5c5ab4 100644 --- a/runtime/starpu/codelets/codelet_zlansy.c +++ b/runtime/starpu/codelets/codelet_zlansy.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zlantr.c b/runtime/starpu/codelets/codelet_zlantr.c index b0833ca08c429a2ed63e063fbb0bbb5137157354..dfe4a742452452a93dc6cf4bafd7db3343b66e19 100644 --- a/runtime/starpu/codelets/codelet_zlantr.c +++ b/runtime/starpu/codelets/codelet_zlantr.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zlascal.c b/runtime/starpu/codelets/codelet_zlascal.c index 429233132e40043424931fe6f46e2d89e8601b5b..5a1633b5ceddd148c602d02d7d96703f3b241ad6 100644 --- a/runtime/starpu/codelets/codelet_zlascal.c +++ b/runtime/starpu/codelets/codelet_zlascal.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -53,7 +53,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zlascal(const MORSE_option_t *options, MORSE_enum uplo, diff --git a/runtime/starpu/codelets/codelet_zlaset.c b/runtime/starpu/codelets/codelet_zlaset.c index 5b6032e686c0512ae009af9a7823d01402b39f2d..1e7b2a9200f3b41cd9b86b939eb06f6ef3127a05 100644 --- a/runtime/starpu/codelets/codelet_zlaset.c +++ b/runtime/starpu/codelets/codelet_zlaset.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -60,7 +60,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void MORSE_TASK_zlaset(const MORSE_option_t *options, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, MORSE_Complex64_t beta, diff --git a/runtime/starpu/codelets/codelet_zlaset2.c b/runtime/starpu/codelets/codelet_zlaset2.c index 8486bd3abe91bd7e032b48d7158fe049cfb655b2..c6c012ac6e33cd7e7685c2b572c38a55b537dcd9 100644 --- a/runtime/starpu/codelets/codelet_zlaset2.c +++ b/runtime/starpu/codelets/codelet_zlaset2.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -58,7 +58,7 @@ * @param[in] LDA * The leading dimension of the array A. LDA >= max(1,M). * - **/ + */ void MORSE_TASK_zlaset2(const MORSE_option_t *options, MORSE_enum uplo, int M, int N, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int LDA) diff --git a/runtime/starpu/codelets/codelet_zlatro.c b/runtime/starpu/codelets/codelet_zlatro.c index adf8b31c19f93685f7ab93b62b1b96a34055aa31..6cdcba03f2be34428a19e23bb4b2509a701a1996 100644 --- a/runtime/starpu/codelets/codelet_zlatro.c +++ b/runtime/starpu/codelets/codelet_zlatro.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zlatro(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int m, int n, int mb, diff --git a/runtime/starpu/codelets/codelet_zlauum.c b/runtime/starpu/codelets/codelet_zlauum.c index f5e94f978052e50d83f48c6e2593b7683ac974e0..18a5e7b9c4bff4ee0239ecaa01b13e56bd06e9b9 100644 --- a/runtime/starpu/codelets/codelet_zlauum.c +++ b/runtime/starpu/codelets/codelet_zlauum.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zlauum(const MORSE_option_t *options, MORSE_enum uplo, int n, int nb, const MORSE_desc_t *A, int Am, int An, int lda) diff --git a/runtime/starpu/codelets/codelet_zplghe.c b/runtime/starpu/codelets/codelet_zplghe.c index 5b3e0d4339a426cc63d559864a03434233730ba4..04bc42e62b3d8445a170171f195b2308c28f1c9b 100644 --- a/runtime/starpu/codelets/codelet_zplghe.c +++ b/runtime/starpu/codelets/codelet_zplghe.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zplgsy.c b/runtime/starpu/codelets/codelet_zplgsy.c index 17de8d53d54f9deed6c38c16b0b1993a9c2c81d9..3b8c88f5b0ca26234d8a8a5e32e73b0fc1aa66ba 100644 --- a/runtime/starpu/codelets/codelet_zplgsy.c +++ b/runtime/starpu/codelets/codelet_zplgsy.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zplrnt.c b/runtime/starpu/codelets/codelet_zplrnt.c index 14b0f7aee4692ca6afa6b0d2300c613afa5b9132..0fe15b6be4ba6a91377458f13915b7a4bea4bf8a 100644 --- a/runtime/starpu/codelets/codelet_zplrnt.c +++ b/runtime/starpu/codelets/codelet_zplrnt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zplssq.c b/runtime/starpu/codelets/codelet_zplssq.c index 8fdf5bd5adb33bf5d5c26d3e7dcc04dde0aa0c4b..10cb8852141497a9c2987099e54b727b0a6da9c0 100644 --- a/runtime/starpu/codelets/codelet_zplssq.c +++ b/runtime/starpu/codelets/codelet_zplssq.c @@ -18,12 +18,12 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <math.h> #include "chameleon_starpu.h" #include "runtime_codelet_z.h" -/***************************************************************************** +/** * * @ingroup CORE_MORSE_Complex64_t * diff --git a/runtime/starpu/codelets/codelet_zpotrf.c b/runtime/starpu/codelets/codelet_zpotrf.c index 72f708ba88d22641745585a0af37de18b95db1d9..8adc93ee5e065bb808bd51460e4080459eb30191 100644 --- a/runtime/starpu/codelets/codelet_zpotrf.c +++ b/runtime/starpu/codelets/codelet_zpotrf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zpotrf(const MORSE_option_t *options, MORSE_enum uplo, int n, int nb, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/starpu/codelets/codelet_zssssm.c b/runtime/starpu/codelets/codelet_zssssm.c index b1c2090cf6c776bdf3fec6b37f2f4904285adf28..a9989b35747bf1438a09ec86c215d5c0ddb95f95 100644 --- a/runtime/starpu/codelets/codelet_zssssm.c +++ b/runtime/starpu/codelets/codelet_zssssm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -95,7 +95,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if INFO = -k, the k-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zssssm(const MORSE_option_t *options, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zsymm.c b/runtime/starpu/codelets/codelet_zsymm.c index 31707560a6243a78506e043be3e1faf32b4faf19..ae6bf2730f8818e21317f4c6dcb425fa3a3365f0 100644 --- a/runtime/starpu/codelets/codelet_zsymm.c +++ b/runtime/starpu/codelets/codelet_zsymm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zsymm(const MORSE_option_t *options, MORSE_enum side, MORSE_enum uplo, int m, int n, int nb, diff --git a/runtime/starpu/codelets/codelet_zsyr2k.c b/runtime/starpu/codelets/codelet_zsyr2k.c index e2a4c6beeaff855775ea411f7166d0e534254eef..f01a208f249e85fabd4fe2ccf52c79c0b0c4341a 100644 --- a/runtime/starpu/codelets/codelet_zsyr2k.c +++ b/runtime/starpu/codelets/codelet_zsyr2k.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zsyr2k(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int n, int k, int nb, diff --git a/runtime/starpu/codelets/codelet_zsyrk.c b/runtime/starpu/codelets/codelet_zsyrk.c index cb6d1214c6c095a669d4bd7241695bc0c627c89d..795f31344656493f7c2ad1a537e46a8629aa07a1 100644 --- a/runtime/starpu/codelets/codelet_zsyrk.c +++ b/runtime/starpu/codelets/codelet_zsyrk.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_zsyrk(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int n, int k, int nb, diff --git a/runtime/starpu/codelets/codelet_zsyssq.c b/runtime/starpu/codelets/codelet_zsyssq.c index 4d66dea439cf3da03e3420e011c676b221e7aa2e..0f0719dbd28bf790861f8f7b8d0666f80213c71b 100644 --- a/runtime/starpu/codelets/codelet_zsyssq.c +++ b/runtime/starpu/codelets/codelet_zsyssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_zsytrf_nopiv.c b/runtime/starpu/codelets/codelet_zsytrf_nopiv.c index 108646e1890c7b5532a89101465cb48d52195b37..9c3979f4fa54a4e3603424f7c8099b44609b719a 100644 --- a/runtime/starpu/codelets/codelet_zsytrf_nopiv.c +++ b/runtime/starpu/codelets/codelet_zsytrf_nopiv.c @@ -22,7 +22,7 @@ * @date 2011-10-09 * @precisions normal z -> c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztile_zero.c b/runtime/starpu/codelets/codelet_ztile_zero.c index b7d2fe9fdd84685ce4452307f197bb485519e85b..acca3dbd3bfc2b5355727cdab478cd163106e312 100644 --- a/runtime/starpu/codelets/codelet_ztile_zero.c +++ b/runtime/starpu/codelets/codelet_ztile_zero.c @@ -18,13 +18,13 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" -/***************************************************************************** +/** * - **/ + */ void MORSE_TASK_ztile_zero( const MORSE_option_t *options, int X1, int X2, int Y1, int Y2, const MORSE_desc_t *A, int Am, int An, int lda ) @@ -53,9 +53,9 @@ void MORSE_TASK_ztile_zero( const MORSE_option_t *options, 0); } -/***************************************************************************** +/** * - **/ + */ #if !defined(CHAMELEON_SIMULATION) static void cl_ztile_zero_cpu_func(void *descr[], void *cl_arg) { diff --git a/runtime/starpu/codelets/codelet_ztplqt.c b/runtime/starpu/codelets/codelet_ztplqt.c index 8e6fdaa2ce3746ad24ad45d4aaa38d22c0fe11ba..c7f11cadfe6e054ddea16a59c9b7b15dd19fed07 100644 --- a/runtime/starpu/codelets/codelet_ztplqt.c +++ b/runtime/starpu/codelets/codelet_ztplqt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztpmlqt.c b/runtime/starpu/codelets/codelet_ztpmlqt.c index 44048157f880158394d3459b57a2aa7aabec2ea4..8c5d1656576ffa27df447f03f6433db6bd787868 100644 --- a/runtime/starpu/codelets/codelet_ztpmlqt.c +++ b/runtime/starpu/codelets/codelet_ztpmlqt.c @@ -14,7 +14,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztpmqrt.c b/runtime/starpu/codelets/codelet_ztpmqrt.c index b386f0d043d41de0bd83359e3706b018d453d336..d5eacd8c03843f062bc95dac2b541a0c68139583 100644 --- a/runtime/starpu/codelets/codelet_ztpmqrt.c +++ b/runtime/starpu/codelets/codelet_ztpmqrt.c @@ -14,7 +14,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztpqrt.c b/runtime/starpu/codelets/codelet_ztpqrt.c index 67416b4d26984d01e3cf18bfdbdfde390ad37d9e..199fffd1a48b4fd560d5fb82e20103718b77a108 100644 --- a/runtime/starpu/codelets/codelet_ztpqrt.c +++ b/runtime/starpu/codelets/codelet_ztpqrt.c @@ -16,7 +16,7 @@ * @date 2016-12-15 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztradd.c b/runtime/starpu/codelets/codelet_ztradd.c index 7bb0ff09f22b22550aa890f95bd3980ea93f02e4..e4e65494e77686f2a3bc9bfbec7b60eb8534f050 100644 --- a/runtime/starpu/codelets/codelet_ztradd.c +++ b/runtime/starpu/codelets/codelet_ztradd.c @@ -18,7 +18,7 @@ * @date 2011-11-03 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -81,7 +81,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztradd(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum trans, int m, int n, int nb, MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda, diff --git a/runtime/starpu/codelets/codelet_ztrasm.c b/runtime/starpu/codelets/codelet_ztrasm.c index dbd8a5ef574fb70e16a14faa688269ac551e10a0..caffd858b769dac42624e41eccc64c4d793e18c6 100644 --- a/runtime/starpu/codelets/codelet_ztrasm.c +++ b/runtime/starpu/codelets/codelet_ztrasm.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztrmm.c b/runtime/starpu/codelets/codelet_ztrmm.c index ce09e2c42a8724db1175b1457d1cce43c8f04ef5..0745de40f04cf7d933b08de96124083af3c22c49 100644 --- a/runtime/starpu/codelets/codelet_ztrmm.c +++ b/runtime/starpu/codelets/codelet_ztrmm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_ztrmm(const MORSE_option_t *options, MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int m, int n, int nb, diff --git a/runtime/starpu/codelets/codelet_ztrsm.c b/runtime/starpu/codelets/codelet_ztrsm.c index bc713a33ae288a8fe367e5b36d6e779cbef160f2..779597aaf1c823dd60da28ed4b7667bf827e1656 100644 --- a/runtime/starpu/codelets/codelet_ztrsm.c +++ b/runtime/starpu/codelets/codelet_ztrsm.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_ztrsm(const MORSE_option_t *options, MORSE_enum side, MORSE_enum uplo, MORSE_enum transA, MORSE_enum diag, int m, int n, int nb, diff --git a/runtime/starpu/codelets/codelet_ztrssq.c b/runtime/starpu/codelets/codelet_ztrssq.c index f0b94656e1803f28957d311e03896343e23624ea..a5150873834854b62bfc6e0021692b6586f9dd1c 100644 --- a/runtime/starpu/codelets/codelet_ztrssq.c +++ b/runtime/starpu/codelets/codelet_ztrssq.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/codelets/codelet_ztrtri.c b/runtime/starpu/codelets/codelet_ztrtri.c index 0b8ef6397de31a538cd86d0f5df2caa87457b7ef..b6c53ad0a00593e1c2eafa71eecb99f56b84d53d 100644 --- a/runtime/starpu/codelets/codelet_ztrtri.c +++ b/runtime/starpu/codelets/codelet_ztrtri.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -30,7 +30,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_ztrtri(const MORSE_option_t *options, MORSE_enum uplo, MORSE_enum diag, int n, int nb, diff --git a/runtime/starpu/codelets/codelet_ztslqt.c b/runtime/starpu/codelets/codelet_ztslqt.c index 1367c53dfafbfc8877eb126e5e9a5672ab0af6ec..ee9b2cc5647dada772e5229ef9d08a477a5ad116 100644 --- a/runtime/starpu/codelets/codelet_ztslqt.c +++ b/runtime/starpu/codelets/codelet_ztslqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" #undef REAL @@ -100,7 +100,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztslqt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_ztsmlq.c b/runtime/starpu/codelets/codelet_ztsmlq.c index 397ed854b1c75ad92208673a845a5e8b6e7e6f49..5a9fd8b75093fcac223d52c5318eecda639db40e 100644 --- a/runtime/starpu/codelets/codelet_ztsmlq.c +++ b/runtime/starpu/codelets/codelet_ztsmlq.c @@ -24,7 +24,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -126,7 +126,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/codelets/codelet_ztsmlq_hetra1.c b/runtime/starpu/codelets/codelet_ztsmlq_hetra1.c index 7edf7a96603313ed9c8114fc44754b26440875bf..06d59f1808a8fddfd8f12eb7f1cbf8b29632f7d2 100644 --- a/runtime/starpu/codelets/codelet_ztsmlq_hetra1.c +++ b/runtime/starpu/codelets/codelet_ztsmlq_hetra1.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -26,7 +26,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_ztsmlq_hetra1(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_ztsmqr.c b/runtime/starpu/codelets/codelet_ztsmqr.c index a62ecd0273b901126c84796f14451c1bb5117c58..9ba352f7af0af20e631da89cee80a41dba234809 100644 --- a/runtime/starpu/codelets/codelet_ztsmqr.c +++ b/runtime/starpu/codelets/codelet_ztsmqr.c @@ -24,7 +24,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -126,7 +126,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/codelets/codelet_ztsmqr_hetra1.c b/runtime/starpu/codelets/codelet_ztsmqr_hetra1.c index 8a2955b117eed1acc60c9874a43271a23a766d1f..afe7ae97d534a6957c0b5524eae518b80f92d4f5 100644 --- a/runtime/starpu/codelets/codelet_ztsmqr_hetra1.c +++ b/runtime/starpu/codelets/codelet_ztsmqr_hetra1.c @@ -18,7 +18,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -26,7 +26,7 @@ * * @ingroup CORE_MORSE_Complex64_t * - **/ + */ void MORSE_TASK_ztsmqr_hetra1(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, int m1, int n1, int m2, int n2, int k, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_ztsqrt.c b/runtime/starpu/codelets/codelet_ztsqrt.c index 0b9642f6a559533a56cbe67214fb21f58af7ba5d..1f82cf8fc6189e6b897893f9cd97728bdd852925 100644 --- a/runtime/starpu/codelets/codelet_ztsqrt.c +++ b/runtime/starpu/codelets/codelet_ztsqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" #undef REAL @@ -89,7 +89,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_ztsqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_ztstrf.c b/runtime/starpu/codelets/codelet_ztstrf.c index 96634ceddc41de867ab372288473e62804c17377..116373281b7bac40852af48ad0bf4314a4ccf138 100644 --- a/runtime/starpu/codelets/codelet_ztstrf.c +++ b/runtime/starpu/codelets/codelet_ztstrf.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -91,7 +91,7 @@ * singular, and division by zero will occur if it is used * to solve a system of equations. * - ******************************************************************************/ + */ void MORSE_TASK_ztstrf(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zttlqt.c b/runtime/starpu/codelets/codelet_zttlqt.c index d07452b6f99c50cc2913be38802482e43932ac42..e3901fce40d0bf5af7231e077048f2cef32b7381 100644 --- a/runtime/starpu/codelets/codelet_zttlqt.c +++ b/runtime/starpu/codelets/codelet_zttlqt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -99,7 +99,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttlqt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zttmlq.c b/runtime/starpu/codelets/codelet_zttmlq.c index 9a6da19c37c206f0b2fd3d414e54714b1c55ece9..44f3d6a14a59b495c875b68ce20c7875ad5cd572 100644 --- a/runtime/starpu/codelets/codelet_zttmlq.c +++ b/runtime/starpu/codelets/codelet_zttmlq.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -118,7 +118,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/codelets/codelet_zttmqr.c b/runtime/starpu/codelets/codelet_zttmqr.c index 28e93440068010aacc94162a2b300c89fecbdd72..e25e68f45703b65b9afe1fb0481d7c50b471e6f3 100644 --- a/runtime/starpu/codelets/codelet_zttmqr.c +++ b/runtime/starpu/codelets/codelet_zttmqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -124,7 +124,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/codelets/codelet_zttqrt.c b/runtime/starpu/codelets/codelet_zttqrt.c index ab2fc8e0e82407ca3844469a8051d97b4e39c049..afee62a04449e8b4d8828e21c3cb239571c9a6ea 100644 --- a/runtime/starpu/codelets/codelet_zttqrt.c +++ b/runtime/starpu/codelets/codelet_zttqrt.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -99,7 +99,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zttqrt(const MORSE_option_t *options, int m, int n, int ib, int nb, diff --git a/runtime/starpu/codelets/codelet_zunmlq.c b/runtime/starpu/codelets/codelet_zunmlq.c index 1561bd7f406a180b2dbc046e9d0a847698c17f7f..f7d147ccf398685a80361a8810f02fadffeeb67e 100644 --- a/runtime/starpu/codelets/codelet_zunmlq.c +++ b/runtime/starpu/codelets/codelet_zunmlq.c @@ -23,7 +23,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -109,7 +109,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zunmlq(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/codelets/codelet_zunmqr.c b/runtime/starpu/codelets/codelet_zunmqr.c index d67036462e15c6a044fa79da44746da9ecbeed31..fe740bd88f0667d1edbdd6b1b64ba7e8dfd45785 100644 --- a/runtime/starpu/codelets/codelet_zunmqr.c +++ b/runtime/starpu/codelets/codelet_zunmqr.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" @@ -109,7 +109,7 @@ * \retval MORSE_SUCCESS successful exit * \retval <0 if -i, the i-th argument had an illegal value * - ******************************************************************************/ + */ void MORSE_TASK_zunmqr(const MORSE_option_t *options, MORSE_enum side, MORSE_enum trans, diff --git a/runtime/starpu/control/runtime_async.c b/runtime/starpu/control/runtime_async.c index 7c58b10766b270ff901c5fcbf39d049017db6180..153943f918aab87145b30a8e97412d079c3ada00 100644 --- a/runtime/starpu/control/runtime_async.c +++ b/runtime/starpu/control/runtime_async.c @@ -16,13 +16,13 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdlib.h> #include "chameleon_starpu.h" -/******************************************************************************* +/** * Create a sequence - **/ + */ int RUNTIME_sequence_create( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -31,9 +31,9 @@ int RUNTIME_sequence_create( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Destroy a sequence - **/ + */ int RUNTIME_sequence_destroy( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -42,9 +42,9 @@ int RUNTIME_sequence_destroy( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Wait for the completion of a sequence - **/ + */ int RUNTIME_sequence_wait( MORSE_context_t *morse, MORSE_sequence_t *sequence ) { @@ -62,9 +62,9 @@ int RUNTIME_sequence_wait( MORSE_context_t *morse, return MORSE_SUCCESS; } -/******************************************************************************* +/** * Terminate a sequence - **/ + */ void RUNTIME_sequence_flush( MORSE_context_t *morse, MORSE_sequence_t *sequence, MORSE_request_t *request, diff --git a/runtime/starpu/control/runtime_context.c b/runtime/starpu/control/runtime_context.c index c4578327bbcb5e9de7c8d330ddb17469b7a603b4..0dbaf64b846a77cfb071995cbc3cfcbc2a7caae7 100644 --- a/runtime/starpu/control/runtime_context.c +++ b/runtime/starpu/control/runtime_context.c @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdlib.h> #include "chameleon_starpu.h" @@ -32,9 +32,9 @@ int _starpu_is_initialized(void); #endif #endif -/******************************************************************************* +/** * Create new context - **/ + */ void RUNTIME_context_create( MORSE_context_t *morse ) { starpu_conf_t *conf; @@ -54,9 +54,9 @@ void RUNTIME_context_create( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Clean the context - **/ + */ void RUNTIME_context_destroy( MORSE_context_t *morse ) { /* StarPU was already initialized by an external library */ @@ -66,7 +66,7 @@ void RUNTIME_context_destroy( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * */ void RUNTIME_enable( MORSE_enum lever ) @@ -85,9 +85,9 @@ void RUNTIME_enable( MORSE_enum lever ) return; } -/******************************************************************************* +/** * - **/ + */ void RUNTIME_disable( MORSE_enum lever ) { switch (lever) diff --git a/runtime/starpu/control/runtime_control.c b/runtime/starpu/control/runtime_control.c index e8a8accd95535a03ed5a3eb6ff84f19cbf9cf1c0..82ba00606cb2ce1f24666a566461ecd902f50f11 100644 --- a/runtime/starpu/control/runtime_control.c +++ b/runtime/starpu/control/runtime_control.c @@ -17,14 +17,14 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_starpu.h" -/******************************************************************************* +/** * - **/ + */ int RUNTIME_init( MORSE_context_t *morse, int ncpus, int ncudas, @@ -114,7 +114,7 @@ int RUNTIME_init( MORSE_context_t *morse, return hres; } -/******************************************************************************* +/** * */ void RUNTIME_finalize( MORSE_context_t *morse ) @@ -138,9 +138,9 @@ void RUNTIME_finalize( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * To suspend the processing of new tasks by workers - **/ + */ void RUNTIME_pause( MORSE_context_t *morse ) { (void)morse; @@ -148,10 +148,10 @@ void RUNTIME_pause( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * This is the symmetrical call to RUNTIME_pause, * used to resume the workers polling for new tasks. - **/ + */ void RUNTIME_resume( MORSE_context_t *morse ) { (void)morse; @@ -159,9 +159,9 @@ void RUNTIME_resume( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Busy-waiting barrier - **/ + */ void RUNTIME_barrier( MORSE_context_t *morse ) { (void)morse; @@ -177,9 +177,9 @@ extern void (*update_progress_callback)(int, int); // no progress indicator for algorithms faster than 'PROGRESS_MINIMUM_DURATION' seconds #define PROGRESS_MINIMUM_DURATION 10 -/******************************************************************************* +/** * Display a progress information when executing the tasks - **/ + */ void RUNTIME_progress( MORSE_context_t *morse ) { int tasksLeft, current, timer = 0; @@ -213,27 +213,27 @@ void RUNTIME_progress( MORSE_context_t *morse ) return; } -/******************************************************************************* +/** * Thread rank. - **/ + */ int RUNTIME_thread_rank( MORSE_context_t *morse ) { (void)morse; return starpu_worker_get_id(); } -/******************************************************************************* +/** * Number of threads. - **/ + */ int RUNTIME_thread_size( MORSE_context_t *morse ) { (void)morse; return starpu_worker_get_count_by_type( STARPU_CPU_WORKER ); } -/******************************************************************************* +/** * The process rank - **/ + */ int RUNTIME_comm_rank( MORSE_context_t *morse ) { int rank = 0; @@ -250,9 +250,9 @@ int RUNTIME_comm_rank( MORSE_context_t *morse ) return rank; } -/******************************************************************************* +/** * This returns the size of the distributed computation - **/ + */ int RUNTIME_comm_size( MORSE_context_t *morse ) { int size; diff --git a/runtime/starpu/control/runtime_descriptor.c b/runtime/starpu/control/runtime_descriptor.c index b99de9935b67f807a5e0dbd39c29719ecef3f0a3..8196fe70a6359b26f60234796fa94edfdfcd6e3c 100644 --- a/runtime/starpu/control/runtime_descriptor.c +++ b/runtime/starpu/control/runtime_descriptor.c @@ -17,14 +17,14 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdlib.h> #include <unistd.h> #include "chameleon_starpu.h" -/******************************************************************************* +/** * Set the tag sizes - **/ + */ #if defined(CHAMELEON_USE_MPI) /* Take 24 bits for the tile id, and 7 bits for descriptor id. @@ -59,9 +59,9 @@ void RUNTIME_comm_set_tag_sizes( int user_tag_width, (void)user_tag_width; (void)user_tag_sep; } -/******************************************************************************* +/** * Malloc/Free of the data - **/ + */ #ifdef STARPU_MALLOC_SIMULATION_FOLDED #define FOLDED STARPU_MALLOC_SIMULATION_FOLDED #else @@ -93,9 +93,9 @@ void RUNTIME_free( void *ptr, #endif } -/******************************************************************************* +/** * Create data descriptor - **/ + */ void RUNTIME_desc_create( MORSE_desc_t *desc ) { int64_t lmt = desc->lmt; @@ -196,9 +196,9 @@ void RUNTIME_desc_create( MORSE_desc_t *desc ) #endif } -/******************************************************************************* +/** * Destroy data descriptor - **/ + */ void RUNTIME_desc_destroy( MORSE_desc_t *desc ) { desc->occurences--; @@ -243,9 +243,9 @@ void RUNTIME_desc_destroy( MORSE_desc_t *desc ) } } -/******************************************************************************* +/** * Acquire data - **/ + */ int RUNTIME_desc_acquire( const MORSE_desc_t *desc ) { starpu_data_handle_t *handle = (starpu_data_handle_t*)(desc->schedopt); @@ -269,9 +269,9 @@ int RUNTIME_desc_acquire( const MORSE_desc_t *desc ) return MORSE_SUCCESS; } -/******************************************************************************* +/** * Release data - **/ + */ int RUNTIME_desc_release( const MORSE_desc_t *desc ) { starpu_data_handle_t *handle = (starpu_data_handle_t*)(desc->schedopt); @@ -295,9 +295,9 @@ int RUNTIME_desc_release( const MORSE_desc_t *desc ) return MORSE_SUCCESS; } -/******************************************************************************* +/** * Flush cached data - **/ + */ void RUNTIME_flush() { #if defined(CHAMELEON_USE_MPI) @@ -305,7 +305,7 @@ void RUNTIME_flush() #endif } -/***************************************************************************** +/** * Different implementations of the flush call based on StarPU version */ #ifdef HAVE_STARPU_DATA_WONT_USE @@ -408,9 +408,9 @@ void RUNTIME_data_migrate( const MORSE_sequence_t *sequence, } #endif -/******************************************************************************* +/** * Get data addr - **/ + */ /* For older revision of StarPU, STARPU_MAIN_RAM is not defined */ #ifndef STARPU_MAIN_RAM #define STARPU_MAIN_RAM 0 diff --git a/runtime/starpu/control/runtime_options.c b/runtime/starpu/control/runtime_options.c index 8e341df71e532a559d5b03eb93fcc1b71299f19a..752012fefaa55113d1f1ff23951fdd0ea41373b0 100644 --- a/runtime/starpu/control/runtime_options.c +++ b/runtime/starpu/control/runtime_options.c @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <stdio.h> #include <stdlib.h> #include "chameleon_starpu.h" diff --git a/runtime/starpu/control/runtime_profiling.c b/runtime/starpu/control/runtime_profiling.c index ef7f266afcf04d58ad02ea5364adec996539639f..12392456e1c3899cfbb35fdb68348fdf77b092ed 100644 --- a/runtime/starpu/control/runtime_profiling.c +++ b/runtime/starpu/control/runtime_profiling.c @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #include <math.h> #include "chameleon_starpu.h" #if defined(HAVE_STARPU_FXT_PROFILING) @@ -35,9 +35,9 @@ double RUNTIME_get_time(){ return starpu_timing_now()*1e-6; } -/******************************************************************************* +/** * Set iteration numbers for traces - **/ + */ void RUNTIME_iteration_push( MORSE_context_t *morse, unsigned long iteration ) { (void)morse; diff --git a/runtime/starpu/control/runtime_workspace.c b/runtime/starpu/control/runtime_workspace.c index ae15829b0d61091e295b7ca86efe2aa317232727..84ecd9515f1a398dec7a85aec8243df30574e933 100644 --- a/runtime/starpu/control/runtime_workspace.c +++ b/runtime/starpu/control/runtime_workspace.c @@ -16,7 +16,7 @@ * @author Mathieu Faverge * @date 2011-06-01 * - **/ + */ #include "chameleon_starpu.h" static void RUNTIME_allocate_workspace_on_workers(void *arg) diff --git a/runtime/starpu/control/runtime_zlocality.c b/runtime/starpu/control/runtime_zlocality.c index 30bd9be56713ee6ceae85d6c914c7c6a0937d7bb..56b7ba92afe92d9c38ea9fc8480b6d394f83896e 100644 --- a/runtime/starpu/control/runtime_zlocality.c +++ b/runtime/starpu/control/runtime_zlocality.c @@ -18,7 +18,7 @@ * @date 2011-06-01 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/control/runtime_zprofiling.c b/runtime/starpu/control/runtime_zprofiling.c index 10879431e21e49946bd6695c277fd28fed4c813c..610512d5d1562828144adc4388d6edef6121163d 100644 --- a/runtime/starpu/control/runtime_zprofiling.c +++ b/runtime/starpu/control/runtime_zprofiling.c @@ -18,7 +18,7 @@ * @date 2011-06-01 * @precisions normal z -> s d c * - **/ + */ #include "chameleon_starpu.h" #include "runtime_codelet_z.h" diff --git a/runtime/starpu/include/chameleon_starpu.h.in b/runtime/starpu/include/chameleon_starpu.h.in index 027118ac7cf038f68a82bc4c898e1ae5a00ffa04..ddb4ede45ee9078d4bf6f5034ad545f2d94bd21b 100644 --- a/runtime/starpu/include/chameleon_starpu.h.in +++ b/runtime/starpu/include/chameleon_starpu.h.in @@ -17,7 +17,7 @@ * @author Florent Pruvost * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_STARPU_H_ #define _MORSE_STARPU_H_ @@ -72,7 +72,7 @@ typedef struct starpu_conf starpu_conf_t; -/******************************************************************************/ +/**/ /* * MPI Redefinitions diff --git a/runtime/starpu/include/runtime_codelet_profile.h b/runtime/starpu/include/runtime_codelet_profile.h index 78e56dd39f138f2658f879fafbe84c1fc243d66c..88fa98da4802e603e196ae80195fc57e76a327eb 100644 --- a/runtime/starpu/include/runtime_codelet_profile.h +++ b/runtime/starpu/include/runtime_codelet_profile.h @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef __CODELET_PROFILE_H__ #define __CODELET_PROFILE_H__ diff --git a/runtime/starpu/include/runtime_codelet_z.h b/runtime/starpu/include/runtime_codelet_z.h index 0226ae60a384ec0814a4a198a9456bdada59fef1..c5a1677425bf342847fde84eba329612829e4933 100644 --- a/runtime/starpu/include/runtime_codelet_z.h +++ b/runtime/starpu/include/runtime_codelet_z.h @@ -18,7 +18,7 @@ * @date 2011-06-01 * @precisions normal z -> c d s * - **/ + */ #ifndef _CODELETS_Z_H_ #define _CODELETS_Z_H_ diff --git a/runtime/starpu/include/runtime_codelets.h b/runtime/starpu/include/runtime_codelets.h index ee360f337b00d45fe01526ded4d5a351ab8eebfa..ee8bdf9b0025399c36bba912457b52b242233a70 100644 --- a/runtime/starpu/include/runtime_codelets.h +++ b/runtime/starpu/include/runtime_codelets.h @@ -17,7 +17,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _CODELETS_H_ #define _CODELETS_H_ diff --git a/runtime/starpu/include/runtime_profiling.h b/runtime/starpu/include/runtime_profiling.h index b60453bb79846975a2c0983a10ed659d41593a7b..ee079520059f969527677140dd51e54a2c90b97d 100644 --- a/runtime/starpu/include/runtime_profiling.h +++ b/runtime/starpu/include/runtime_profiling.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2011-06-01 * - **/ + */ #ifndef _PROFILING_H_ #define _PROFILING_H_ diff --git a/runtime/starpu/include/runtime_workspace.h b/runtime/starpu/include/runtime_workspace.h index 8c3efcd39d00b9dd93a8e63224a96dd04fcba540..99db679eb6ce4905d9c4db3347b442d0ccd48fce 100644 --- a/runtime/starpu/include/runtime_workspace.h +++ b/runtime/starpu/include/runtime_workspace.h @@ -15,7 +15,7 @@ * @author Cedric Augonnet * @date 2011-06-01 * - **/ + */ #ifndef _MORSE_STARPU_WORKSPACE_H_ #define _MORSE_STARPU_WORKSPACE_H_ diff --git a/testing/testing_zauxiliary.c b/testing/testing_zauxiliary.c index ee832144fa883e5f3bf795b795a17c730de2c996..cf2db1c2c4d82b719048ee84f87e470b1fe4668f 100644 --- a/testing/testing_zauxiliary.c +++ b/testing/testing_zauxiliary.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zauxiliary.h b/testing/testing_zauxiliary.h index 09959c3fbe87e2f5c91822f4c3a5118c5694e46c..0d5a9bfffffa26b9c7069b76aa7b6d9f2f79f2e1 100644 --- a/testing/testing_zauxiliary.h +++ b/testing/testing_zauxiliary.h @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #ifndef TESTING_ZAUXILIARY_H #define TESTING_ZAUXILIARY_H diff --git a/testing/testing_zgeadd.c b/testing/testing_zgeadd.c index 731f7e4f14e748f8a93669ab4b00d5132ef72b12..b6744ecd6c286b62ce22bfa4eee48f6730121080 100644 --- a/testing/testing_zgeadd.c +++ b/testing/testing_zgeadd.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgels.c b/testing/testing_zgels.c index d8d7322b21f681fae011536fe7c9a3ba29faddf2..51859d37cc0545a8fc6e06112450c34f64d074e1 100644 --- a/testing/testing_zgels.c +++ b/testing/testing_zgels.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgels_hqr.c b/testing/testing_zgels_hqr.c index 61c3a9cb38d5e72503ba5fcca340b820daf5bc56..97c32a77107601dfab5f3574f8a7cac8c1b88d3e 100644 --- a/testing/testing_zgels_hqr.c +++ b/testing/testing_zgels_hqr.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgels_systolic.c b/testing/testing_zgels_systolic.c index cdd071b8ae57b788903fc7b71faa64de94f02434..9726b5a59ec7414566b0fa24e5070f8e14730bbf 100644 --- a/testing/testing_zgels_systolic.c +++ b/testing/testing_zgels_systolic.c @@ -17,7 +17,7 @@ * @date 2017-05-17 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgemm.c b/testing/testing_zgemm.c index 562f2a81a11a94e5684c6a1f7645088a287a8d3f..ec2948c5154e2b2ca31ed5217b2305bf906a1e5d 100644 --- a/testing/testing_zgemm.c +++ b/testing/testing_zgemm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgeqrf_qdwh.c b/testing/testing_zgeqrf_qdwh.c index e2433001706ca463e34960df71020b6b20fec15c..c669f21675c0641346203fd777fd6c31cb997bc5 100644 --- a/testing/testing_zgeqrf_qdwh.c +++ b/testing/testing_zgeqrf_qdwh.c @@ -22,7 +22,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgesv_incpiv.c b/testing/testing_zgesv_incpiv.c index 608301d4ca6bf4d83eb04578754fb8df1000d25a..dcc2a25d2687bae71baff909b0f192ad9930fe4e 100644 --- a/testing/testing_zgesv_incpiv.c +++ b/testing/testing_zgesv_incpiv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zgesvd.c b/testing/testing_zgesvd.c index 56226e66486fce7be270a64578030c9071d770a8..310b09224d95bf713d2de64ff0362bc34d01630e 100644 --- a/testing/testing_zgesvd.c +++ b/testing/testing_zgesvd.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zheevd.c b/testing/testing_zheevd.c index 8d240f89172c2819ace90190b2e8c378d4dbcd21..8c8bcb5d45a3889d03efb79540e1f1c9810b3db8 100644 --- a/testing/testing_zheevd.c +++ b/testing/testing_zheevd.c @@ -17,7 +17,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zhemm.c b/testing/testing_zhemm.c index f74bb0e9345a6823fe4d4d208f9a79e5729c5fc2..6767c34599646befa96f7164300c912d45cd27ce 100644 --- a/testing/testing_zhemm.c +++ b/testing/testing_zhemm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zher2k.c b/testing/testing_zher2k.c index e2a8dab15e3324a99a8e49b13ebc190861e3b426..f204121124770f6196afa46944be6ffec7ac609c 100644 --- a/testing/testing_zher2k.c +++ b/testing/testing_zher2k.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zherk.c b/testing/testing_zherk.c index e71272070b7788facbd0ea629ba4e063b2268287..2ee63f3e4b420562e30f2dc4373006dc867b06d1 100644 --- a/testing/testing_zherk.c +++ b/testing/testing_zherk.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zlange.c b/testing/testing_zlange.c index 1e2eb9f125a5ea6dc919548da944dad4403c3f44..8921f7c0ed93d9bb65c1b6e183b42727ae4b345f 100644 --- a/testing/testing_zlange.c +++ b/testing/testing_zlange.c @@ -19,7 +19,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zpemv.c b/testing/testing_zpemv.c index 01dc6c7ee95e04a92185de2fabf238f857f71af6..a816862ddccb8d07a48fae948a98c1a025a7539d 100644 --- a/testing/testing_zpemv.c +++ b/testing/testing_zpemv.c @@ -19,7 +19,7 @@ * @date 2011-10-06 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zposv.c b/testing/testing_zposv.c index 18c944ac47f593e7cdb0dfc980c2161058f091a7..82e0d5e26ffa7eade5aacb343e587078c3a66d56 100644 --- a/testing/testing_zposv.c +++ b/testing/testing_zposv.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zpotri.c b/testing/testing_zpotri.c index b755356ad90fdaa21879e8e6e9ebc6cf4c546a64..f16dccb77b569e3f9d6e8db2508dd685d0f3e526 100644 --- a/testing/testing_zpotri.c +++ b/testing/testing_zpotri.c @@ -21,7 +21,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zsymm.c b/testing/testing_zsymm.c index 970a5ee1f0bcbc95f6c1d2977937020a4f19b1ae..46c156123487b9e2f87ace978cf8e49b541ac6e0 100644 --- a/testing/testing_zsymm.c +++ b/testing/testing_zsymm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zsyr2k.c b/testing/testing_zsyr2k.c index e228cd78fa8bd16c0d972c4dfd7f062b4d953dcb..c4f1a8a4e80d16fd34309560aca2b8f7451cbf55 100644 --- a/testing/testing_zsyr2k.c +++ b/testing/testing_zsyr2k.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_zsyrk.c b/testing/testing_zsyrk.c index 9063e6cf845a06d9b34ccabab2f7219082858dd1..33afc77d1c930604c1b21f947b8b9b346d948364 100644 --- a/testing/testing_zsyrk.c +++ b/testing/testing_zsyrk.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_ztrmm.c b/testing/testing_ztrmm.c index 73363c483bbfb86b5f01798893700f665e626a0d..a6a0586354a3acfe2444f4853dcf31a3f3007a35 100644 --- a/testing/testing_ztrmm.c +++ b/testing/testing_ztrmm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/testing/testing_ztrsm.c b/testing/testing_ztrsm.c index 5bb53612c5ee614eb1064a3ff3457427c3c28bf8..ba6110955e7575d89580bceb60f6c56fda42c126 100644 --- a/testing/testing_ztrsm.c +++ b/testing/testing_ztrsm.c @@ -20,7 +20,7 @@ * @date 2010-11-15 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/timing/flops.h b/timing/flops.h index e200046bd67af17493e4741d8eda056c148e0803..a13f1d6cb45234a1cbd3b0f9d03fb3ce6a02cca6 100644 --- a/timing/flops.h +++ b/timing/flops.h @@ -16,7 +16,7 @@ * @author Cedric Castagnede * @date 2010-12-20 * - **/ + */ /* * This file provide the flops formula for all Level 3 BLAS and some * Lapack routines. Each macro uses the same size parameters as the @@ -31,9 +31,9 @@ #ifndef _FLOPS_H_ #define _FLOPS_H_ -/************************************************************************ +/** * Generic formula coming from LAWN 41 - ***********************************************************************/ + */ /* * Level 2 BLAS @@ -166,9 +166,9 @@ : ((double)(__m) * ((double)(__m) * (2. * (double)(__n) - 2./3. * (double)(__m) + 1. ) - (double)(__n) + 5./3.)) ) -/******************************************************************************* +/** * Users functions - ******************************************************************************/ + */ /* * Level 2 BLAS diff --git a/timing/time_zgelqf.c b/timing/time_zgelqf.c index 6fa22621d38106941f165af6daa9a456f542b35e..e5ed56b72218a2b8b3bd7f8781bd64b078426ee5 100644 --- a/timing/time_zgelqf.c +++ b/timing/time_zgelqf.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgelqf_tile.c b/timing/time_zgelqf_tile.c index d9c1cc420be2c37755895f18c73bc6e72e893f8a..2234f90f311bca235c3c71588ebfc8d9a3cb6b1f 100644 --- a/timing/time_zgelqf_tile.c +++ b/timing/time_zgelqf_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgels.c b/timing/time_zgels.c index 957edeeab77600b821cecd0c93384f6da03b6be3..c905b4a8adcddb5b40710f8371042ba83131f8ec 100644 --- a/timing/time_zgels.c +++ b/timing/time_zgels.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgels_tile.c b/timing/time_zgels_tile.c index 9e1bd69d33e5e3f1a438f8cd2fc5b16277f946e4..cc61b2f210d5cf1b1ab9bae0c1890c07907aba89 100644 --- a/timing/time_zgels_tile.c +++ b/timing/time_zgels_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgemm.c b/timing/time_zgemm.c index 4f16fb6e3d4a5249a56daf82a7cc1bcca86a40d2..bf64498e94ed73efb9356dbe7fddf32618966ed5 100644 --- a/timing/time_zgemm.c +++ b/timing/time_zgemm.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgemm_tile.c b/timing/time_zgemm_tile.c index 40f1a652b0d50bfb583655bb60788ecba4b9001e..4936a1a1ff14e8a0ee469d53dccc1d65d536de06 100644 --- a/timing/time_zgemm_tile.c +++ b/timing/time_zgemm_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgeqrf.c b/timing/time_zgeqrf.c index 3cab8768911539b83c2eebe332f303bce0770e2e..6e0423b5def850c01eeea9bd63752dc4d839d165 100644 --- a/timing/time_zgeqrf.c +++ b/timing/time_zgeqrf.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgeqrf_hqr.c b/timing/time_zgeqrf_hqr.c index e795f394f55a836248d8a766189f32857614887c..0bb4afb4fa6dca93447b1d63c106f2272980fb95 100644 --- a/timing/time_zgeqrf_hqr.c +++ b/timing/time_zgeqrf_hqr.c @@ -15,7 +15,7 @@ * @date 2017-06-08 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgeqrf_hqr_tile.c b/timing/time_zgeqrf_hqr_tile.c index e4247b41b3a30f0c7b82c5c55ec95807131ec4c4..5f5cbf74f3335dc5eba973e031c22c8d3c1a1bc6 100644 --- a/timing/time_zgeqrf_hqr_tile.c +++ b/timing/time_zgeqrf_hqr_tile.c @@ -15,7 +15,7 @@ * @date 2017-06-08 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgeqrf_tile.c b/timing/time_zgeqrf_tile.c index a746defc68bc2df4dbe1d452d26201ab2976003d..fb9cfa4ea30d778dd423b630011fbbecc4040d98 100644 --- a/timing/time_zgeqrf_tile.c +++ b/timing/time_zgeqrf_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgeqrs_tile.c b/timing/time_zgeqrs_tile.c index eed614f822f341c6e87736953a3f7f3641d4f584..4dbca75f9f440460edbd1dfa81ee48f29e73f387 100644 --- a/timing/time_zgeqrs_tile.c +++ b/timing/time_zgeqrs_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgesv_incpiv.c b/timing/time_zgesv_incpiv.c index 3c9a64805fa60bd669439e797cdc5a578e63f5fa..00a68985347f948a4b278a26e4deb14596712064 100644 --- a/timing/time_zgesv_incpiv.c +++ b/timing/time_zgesv_incpiv.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgesv_incpiv_tile.c b/timing/time_zgesv_incpiv_tile.c index 3b409f7bf23982bee82a293b728df318c93e8c72..825bdc8e5bc56d03afa5c0aee0ed644f8bac60bf 100644 --- a/timing/time_zgesv_incpiv_tile.c +++ b/timing/time_zgesv_incpiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgesv_nopiv.c b/timing/time_zgesv_nopiv.c index 38c75c1f9d0362654a34c1f2dc6bcc1a225e8ddc..a1df5e56f6482cec6cb830400d841df99316e9e7 100644 --- a/timing/time_zgesv_nopiv.c +++ b/timing/time_zgesv_nopiv.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgesv_nopiv_tile.c b/timing/time_zgesv_nopiv_tile.c index 3e3073b37d89b09fdbd1fbd84be5d7eeba370423..d41cef9f40c0257652ee873bf3b35043ccad80c2 100644 --- a/timing/time_zgesv_nopiv_tile.c +++ b/timing/time_zgesv_nopiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgesvd_tile.c b/timing/time_zgesvd_tile.c index 6655cc07877d2aba50fb1e4cd135413da55053c8..b7c8f2e86f4942208f8591b1961994da99d3feee 100644 --- a/timing/time_zgesvd_tile.c +++ b/timing/time_zgesvd_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrf_incpiv.c b/timing/time_zgetrf_incpiv.c index 177aade93bb67d8eea75091bdd82a85a53be451f..e50581076424c177d8f7e2eaf19224808661db60 100644 --- a/timing/time_zgetrf_incpiv.c +++ b/timing/time_zgetrf_incpiv.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrf_incpiv_tile.c b/timing/time_zgetrf_incpiv_tile.c index db5b020c90196fe6798228e509e485989a634067..0d2f8ba536a8e3708dc5f505a0e53e8f650209e8 100644 --- a/timing/time_zgetrf_incpiv_tile.c +++ b/timing/time_zgetrf_incpiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrf_nopiv.c b/timing/time_zgetrf_nopiv.c index fdd5b7ef97cb36c0c0f88eb0ebb41cc2024b68cb..6806c6c8a3308f9cb1a7386700f3340ad43acf94 100644 --- a/timing/time_zgetrf_nopiv.c +++ b/timing/time_zgetrf_nopiv.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrf_nopiv_tile.c b/timing/time_zgetrf_nopiv_tile.c index 7eab3076800e6e41bfe4393094bb6731de07ff71..bcb0173c3debc635bbbce2646b4b8ad5e1d958fc 100644 --- a/timing/time_zgetrf_nopiv_tile.c +++ b/timing/time_zgetrf_nopiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetri_tile.c b/timing/time_zgetri_tile.c index f1dc36375219f86e1110591dab5ab11e54bbcc14..84bace17ff21609ef4d82373fe6dad5c45f4be36 100644 --- a/timing/time_zgetri_tile.c +++ b/timing/time_zgetri_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrs_incpiv_tile.c b/timing/time_zgetrs_incpiv_tile.c index bd79330482feea08fdc069e5a71bf9e9824dbb4f..2ada8ece1c226401bcb2fa129b027ff03e2cea91 100644 --- a/timing/time_zgetrs_incpiv_tile.c +++ b/timing/time_zgetrs_incpiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zgetrs_nopiv_tile.c b/timing/time_zgetrs_nopiv_tile.c index c91f02d14aafb7d444470074544c0366f80f7b9d..abca3941174b6276fb404ca36c4f60b4c397170d 100644 --- a/timing/time_zgetrs_nopiv_tile.c +++ b/timing/time_zgetrs_nopiv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zheevd_tile.c b/timing/time_zheevd_tile.c index b7206da1550a9e34790b9eab877475b9b26eeafe..c81341b1dc2b810032fc65311b8c262d7a360ac9 100644 --- a/timing/time_zheevd_tile.c +++ b/timing/time_zheevd_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zlange.c b/timing/time_zlange.c index ad11703b8fe89365ae9a999da850d85f2d1ff4ed..42874b184f3a7676288d8c33d16fd72d3692dae3 100644 --- a/timing/time_zlange.c +++ b/timing/time_zlange.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zlange_tile.c b/timing/time_zlange_tile.c index 38bdb7e1e42b445e38c194684d9ae8bf7ca3ee91..4ffe9e77a1768e282577f9816e333a667de77326 100644 --- a/timing/time_zlange_tile.c +++ b/timing/time_zlange_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zposv.c b/timing/time_zposv.c index b9158989960df3a3823132b6fb34084dd8935e45..fc9183c58dfcbdaef791bacf7b85d4e9b872e744 100644 --- a/timing/time_zposv.c +++ b/timing/time_zposv.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zposv_tile.c b/timing/time_zposv_tile.c index d851edcae1b1519fa903ff9499b29c326a44c6ee..fa4a6196a6e6f3b051f7dce80d7090a3862b8c5b 100644 --- a/timing/time_zposv_tile.c +++ b/timing/time_zposv_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zpotrf.c b/timing/time_zpotrf.c index 71778ef230efaf61a142438154afe1473dbdab30..9baf6e3fe8288776f0891bb526e52656b502e885 100644 --- a/timing/time_zpotrf.c +++ b/timing/time_zpotrf.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zpotrf_tile.c b/timing/time_zpotrf_tile.c index 0c7a091b5a659de4fe2e91910718993fc476ea9c..eb69d0cc4c0750719b145774e51faad1bed705ec 100644 --- a/timing/time_zpotrf_tile.c +++ b/timing/time_zpotrf_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zpotri_tile.c b/timing/time_zpotri_tile.c index 5d3e6756b8d304f1e9d277112c651b29c5932b8b..906c2de8d0a4b8e47e444c8247fdd3f224d7278f 100644 --- a/timing/time_zpotri_tile.c +++ b/timing/time_zpotri_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zpotrs_tile.c b/timing/time_zpotrs_tile.c index fb9d58dc91b76b0acaf565a718d80e78beb806c5..5e78980c4d189b3d53bab142478e6641f4ca7fb8 100644 --- a/timing/time_zpotrs_tile.c +++ b/timing/time_zpotrs_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_zsytrf_tile.c b/timing/time_zsytrf_tile.c index 99671ea33f74ddd99007a6b3f72b30b151242da5..796050f6faa94c21ab3fbe18403f233bda6da7a6 100644 --- a/timing/time_zsytrf_tile.c +++ b/timing/time_zsytrf_tile.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/time_ztrsm.c b/timing/time_ztrsm.c index 48b07720418d9d9637308993cf6fd1cdc3da9247..0785479ae86b6ee83bbc82c9d19c7a91a66dae9f 100644 --- a/timing/time_ztrsm.c +++ b/timing/time_ztrsm.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #define _TYPE MORSE_Complex64_t #define _PREC double #define _LAMCH LAPACKE_dlamch_work diff --git a/timing/timing.c b/timing/timing.c index b1625f620d7a65f97e6b9678137a63ef67ea329d..ca5f3d1b7e646f46f4f086963a1c32b5e8805950 100644 --- a/timing/timing.c +++ b/timing/timing.c @@ -18,7 +18,7 @@ * @author Cedric Castagnede * @date 2010-11-15 * - **/ + */ #if defined( _WIN32 ) || defined( _WIN64 ) #define int64_t __int64 #endif diff --git a/timing/timing.h b/timing/timing.h index aa2eda72c3c9e8542c8f1b13d01ae7da73bf54ab..9eb12fdbcd6164f1ead0c590e83468287ebe0348 100644 --- a/timing/timing.h +++ b/timing/timing.h @@ -9,7 +9,7 @@ * * @version 1.0.0 * - **/ + */ #ifndef TIMING_H #define TIMING_H @@ -166,7 +166,7 @@ enum dparam_timing { memcpy(_name_, _orig_, (_lda_) * (_n_) * sizeof(_type_) ); \ } -/********************* +/** * * Macro for trace generation * @@ -189,7 +189,7 @@ enum dparam_timing { MORSE_Disable(MORSE_BOUND); \ } -/********************* +/** * * Macro for DAG generation * @@ -207,7 +207,7 @@ enum dparam_timing { #define STOP_DAG() do {} while(0); #endif -/********************* +/** * * Synchro for distributed computations * @@ -220,7 +220,7 @@ enum dparam_timing { #define STOP_DISTRIBUTED() do {} while(0); #endif -/********************* +/** * * General Macros for timing * diff --git a/timing/timing_zauxiliary.c b/timing/timing_zauxiliary.c index b505b9359b8023fb77eb5242d6f7c484aaa68609..7ec7fe38ccb759c8c4d5e49c4b5c5362dc842fa2 100644 --- a/timing/timing_zauxiliary.c +++ b/timing/timing_zauxiliary.c @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #include <stdlib.h> #include <stdio.h> #include <string.h> diff --git a/timing/timing_zauxiliary.h b/timing/timing_zauxiliary.h index a49c84ab0ac395bfecb25b6cda6c86010766314d..b9cce4bb9e14566c698919909df5371686a5352b 100644 --- a/timing/timing_zauxiliary.h +++ b/timing/timing_zauxiliary.h @@ -12,7 +12,7 @@ * @version 1.0.0 * @precisions normal z -> c d s * - **/ + */ #ifndef TIMING_ZAUXILIARY_H #define TIMING_ZAUXILIARY_H