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

Take out OpenMP in samples generation for the time being

Browse Source
cmake
sfilippone 1 year ago
parent 92eb261ee5
commit d925d39089
2 changed files with 20 additions and 16 deletions
Show Stats Download Patch File Download Diff File

2
samples/advanced/pdegen/amg_d_genpde_mod.F90
Unescape Escape View File

@ -371,6 +371,7 @@ contains
call psb_barrier(ctxt) call psb_barrier(ctxt)
t1 = psb_wtime() t1 = psb_wtime()
! Disable OMP here for the time being
! $ o m p parallel shared(deltah,myidx,a,desc_a) ! $ o m p parallel shared(deltah,myidx,a,desc_a)
! !
block block
@ -828,6 +829,7 @@ contains
call psb_barrier(ctxt) call psb_barrier(ctxt)
t1 = psb_wtime() t1 = psb_wtime()
! Disable OMP here for the time being
! $ o m p parallel shared(deltah,myidx,a,desc_a) ! $ o m p parallel shared(deltah,myidx,a,desc_a)
! !
block block

2
samples/advanced/pdegen/amg_s_genpde_mod.F90
Unescape Escape View File

@ -371,6 +371,7 @@ contains
call psb_barrier(ctxt) call psb_barrier(ctxt)
t1 = psb_wtime() t1 = psb_wtime()
! Disable OMP here for the time being
! $ o m p parallel shared(deltah,myidx,a,desc_a) ! $ o m p parallel shared(deltah,myidx,a,desc_a)
! !
block block
@ -828,6 +829,7 @@ contains
call psb_barrier(ctxt) call psb_barrier(ctxt)
t1 = psb_wtime() t1 = psb_wtime()
! Disable OMP here for the time being
! $ o m p parallel shared(deltah,myidx,a,desc_a) ! $ o m p parallel shared(deltah,myidx,a,desc_a)
! !
block block

Write Preview
Loading…
Cancel
Save