psblas:test/pargen/ppde90:

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

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

Loading…
Cancel
Save