*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 18 years ago
parent e16f0c342d
commit 72f53a2bc2

@ -122,7 +122,7 @@ contains
implicit none
integer :: n, k, idx(:)
integer :: n, idx(:)
real(kind(1.d0)) :: beta, x(:), y(:)
! Locals

Loading…
Cancel
Save