fdurastante
/
psblas3
mirror of https://github.com/sfilippone/psblas3.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Make CUDAKERN tests lighter

Browse Source
repackage
sfilippone 2 months ago
parent 63fb828528
commit 20958f654a
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File

2
test/cudakern/dpdegenmv.F90
Unescape Escape View File

@ -595,7 +595,7 @@ program pdgenmv
! solver parameters ! solver parameters
integer(psb_epk_) :: amatsize, precsize, descsize, annz, nbytes integer(psb_epk_) :: amatsize, precsize, descsize, annz, nbytes
real(psb_dpk_) :: err, eps, tnv, tng,tdot, dnrm2,ddot real(psb_dpk_) :: err, eps, tnv, tng,tdot, dnrm2,ddot
integer, parameter :: ntests=200, ngpu=50, ncnv=20 integer, parameter :: ntests=8, ngpu=2, ncnv=3
type(psb_d_coo_sparse_mat), target :: acoo type(psb_d_coo_sparse_mat), target :: acoo
type(psb_d_csr_sparse_mat), target :: acsr type(psb_d_csr_sparse_mat), target :: acsr
type(psb_d_ell_sparse_mat), target :: aell type(psb_d_ell_sparse_mat), target :: aell

2
test/cudakern/spdegenmv.F90
Unescape Escape View File

@ -581,7 +581,7 @@ program pdgenmv
! solver parameters ! solver parameters
integer(psb_epk_) :: amatsize, precsize, descsize, annz, nbytes integer(psb_epk_) :: amatsize, precsize, descsize, annz, nbytes
real(psb_spk_) :: err, eps, tnv, tng,tdot, snrm2,sdot real(psb_spk_) :: err, eps, tnv, tng,tdot, snrm2,sdot
integer, parameter :: ntests=200, ngpu=50, ncnv=20 integer, parameter :: ntests=8, ngpu=2, ncnv=3
type(psb_s_coo_sparse_mat), target :: acoo type(psb_s_coo_sparse_mat), target :: acoo
type(psb_s_csr_sparse_mat), target :: acsr type(psb_s_csr_sparse_mat), target :: acsr
type(psb_s_ell_sparse_mat), target :: aell type(psb_s_ell_sparse_mat), target :: aell

Write Preview
Loading…
Cancel
Save