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

Third sweep of changes from Pasqua/Daniela about the

Browse Source 
preconditioners. Updated documentation.
This commit is contained in:
Salvatore Filippone
2007-02-19 14:54:03 +00:00
parent a5c24162b1
commit e25d2e1d67
7 changed files with 1926 additions and 1907 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/fileread/df_sample.f90
+5 -5
View File
@@ -204,12 +204,12 @@ program df_sample
select case(iprec)
case(noprec_)
call psb_precset(pre,'noprec',info)
case(diagsc_)
call psb_precset(pre,'diagsc',info)
case(bja_)
call psb_precset(pre,'ilu',info)
case(diag_)
call psb_precset(pre,'diag',info)
case(bjac_)
call psb_precset(pre,'bjac',info)
case default
call psb_precset(pre,'ilu',info)
call psb_precset(pre,'bjac',info)
end select
! building the preconditioner
test/fileread/zf_sample.f90
+5 -5
View File
@@ -204,12 +204,12 @@ program zf_sample
select case(iprec)
case(noprec_)
call psb_precset(pre,'noprec',info)
case(diagsc_)
call psb_precset(pre,'diagsc',info)
case(bja_)
call psb_precset(pre,'ilu',info)
case(diag_)
call psb_precset(pre,'diag',info)
case(bjac_)
call psb_precset(pre,'bjac',info)
case default
call psb_precset(pre,'ilu',info)
call psb_precset(pre,'bjac',info)
end select
! building the preconditioner
test/pargen/ppde90.f90
+5 -5
View File
@@ -155,12 +155,12 @@ program pde90
select case(iprec)
case(noprec_)
call psb_precset(pre,'noprec',info)
case(diagsc_)
call psb_precset(pre,'diagsc',info)
case(bja_)
call psb_precset(pre,'ilu',info)
case(diag_)
call psb_precset(pre,'diag',info)
case(bjac_)
call psb_precset(pre,'bjac',info)
case default
call psb_precset(pre,'ilu',info)
call psb_precset(pre,'bjac',info)
end select
call psb_barrier(ictxt)