From 1b4504eff1afe6387f39813bc9a4a181df51897b Mon Sep 17 00:00:00 2001 From: Florent Pruvost <florent.pruvost@inria.fr> Date: Tue, 9 Dec 2014 15:16:56 +0000 Subject: [PATCH] whitespaces --- compute/zgels.c | 2 +- compute/zungqr.c | 2 +- testing/testing_zgemm.c | 4 ++-- timing/time_zgels_tile.c | 2 +- 4 files changed, 5 insertions(+), 5 deletions(-) diff --git a/compute/zgels.c b/compute/zgels.c index a9bc8e0cb..933afa200 100644 --- a/compute/zgels.c +++ b/compute/zgels.c @@ -287,7 +287,7 @@ int MORSE_zgels_Tile(MORSE_enum trans, MORSE_desc_t *A, RUNTIME_barrier(morse); RUNTIME_desc_getoncpu(A); RUNTIME_desc_getoncpu(B); - + status = sequence->status; morse_sequence_destroy(morse, sequence); return status; diff --git a/compute/zungqr.c b/compute/zungqr.c index 77ba85321..4bf203dd6 100644 --- a/compute/zungqr.c +++ b/compute/zungqr.c @@ -159,7 +159,7 @@ int MORSE_zungqr(int M, int N, int K, /* morse_ziptile2lap( descQ, Q, NB, NB, LDQ, N, sequence, &request);*/ /* RUNTIME_barrier(morse);*/ /* }*/ - + status = sequence->status; morse_sequence_destroy(morse, sequence); return status; diff --git a/testing/testing_zgemm.c b/testing/testing_zgemm.c index 3c7cdc876..098b0ed1f 100644 --- a/testing/testing_zgemm.c +++ b/testing/testing_zgemm.c @@ -133,7 +133,7 @@ int testing_zgemm(int argc, char **argv) MORSE_zgemm(trans[ta], trans[tb], M, N, K, alpha, A, LDA, B, LDB, beta, Cfinal, LDC); /* Check the solution */ - info_solution = check_solution(trans[ta], trans[tb], M, N, K, + info_solution = check_solution(trans[ta], trans[tb], M, N, K, alpha, A, LDA, B, LDB, beta, Cinit, Cfinal, LDC); if (MORSE_My_Mpi_Rank() == 0){ if (info_solution == 0) { @@ -191,7 +191,7 @@ static int check_solution(MORSE_enum transA, MORSE_enum transB, int M, int N, in Anorm = LAPACKE_zlange_work(LAPACK_COL_MAJOR, morse_lapack_const(MorseInfNorm), Am, An, A, LDA, work); Bnorm = LAPACKE_zlange_work(LAPACK_COL_MAJOR, morse_lapack_const(MorseInfNorm), Bm, Bn, B, LDB, work); Cinitnorm = LAPACKE_zlange_work(LAPACK_COL_MAJOR, morse_lapack_const(MorseInfNorm), M, N, Cref, LDC, work); - Cmorsenorm = LAPACKE_zlange_work(LAPACK_COL_MAJOR, morse_lapack_const(MorseInfNorm), M, N, Cmorse, LDC, work); + Cmorsenorm = LAPACKE_zlange_work(LAPACK_COL_MAJOR, morse_lapack_const(MorseInfNorm), M, N, Cmorse, LDC, work); cblas_zgemm(CblasColMajor, (CBLAS_TRANSPOSE)transA, (CBLAS_TRANSPOSE)transB, M, N, K, CBLAS_SADDR(alpha), A, LDA, B, LDB, CBLAS_SADDR(beta), Cref, LDC); diff --git a/timing/time_zgels_tile.c b/timing/time_zgels_tile.c index 46e1eeb2a..7f9b01e0e 100644 --- a/timing/time_zgels_tile.c +++ b/timing/time_zgels_tile.c @@ -57,7 +57,7 @@ RunTest(int *iparam, double *dparam, morse_time_t *t_) START_TIMING(); MORSE_zgels_Tile( MorseNoTrans, descA, descT, descX ); STOP_TIMING(); - + /* Allocate Workspace */ MORSE_Dealloc_Workspace(&descT); -- GitLab