*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 18 years ago
parent a1b9c660d5
commit 2875be5e2d

@ -118,10 +118,10 @@ Subroutine psb_zgmresr(a,prec,b,x,eps,desc_a,info,&
character(len=20) :: name character(len=20) :: name
info = 0 info = 0
name = 'psb_dgmres' name = 'psb_zgmres'
call psb_erractionsave(err_act) call psb_erractionsave(err_act)
If (debug) Write(0,*) 'entering psb_dgmres' If (debug) Write(0,*) 'entering psb_zgmres'
ictxt = psb_cd_get_context(desc_a) ictxt = psb_cd_get_context(desc_a)
Call psb_info(ictxt, me, np) Call psb_info(ictxt, me, np)

Loading…
Cancel
Save