mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-21 05:12:15 +00:00
Changed names mld_aggr_kind_ into mld_smooth_kind_ and fixed all files.
This commit is contained in:
@@ -223,7 +223,7 @@ program df_bench
|
||||
call mld_precset(pre,mld_sub_fill_in_, precs(pp)%fill2, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_fact_thrs_, precs(pp)%thr2, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_smooth_sweeps_, precs(pp)%jswp, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_aggr_kind_, precs(pp)%smthkind, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_smooth_kind_, precs(pp)%smthkind, info,ilev=nlev)
|
||||
else
|
||||
call mld_precinit(pre,precs(pp)%lv1,info)
|
||||
end if
|
||||
|
||||
@@ -208,7 +208,7 @@ program zf_bench
|
||||
call mld_precset(pre,mld_sub_fill_in_, precs(pp)%fill2, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_fact_thrs_, precs(pp)%thr2, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_smooth_sweeps_, precs(pp)%jswp, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_aggr_kind_, precs(pp)%smthkind, info,ilev=nlev)
|
||||
call mld_precset(pre,mld_smooth_kind_, precs(pp)%smthkind, info,ilev=nlev)
|
||||
else
|
||||
call mld_precinit(pre,precs(pp)%lv1,info)
|
||||
end if
|
||||
|
||||
@@ -183,7 +183,7 @@ program ppde
|
||||
call mld_precset(prec,mld_sub_fill_in_, prectype%fill2, info,ilev=prectype%nlev)
|
||||
call mld_precset(prec,mld_fact_thrs_, prectype%thr2, info,ilev=prectype%nlev)
|
||||
call mld_precset(prec,mld_smooth_sweeps_, prectype%jswp, info,ilev=prectype%nlev)
|
||||
call mld_precset(prec,mld_aggr_kind_, prectype%smthkind, info,ilev=prectype%nlev)
|
||||
call mld_precset(prec,mld_smooth_kind_, prectype%smthkind, info,ilev=prectype%nlev)
|
||||
else
|
||||
call mld_precinit(prec,prectype%lv1,info)
|
||||
endif
|
||||
|
||||
Reference in New Issue
Block a user