Fixed default for precset.

psblas3-type-indexed
Salvatore Filippone 19 years ago
parent b474f50151
commit ae749eb632

@ -173,6 +173,8 @@ program pde90
call psb_precset(pre,'asm',iv=(/novr,halo_,none_/))
case(rash_)
call psb_precset(pre,'asm',iv=(/novr,nohalo_,none_/))
case default
call psb_precset(pre,'ilu')
end select
call psb_barrier(ictxt)

Loading…
Cancel
Save