Explanatory comments.

test/kernel/pdgenspmv.f90

@@ -469,6 +469,9 @@ program pdgenspmv
 
   call psb_barrier(ictxt)
   t1 = psb_wtime()
+  !
+  ! Perform Ax multiple times to compute average performance
+  !
   do i=1,times 
     call psb_spmm(done,a,xv,dzero,bv,desc_a,info,'n')
   end do
@@ -479,6 +482,9 @@ program pdgenspmv
   ! FIXME: cache flush needed here
   call psb_barrier(ictxt)
   tt1 = psb_wtime()
+  !
+  ! Perform A^Tx multiple times to compute average performance
+  !
   do i=1,times 
     call psb_spmm(done,a,xv,dzero,bv,desc_a,info,'t')
   end do