fdurastante
/
amg4psblas
mirror of https://github.com/sfilippone/amg4psblas.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Cosmetic change in sample source code

Browse Source
fix-sludist7
Salvatore Filippone 3 years ago
parent 5768238f66
commit 49777a379b
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File

2
samples/advanced/pdegen/amg_d_pde3d.f90
Unescape Escape View File

@ -630,6 +630,7 @@ contains
call psb_bcast(ctxt,prec%mlcycle) call psb_bcast(ctxt,prec%mlcycle)
call psb_bcast(ctxt,prec%outer_sweeps) call psb_bcast(ctxt,prec%outer_sweeps)
call psb_bcast(ctxt,prec%maxlevs) call psb_bcast(ctxt,prec%maxlevs)
call psb_bcast(ctxt,prec%csizepp)
call psb_bcast(ctxt,prec%aggr_prol) call psb_bcast(ctxt,prec%aggr_prol)
call psb_bcast(ctxt,prec%par_aggr_alg) call psb_bcast(ctxt,prec%par_aggr_alg)
@ -645,7 +646,6 @@ contains
end if end if
call psb_bcast(ctxt,prec%athres) call psb_bcast(ctxt,prec%athres)
call psb_bcast(ctxt,prec%csizepp)
call psb_bcast(ctxt,prec%cmat) call psb_bcast(ctxt,prec%cmat)
call psb_bcast(ctxt,prec%csolve) call psb_bcast(ctxt,prec%csolve)
call psb_bcast(ctxt,prec%csbsolve) call psb_bcast(ctxt,prec%csbsolve)

2
samples/advanced/pdegen/amg_s_pde3d.f90
Unescape Escape View File

@ -630,6 +630,7 @@ contains
call psb_bcast(ctxt,prec%mlcycle) call psb_bcast(ctxt,prec%mlcycle)
call psb_bcast(ctxt,prec%outer_sweeps) call psb_bcast(ctxt,prec%outer_sweeps)
call psb_bcast(ctxt,prec%maxlevs) call psb_bcast(ctxt,prec%maxlevs)
call psb_bcast(ctxt,prec%csizepp)
call psb_bcast(ctxt,prec%aggr_prol) call psb_bcast(ctxt,prec%aggr_prol)
call psb_bcast(ctxt,prec%par_aggr_alg) call psb_bcast(ctxt,prec%par_aggr_alg)
@ -645,7 +646,6 @@ contains
end if end if
call psb_bcast(ctxt,prec%athres) call psb_bcast(ctxt,prec%athres)
call psb_bcast(ctxt,prec%csizepp)
call psb_bcast(ctxt,prec%cmat) call psb_bcast(ctxt,prec%cmat)
call psb_bcast(ctxt,prec%csolve) call psb_bcast(ctxt,prec%csolve)
call psb_bcast(ctxt,prec%csbsolve) call psb_bcast(ctxt,prec%csbsolve)

Write Preview
Loading…
Cancel
Save