diff --git a/samples/advanced/pdegen/amg_d_pde2d.F90 b/samples/advanced/pdegen/amg_d_pde2d.F90 index 877b5cbf..95fa7206 100644 --- a/samples/advanced/pdegen/amg_d_pde2d.F90 +++ b/samples/advanced/pdegen/amg_d_pde2d.F90 @@ -551,6 +551,7 @@ program amg_d_pde2d write(psb_out_unit,'("Computed solution on ",i8," process(es)")') np write(psb_out_unit,'("Number of threads : ",i12)') nth write(psb_out_unit,'("Total number of tasks : ",i12)') nth*np + write(psb_out_unit,'("Discretization domain size : ",i12)') idim write(psb_out_unit,'("Linear system size : ",i12)') system_size write(psb_out_unit,'("PDE Coefficients : ",a)') trim(pdecoeff) write(psb_out_unit,'("Krylov method : ",a)') trim(s_choice%kmethd) diff --git a/samples/advanced/pdegen/amg_d_pde3d.F90 b/samples/advanced/pdegen/amg_d_pde3d.F90 index a59d2ed3..379182ec 100644 --- a/samples/advanced/pdegen/amg_d_pde3d.F90 +++ b/samples/advanced/pdegen/amg_d_pde3d.F90 @@ -555,6 +555,7 @@ program amg_d_pde3d write(psb_out_unit,'("Computed solution on ",i8," process(es)")') np write(psb_out_unit,'("Number of threads : ",i12)') nth write(psb_out_unit,'("Total number of tasks : ",i12)') nth*np + write(psb_out_unit,'("Discretization domain size : ",i12)') idim write(psb_out_unit,'("Linear system size : ",i12)') system_size write(psb_out_unit,'("PDE Coefficients : ",a)') trim(pdecoeff) write(psb_out_unit,'("Krylov method : ",a)') trim(s_choice%kmethd) diff --git a/samples/advanced/pdegen/amg_s_pde2d.F90 b/samples/advanced/pdegen/amg_s_pde2d.F90 index 2241637d..96534f33 100644 --- a/samples/advanced/pdegen/amg_s_pde2d.F90 +++ b/samples/advanced/pdegen/amg_s_pde2d.F90 @@ -551,6 +551,7 @@ program amg_s_pde2d write(psb_out_unit,'("Computed solution on ",i8," process(es)")') np write(psb_out_unit,'("Number of threads : ",i12)') nth write(psb_out_unit,'("Total number of tasks : ",i12)') nth*np + write(psb_out_unit,'("Discretization domain size : ",i12)') idim write(psb_out_unit,'("Linear system size : ",i12)') system_size write(psb_out_unit,'("PDE Coefficients : ",a)') trim(pdecoeff) write(psb_out_unit,'("Krylov method : ",a)') trim(s_choice%kmethd) diff --git a/samples/advanced/pdegen/amg_s_pde3d.F90 b/samples/advanced/pdegen/amg_s_pde3d.F90 index 234e91e7..40633d7a 100644 --- a/samples/advanced/pdegen/amg_s_pde3d.F90 +++ b/samples/advanced/pdegen/amg_s_pde3d.F90 @@ -555,6 +555,7 @@ program amg_s_pde3d write(psb_out_unit,'("Computed solution on ",i8," process(es)")') np write(psb_out_unit,'("Number of threads : ",i12)') nth write(psb_out_unit,'("Total number of tasks : ",i12)') nth*np + write(psb_out_unit,'("Discretization domain size : ",i12)') idim write(psb_out_unit,'("Linear system size : ",i12)') system_size write(psb_out_unit,'("PDE Coefficients : ",a)') trim(pdecoeff) write(psb_out_unit,'("Krylov method : ",a)') trim(s_choice%kmethd)