Exposed error in AMG test when not parallelizing generation loop

2026-10-06 22:55:08 +00:00 · 2023-05-30 12:26:58 +02:00
parent 494e29dd2e
commit 1941affe7a
6 changed files with 45 additions and 18 deletions
@@ -737,6 +737,7 @@ program psb_d_pde3d
  !
  !  allocate and fill in the coefficient matrix, rhs and initial guess
  !
+  call psb_cd_set_large_threshold(100_psb_lpk_)
  call psb_barrier(ctxt)
  t1 = psb_wtime()
  call psb_gen_pde3d(ctxt,idim,a,bv,xxv,desc_a,afmt,info,partition=ipart)