Commit 1bdd5eb4 authored by Pavel Kus's avatar Pavel Kus
Browse files

unified test output

parent 09005431
......@@ -184,14 +184,22 @@ program test_complex_double_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - COMPLEX version'
print '(a)','Standard eigenvalue problem - ELPA1, COMPLEX version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a))', 'Using gpu: NO'
print '((a,i0))', 'Num gpu devices: ', 0
print '((a))', 'Number type: complex'
print '((a))', 'Number precision: double'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
!-------------------------------------------------------------------------------
!-------------------------------------------------------------------------------
! Set up BLACS context and MPI communicators
!
! The BLACS context is only necessary for using Scalapack.
......
......@@ -193,11 +193,20 @@ program test_complex_gpu_version_double_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - COMPLEX version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
if (gpuAvailable) then
print *,"with GPU Version"
print '((a))', 'Using gpu: YES'
else
print '((a))', 'Using gpu: NO, not available'
endif
print '((a,i0))', 'Num gpu devices: ', numberOfDevices
print '((a))', 'Number type: complex'
print '((a))', 'Number precision: double'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -193,11 +193,20 @@ program test_complex_gpu_version_single_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - COMPLEX version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
if (gpuAvailable) then
print *,"with GPU Version"
print '((a))', 'Using gpu: YES'
else
print '((a))', 'Using gpu: NO, not available'
endif
print '((a,i0))', 'Num gpu devices: ', numberOfDevices
print '((a))', 'Number type: complex'
print '((a))', 'Number precision: single'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -184,9 +184,17 @@ program test_complex_single_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - COMPLEX version'
print '(a)','Standard eigenvalue problem - ELPA1, COMPLEX version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a))', 'Using gpu: NO'
print '((a,i0))', 'Num gpu devices: ', 0
print '((a))', 'Number type: complex'
print '((a))', 'Number precision: single'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -184,13 +184,15 @@ program test_real_double_precision
print *
print '(a)','Standard eigenvalue problem - ELPA1, REAL version'
print *
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a))', 'Using gpu: NO'
print '((a,i0))', 'Num gpu devices: ', 0
print '((a))', 'Number type: real'
print '((a))', 'Number precision: double'
print *
! print '((a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -191,21 +191,20 @@ program test_real_gpu_version_double_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - REAL version'
! if (gpuAvailable) then
! print *,"with GPU Version"
! endif
print *
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
if (gpuAvailable) then
print '((a))', 'Using gpu: YES'
else
print '((a))', 'Using gpu: NO, not available'
endif
print '((a,i0))', 'Num gpu devices: ', numberOfDevices
print '((a))', 'Number type: real'
print '((a))', 'Number precision: double'
print *
! print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -191,11 +191,20 @@ program test_real_gpu_version_single_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - REAL version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
if (gpuAvailable) then
print *,"with GPU Version"
print '((a))', 'Using gpu: YES'
else
print '((a))', 'Using gpu: NO, not available'
endif
print '((a,i0))', 'Num gpu devices: ', numberOfDevices
print '((a))', 'Number type: real'
print '((a))', 'Number precision: single'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
......@@ -181,9 +181,17 @@ program test_real_single_precision
if(myid==0) then
print *
print '(a)','Standard eigenvalue problem - REAL version'
print '(a)','Standard eigenvalue problem - ELPA1, REAL version'
print *
print '((a,i0))', 'Matrix size: ', na
print '((a,i0))', 'Num eigenvectors: ', nev
print '((a,i0))', 'Blocksize: ', nblk
print '((a,i0))', 'Num MPI proc: ', nprocs
print '((a))', 'Using gpu: NO'
print '((a,i0))', 'Num gpu devices: ', 0
print '((a))', 'Number type: real'
print '((a))', 'Number precision: single'
print *
print '(3(a,i0))','Matrix size=',na,', Number of eigenvectors=',nev,', Block size=',nblk
print '(3(a,i0))','Number of processor rows=',np_rows,', cols=',np_cols,', total=',nprocs
print *
endif
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment