mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-06 22:55:12 +00:00
Merge branch 'development' into MixedI8
This commit is contained in:
@@ -193,7 +193,7 @@ program mld_cexample_1lev
|
||||
|
||||
! set RAS
|
||||
|
||||
call P%init('AS',info)
|
||||
call P%init(ictxt,'AS',info)
|
||||
|
||||
! set number of overlaps
|
||||
|
||||
|
||||
@@ -212,7 +212,7 @@ program mld_cexample_ml
|
||||
! GS sweep as pre/post-smoother and UMFPACK as coarsest-level
|
||||
! solver
|
||||
|
||||
call P%init('ML',info)
|
||||
call P%init(ictxt,'ML',info)
|
||||
kmethod = 'CG'
|
||||
|
||||
case(2)
|
||||
|
||||
@@ -193,7 +193,7 @@ program mld_dexample_1lev
|
||||
|
||||
! set RAS
|
||||
|
||||
call P%init('AS',info)
|
||||
call P%init(ictxt,'AS',info)
|
||||
|
||||
! set number of overlaps
|
||||
|
||||
|
||||
@@ -212,7 +212,7 @@ program mld_dexample_ml
|
||||
! GS sweep as pre/post-smoother and UMFPACK as coarsest-level
|
||||
! solver
|
||||
|
||||
call P%init('ML',info)
|
||||
call P%init(ictxt,'ML',info)
|
||||
kmethod = 'CG'
|
||||
|
||||
case(2)
|
||||
|
||||
@@ -193,7 +193,7 @@ program mld_sexample_1lev
|
||||
|
||||
! set RAS
|
||||
|
||||
call P%init('AS',info)
|
||||
call P%init(ictxt,'AS',info)
|
||||
|
||||
! set number of overlaps
|
||||
|
||||
|
||||
@@ -212,7 +212,7 @@ program mld_sexample_ml
|
||||
! GS sweep as pre/post-smoother and UMFPACK as coarsest-level
|
||||
! solver
|
||||
|
||||
call P%init('ML',info)
|
||||
call P%init(ictxt,'ML',info)
|
||||
kmethod = 'CG'
|
||||
|
||||
case(2)
|
||||
|
||||
@@ -193,7 +193,7 @@ program mld_zexample_1lev
|
||||
|
||||
! set RAS
|
||||
|
||||
call P%init('AS',info)
|
||||
call P%init(ictxt,'AS',info)
|
||||
|
||||
! set number of overlaps
|
||||
|
||||
|
||||
@@ -212,7 +212,7 @@ program mld_zexample_ml
|
||||
! GS sweep as pre/post-smoother and UMFPACK as coarsest-level
|
||||
! solver
|
||||
|
||||
call P%init('ML',info)
|
||||
call P%init(ictxt,'ML',info)
|
||||
kmethod = 'CG'
|
||||
|
||||
case(2)
|
||||
|
||||
Reference in New Issue
Block a user