fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-21 05:12:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix conversion and product to enable overlap with GPU

Browse Source
This commit is contained in:
sfilippone
2023-12-22 12:01:41 +01:00
parent 74cf138a6c
commit 49e99a3e82
2 changed files with 229 additions and 81 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/psblas/psb_dspmm.f90
+1
View File
@@ -199,6 +199,7 @@ subroutine psb_dspmv_vect(alpha,a,x,beta,y,desc_a,info,&
block
logical, parameter :: do_timings=.true.
real(psb_dpk_) :: t1, t2, t3, t4, t5
!write(0,*) 'Going for overlap ',a%ad%get_fmt(),' ',a%and%get_fmt()
if (do_timings) call psb_barrier(ctxt)
if (do_timings) call psb_tic(mv_phase1)
if (doswap_) call psi_swapdata(psb_swap_send_,&