*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 17 years ago
parent 6b13585ad6
commit 113d536e1d

@ -701,6 +701,7 @@ contains
call psb_cd_inloc((/(i,i=nlp+1,nlp+nl)/),ictxt,desc_a,info) call psb_cd_inloc((/(i,i=nlp+1,nlp+nl)/),ictxt,desc_a,info)
endif endif
if (info /= 0) goto 999
call psb_erractionrestore(err_act) call psb_erractionrestore(err_act)
return return

Loading…
Cancel
Save