psblas:test/pargen/ppde90:

changed end messages.
psblas3-type-indexed
Salvatore Filippone 17 years ago
parent 3e80688ff6
commit 65c6e28ae8

@ -190,11 +190,11 @@ program ppde
if (iam == psb_root_) then
write(*,'(" ")')
write(*,'("Time to solve matrix : ",es10.4)')t2
write(*,'("Time per iteration : ",es10.4)')t2/iter
write(*,'("Number of iterations : ",i0)')iter
write(*,'("Convergence indicator on exit : ",es10.4)')err
write(*,'("Info on exit : ",i0)')info
write(*,'("Time to solve matrix : ",es10.4)')t2
write(*,'("Time per iteration : ",es10.4)')t2/iter
write(*,'("Number of iterations : ",i0)')iter
write(*,'("Error estimate on exit : ",es10.4)')err
write(*,'("Info on exit : ",i0)')info
end if
!

Loading…
Cancel
Save