diff --git a/compute/pzgetrf_nopiv.c b/compute/pzgetrf_nopiv.c index daac4bad9652cd1512b023431c5ad1b325cd8c5c..fe5bdaeec7f8930f5bf326d195348225ae3abbb1 100644 --- a/compute/pzgetrf_nopiv.c +++ b/compute/pzgetrf_nopiv.c @@ -11,7 +11,7 @@ * * @brief Chameleon zgetrf_nopiv parallel algorithm * - * @version 1.2.0 + * @version 1.3.0 * @author Omar Zenati * @author Mathieu Faverge * @author Emmanuel Agullo @@ -20,7 +20,7 @@ * @author Samuel Thibault * @author Terry Cojean * @author Matthieu Kuhn - * @date 2022-02-22 + * @date 2024-10-17 * @precisions normal z -> s d c * */ @@ -31,9 +31,9 @@ /** * Parallel tile LU factorization with no pivoting - dynamic scheduling */ -void chameleon_pzgetrf_nopiv( CHAM_desc_t *A, - RUNTIME_sequence_t *sequence, - RUNTIME_request_t *request ) +void chameleon_pzgetrf_nopiv_generic( CHAM_desc_t *A, + RUNTIME_sequence_t *sequence, + RUNTIME_request_t *request ) { CHAM_context_t *chamctxt; RUNTIME_option_t options; @@ -121,3 +121,11 @@ void chameleon_pzgetrf_nopiv( CHAM_desc_t *A, RUNTIME_options_finalize(&options, chamctxt); } + +void chameleon_pzgetrf_nopiv( struct chameleon_pzgetrf_nopiv_s *ws, + CHAM_desc_t *A, + RUNTIME_sequence_t *sequence, + RUNTIME_request_t *request ) +{ + chameleon_pzgetrf_nopiv_generic( A, sequence, request ); +} diff --git a/compute/zgesv_nopiv.c b/compute/zgesv_nopiv.c index c7c703a45dcf31b7129d31b5baefd549fb78d5f9..3ad6b0c255f8abe018936a3065921d770dc2cd5b 100644 --- a/compute/zgesv_nopiv.c +++ b/compute/zgesv_nopiv.c @@ -11,7 +11,7 @@ * * @brief Chameleon zgesv_nopiv wrappers * - * @version 1.2.0 + * @version 1.3.0 * @comment This file has been automatically generated * from Plasma 2.5.0 for CHAMELEON 0.9.2 * @author Jakub Kurzak @@ -19,7 +19,8 @@ * @author Emmanuel Agullo * @author Cedric Castagnede * @author Florent Pruvost - * @date 2022-02-22 + * @author Matthieu Kuhn + * @date 2024-10-17 * @precisions normal z -> s d c * */ @@ -82,8 +83,8 @@ * */ int CHAMELEON_zgesv_nopiv( int N, int NRHS, - CHAMELEON_Complex64_t *A, int LDA, - CHAMELEON_Complex64_t *B, int LDB ) + CHAMELEON_Complex64_t *A, int LDA, + CHAMELEON_Complex64_t *B, int LDB ) { int NB; int status; @@ -294,7 +295,7 @@ int CHAMELEON_zgesv_nopiv_Tile_Async( CHAM_desc_t *A, CHAM_desc_t *B, return CHAMELEON_SUCCESS; */ - chameleon_pzgetrf_nopiv( A, sequence, request ); + chameleon_pzgetrf_nopiv( NULL, A, sequence, request ); chameleon_pztrsm( ChamLeft, ChamLower, ChamNoTrans, ChamUnit, (CHAMELEON_Complex64_t)1.0, A, B, sequence, request ); diff --git a/compute/zgetrf_nopiv.c b/compute/zgetrf_nopiv.c index 07ebfa2e934f6a601c60ed4ffc211cb36439bc45..1f45349147c331212cc6b72e4b802683fc69424e 100644 --- a/compute/zgetrf_nopiv.c +++ b/compute/zgetrf_nopiv.c @@ -159,7 +159,7 @@ void CHAMELEON_zgetrf_nopiv_WS_Free( void *user_ws ) * */ int CHAMELEON_zgetrf_nopiv( int M, int N, - CHAMELEON_Complex64_t *A, int LDA ) + CHAMELEON_Complex64_t *A, int LDA ) { int NB; int status; @@ -353,7 +353,7 @@ int CHAMELEON_zgetrf_nopiv_Tile_Async( CHAM_desc_t *A, return chameleon_request_fail(sequence, request, CHAMELEON_ERR_ILLEGAL_VALUE); } - chameleon_pzgetrf_nopiv( A, sequence, request ); + chameleon_pzgetrf_nopiv( NULL, A, sequence, request ); return CHAMELEON_SUCCESS; } diff --git a/control/compute_z.h b/control/compute_z.h index 12ec9e909e0a18cd40ff2e168aaf402ea7939f3e..c0bac97556b86fbe2aaa5b61abcb9a645abf246b 100644 --- a/control/compute_z.h +++ b/control/compute_z.h @@ -146,7 +146,7 @@ void chameleon_pzgeqrf( int genD, CHAM_desc_t *A, CHAM_desc_t *T, CHAM_desc_t *D void chameleon_pzgeqrfrh( int genD, int BS, CHAM_desc_t *A, CHAM_desc_t *T, CHAM_desc_t *D, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); void chameleon_pzgetrf( struct chameleon_pzgetrf_s *ws, CHAM_desc_t *A, CHAM_ipiv_t *IPIV, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request ); void chameleon_pzgetrf_incpiv(CHAM_desc_t *A, CHAM_desc_t *L, CHAM_desc_t *D, int *IPIV, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); -void chameleon_pzgetrf_nopiv(CHAM_desc_t *A, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); +void chameleon_pzgetrf_nopiv(struct chameleon_pzgetrf_nopiv_s *ws, CHAM_desc_t *A, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); void chameleon_pzgetrf_reclap(CHAM_desc_t *A, int *IPIV, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); void chameleon_pzgetrf_rectil(CHAM_desc_t *A, int *IPIV, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request); void chameleon_pzhegst(int itype, cham_uplo_t uplo, CHAM_desc_t *A, CHAM_desc_t *B, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request);