Fixed time measurements.

7 years ago · a5f9a781f5
parent b7a50f6e8b
commit a5f9a781f5
4 changed files with 4 additions and 4 deletions
--- a/test/pargen/psb_d_pde2d.f90
+++ b/test/pargen/psb_d_pde2d.f90
@ -186,7 +186,7 @@ contains
    n   = m
    nnz = ((n*7)/(np))
    if(iam == psb_root_) write(psb_out_unit,'("Generating Matrix (size=",i0,")...")')n
-
+    t0 = psb_wtime()
    select case(partition_)
    case(1)
      ! A BLOCK partition 
--- a/test/pargen/psb_d_pde3d.f90
+++ b/test/pargen/psb_d_pde3d.f90
@ -187,7 +187,7 @@ contains
    n   = m
    nnz = ((n*9)/(np))
    if(iam == psb_root_) write(psb_out_unit,'("Generating Matrix (size=",i0,")...")')n
-
+    t0 = psb_wtime()
    select case(partition_)
    case(1)
      ! A BLOCK partition 
--- a/test/pargen/psb_s_pde2d.f90
+++ b/test/pargen/psb_s_pde2d.f90
@ -186,7 +186,7 @@ contains
    n   = m
    nnz = ((n*7)/(np))
    if(iam == psb_root_) write(psb_out_unit,'("Generating Matrix (size=",i0,")...")')n
-
+    t0 = psb_wtime()
    select case(partition_)
    case(1)
      ! A BLOCK partition 
--- a/test/pargen/psb_s_pde3d.f90
+++ b/test/pargen/psb_s_pde3d.f90
@ -187,7 +187,7 @@ contains
    n   = m
    nnz = ((n*9)/(np))
    if(iam == psb_root_) write(psb_out_unit,'("Generating Matrix (size=",i0,")...")')n
-
+    t0 = psb_wtime()
    select case(partition_)
    case(1)
      ! A BLOCK partition