Mentions légales du service

Skip to content
Snippets Groups Projects
Commit c27ce41a authored by Mathieu Faverge's avatar Mathieu Faverge
Browse files

Minor

parent cbc1b247
No related branches found
No related tags found
1 merge request!78Cleanup - Lapack to tile
...@@ -84,7 +84,7 @@ ...@@ -84,7 +84,7 @@
******************************************************************************/ ******************************************************************************/
int MORSE_zbuild( MORSE_enum uplo, int M, int N, int MORSE_zbuild( MORSE_enum uplo, int M, int N,
MORSE_Complex64_t *A, int LDA, MORSE_Complex64_t *A, int LDA,
void *user_data, void* user_build_callback) void *user_data, void* user_build_callback )
{ {
int NB; int NB;
int status; int status;
...@@ -259,7 +259,7 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A, ...@@ -259,7 +259,7 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A,
int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A,
void *user_data, void* user_build_callback, void *user_data, void* user_build_callback,
MORSE_sequence_t *sequence, MORSE_sequence_t *sequence,
MORSE_request_t *request) MORSE_request_t *request )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
...@@ -289,8 +289,9 @@ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A, ...@@ -289,8 +289,9 @@ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t *A,
} }
/* Quick return */ /* Quick return */
if (chameleon_min( A->m, A->n ) == 0) if (chameleon_min( A->m, A->n ) == 0) {
return MORSE_SUCCESS; return MORSE_SUCCESS;
}
morse_pzbuild( uplo, A, user_data, user_build_callback, sequence, request ); morse_pzbuild( uplo, A, user_data, user_build_callback, sequence, request );
......
...@@ -182,7 +182,7 @@ int MORSE_zgelqf(int M, int N, ...@@ -182,7 +182,7 @@ int MORSE_zgelqf(int M, int N,
* @sa MORSE_zgelqs_Tile * @sa MORSE_zgelqs_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgelqf_Tile(MORSE_desc_t *A, MORSE_desc_t *T) int MORSE_zgelqf_Tile( MORSE_desc_t *A, MORSE_desc_t *T )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -179,7 +179,7 @@ int MORSE_zgelqf_param(const libhqr_tree_t *qrtree, int M, int N, ...@@ -179,7 +179,7 @@ int MORSE_zgelqf_param(const libhqr_tree_t *qrtree, int M, int N,
* @sa MORSE_zgelqs_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) int MORSE_zgelqf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -203,7 +203,7 @@ int MORSE_zgelqs(int M, int N, int NRHS, ...@@ -203,7 +203,7 @@ int MORSE_zgelqs(int M, int N, int NRHS,
* @sa MORSE_zgelqf_Tile * @sa MORSE_zgelqf_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgelqs_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B) int MORSE_zgelqs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -208,7 +208,7 @@ int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS, ...@@ -208,7 +208,7 @@ int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
* @sa MORSE_zgelqf_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) int MORSE_zgelqs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -181,7 +181,7 @@ int MORSE_zgeqrf(int M, int N, ...@@ -181,7 +181,7 @@ int MORSE_zgeqrf(int M, int N,
* @sa MORSE_zgeqrs_Tile * @sa MORSE_zgeqrs_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgeqrf_Tile(MORSE_desc_t *A, MORSE_desc_t *T) int MORSE_zgeqrf_Tile( MORSE_desc_t *A, MORSE_desc_t *T )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -188,7 +188,7 @@ int MORSE_zgeqrf_param(const libhqr_tree_t *qrtree, int M, int N, ...@@ -188,7 +188,7 @@ int MORSE_zgeqrf_param(const libhqr_tree_t *qrtree, int M, int N,
* @sa MORSE_zgeqrs_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) int MORSE_zgeqrf_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -202,7 +202,7 @@ int MORSE_zgeqrs(int M, int N, int NRHS, ...@@ -202,7 +202,7 @@ int MORSE_zgeqrs(int M, int N, int NRHS,
* @sa MORSE_zgeqrf_Tile * @sa MORSE_zgeqrf_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgeqrs_Tile(MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B) int MORSE_zgeqrs_Tile( MORSE_desc_t *A, MORSE_desc_t *T, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -197,7 +197,7 @@ int MORSE_zgeqrs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS, ...@@ -197,7 +197,7 @@ int MORSE_zgeqrs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
* @sa MORSE_zgeqrf_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) int MORSE_zgeqrs_param_Tile( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_desc_t *TS, MORSE_desc_t *TT, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -207,7 +207,7 @@ int MORSE_zgesv_incpiv(int N, int NRHS, ...@@ -207,7 +207,7 @@ int MORSE_zgesv_incpiv(int N, int NRHS,
* @sa MORSE_zcgesv_Tile * @sa MORSE_zcgesv_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgesv_incpiv_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B) int MORSE_zgesv_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -199,7 +199,7 @@ int MORSE_zgesv_nopiv(int N, int NRHS, ...@@ -199,7 +199,7 @@ int MORSE_zgesv_nopiv(int N, int NRHS,
* @sa MORSE_zcgesv_Tile * @sa MORSE_zcgesv_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgesv_nopiv_Tile(MORSE_desc_t *A, MORSE_desc_t *B) int MORSE_zgesv_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -186,7 +186,7 @@ int MORSE_zgetrf_incpiv(int M, int N, ...@@ -186,7 +186,7 @@ int MORSE_zgetrf_incpiv(int M, int N,
* @sa MORSE_zgetrs_incpiv_Tile * @sa MORSE_zgetrs_incpiv_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgetrf_incpiv_Tile(MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV) int MORSE_zgetrf_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -172,7 +172,7 @@ int MORSE_zgetrf_nopiv(int M, int N, ...@@ -172,7 +172,7 @@ int MORSE_zgetrf_nopiv(int M, int N,
* @sa MORSE_zgetrs_Tile * @sa MORSE_zgetrs_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgetrf_nopiv_Tile(MORSE_desc_t *A) int MORSE_zgetrf_nopiv_Tile( MORSE_desc_t *A )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -211,7 +211,7 @@ int MORSE_zgetrs_incpiv(MORSE_enum trans, int N, int NRHS, ...@@ -211,7 +211,7 @@ int MORSE_zgetrs_incpiv(MORSE_enum trans, int N, int NRHS,
* @sa MORSE_zgetrf_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) int MORSE_zgetrs_incpiv_Tile( MORSE_desc_t *A, MORSE_desc_t *L, int *IPIV, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -199,7 +199,7 @@ int MORSE_zgetrs_nopiv(MORSE_enum trans, int N, int NRHS, ...@@ -199,7 +199,7 @@ int MORSE_zgetrs_nopiv(MORSE_enum trans, int N, int NRHS,
* @sa MORSE_zgetrf_nopiv_Tile * @sa MORSE_zgetrf_nopiv_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zgetrs_nopiv_Tile(MORSE_desc_t *A, MORSE_desc_t *B) int MORSE_zgetrs_nopiv_Tile( MORSE_desc_t *A, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -197,7 +197,7 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N, ...@@ -197,7 +197,7 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N,
* @sa MORSE_slacpy_Tile * @sa MORSE_slacpy_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zlacpy_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) int MORSE_zlacpy_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -183,7 +183,7 @@ int MORSE_zlauum(MORSE_enum uplo, int N, ...@@ -183,7 +183,7 @@ int MORSE_zlauum(MORSE_enum uplo, int N,
* @sa MORSE_zpotri_Tile * @sa MORSE_zpotri_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zlauum_Tile(MORSE_enum uplo, MORSE_desc_t *A) int MORSE_zlauum_Tile( MORSE_enum uplo, MORSE_desc_t *A )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -225,7 +225,7 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS, ...@@ -225,7 +225,7 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS,
* @sa MORSE_sposv_Tile * @sa MORSE_sposv_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zposv_Tile(MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B) int MORSE_zposv_Tile( MORSE_enum uplo, MORSE_desc_t *A, MORSE_desc_t *B )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -195,7 +195,7 @@ int MORSE_zpotrf(MORSE_enum uplo, int N, ...@@ -195,7 +195,7 @@ int MORSE_zpotrf(MORSE_enum uplo, int N,
* @sa MORSE_zpotrs_Tile * @sa MORSE_zpotrs_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zpotrf_Tile(MORSE_enum uplo, MORSE_desc_t *A) int MORSE_zpotrf_Tile( MORSE_enum uplo, MORSE_desc_t *A )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
...@@ -183,7 +183,7 @@ int MORSE_zpotri(MORSE_enum uplo, int N, ...@@ -183,7 +183,7 @@ int MORSE_zpotri(MORSE_enum uplo, int N,
* @sa MORSE_zpotrf_Tile * @sa MORSE_zpotrf_Tile
* *
******************************************************************************/ ******************************************************************************/
int MORSE_zpotri_Tile(MORSE_enum uplo, MORSE_desc_t *A) int MORSE_zpotri_Tile( MORSE_enum uplo, MORSE_desc_t *A )
{ {
MORSE_context_t *morse; MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL; MORSE_sequence_t *sequence = NULL;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment