Mentions légales du service

Skip to content
Snippets Groups Projects
Commit 754bd1c5 authored by Mathieu Faverge's avatar Mathieu Faverge Committed by BOUCHERIE Raphael
Browse files

Whitespaces

parent a8da3db5
Branches
Tags
1 merge request!47Integration of hierarchicah householder reduction trees
...@@ -26,19 +26,19 @@ ...@@ -26,19 +26,19 @@
#include "timing_zauxiliary.h" #include "timing_zauxiliary.h"
static int static int
RunTest(int *iparam, double *dparam, morse_time_t *t_) RunTest(int *iparam, double *dparam, morse_time_t *t_)
{ {
PASTE_CODE_IPARAM_LOCALS( iparam ); PASTE_CODE_IPARAM_LOCALS( iparam );
if ( M != N ) { if ( M != N ) {
fprintf(stderr, "This timing works only with M == N\n"); fprintf(stderr, "This timing works only with M == N\n");
return -1; return -1;
} }
/* Allocate Data */ /* Allocate Data */
PASTE_CODE_ALLOCATE_MATRIX( A, 1, MORSE_Complex64_t, LDA, N ); PASTE_CODE_ALLOCATE_MATRIX( A, 1, MORSE_Complex64_t, LDA, N );
PASTE_CODE_ALLOCATE_MATRIX( X, 1, MORSE_Complex64_t, LDB, NRHS ); PASTE_CODE_ALLOCATE_MATRIX( X, 1, MORSE_Complex64_t, LDB, NRHS );
/* Initialiaze Data */ /* Initialiaze Data */
MORSE_zplrnt( N, N, A, LDA, 51 ); MORSE_zplrnt( N, N, A, LDA, 51 );
MORSE_zplrnt( N, NRHS, X, LDB, 5673 ); MORSE_zplrnt( N, NRHS, X, LDB, 5673 );
...@@ -50,13 +50,13 @@ RunTest(int *iparam, double *dparam, morse_time_t *t_) ...@@ -50,13 +50,13 @@ RunTest(int *iparam, double *dparam, morse_time_t *t_)
START_TIMING(); START_TIMING();
MORSE_zgesv_nopiv( N, NRHS, A, N, X, LDB ); MORSE_zgesv_nopiv( N, NRHS, A, N, X, LDB );
STOP_TIMING(); STOP_TIMING();
/* Check the solution */ /* Check the solution */
if (check) if (check)
{ {
dparam[IPARAM_RES] = z_check_solution(N, N, NRHS, Acpy, LDA, B, X, LDB, dparam[IPARAM_RES] = z_check_solution(N, N, NRHS, Acpy, LDA, B, X, LDB,
&(dparam[IPARAM_ANORM]), &(dparam[IPARAM_ANORM]),
&(dparam[IPARAM_BNORM]), &(dparam[IPARAM_BNORM]),
&(dparam[IPARAM_XNORM])); &(dparam[IPARAM_XNORM]));
free(Acpy); free(B); free(Acpy); free(B);
} }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment