fdurastante/amg4psblas
1
0
Fork 0
mirror of https://github.com/sfilippone/amg4psblas.git synced 2026-10-06 22:55:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Salvatore Filippone
2016-06-15 11:36:12 +00:00
parent c4ee9f8c9a
commit 3959a0fa4d
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mlprec/impl/smoother/mld_d_jac_smoother_apply_vect.f90
+1 -1
View File
@@ -135,7 +135,7 @@ subroutine mld_d_jac_smoother_apply_vect(alpha,sm,x,beta,y,desc_data,trans,&
!
!
call tx%bld(x%get_nrows(),mold=x%v)
call psb_geaxpby(done,y,dzero,tx,desc_data,info)
call tx%set(dzero)
call ty%bld(x%get_nrows(),mold=x%v)
do i=1, sweeps