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

psblas3:

Browse Source 
prec/psb_d_prec_type.f90
 test/fileread/df_sample.f90
 util/psb_gps_mod.f90
 util/psb_renum_impl.F90
 util/psb_renum_mod.f90

First working version of gps_renum. Tested in df_sample.
This commit is contained in:
Salvatore Filippone
2011-07-27 13:36:53 +00:00
parent 2ae5ff0c11
commit 0fea4c6d91
5 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/fileread/df_sample.f90
+2
View File
@@ -174,6 +174,8 @@ program df_sample
end if
call psb_mat_renum(psb_mat_renum_gps_,aux_a,info)
! switch over different partition types
if (ipart == 0) then
call psb_barrier(ictxt)