*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 14 years ago
parent a2a0f94d65
commit 44c059beba

@ -422,7 +422,6 @@ contains
ictxt = idxmap%get_ctxt() ictxt = idxmap%get_ctxt()
call psb_info(ictxt,iam,np) call psb_info(ictxt,iam,np)
write(0,*) iam, ' REPL fnd_owner'
nv = size(idx) nv = size(idx)
allocate(iprc(nv),stat=info) allocate(iprc(nv),stat=info)
if (info /= 0) then if (info /= 0) then

Loading…
Cancel
Save