Fixed stupid bug on state of descriptor.

18 years ago · 3bcd2fc736
parent 1b87443bfa
commit 3bcd2fc736
1 changed files with 1 additions and 1 deletions
--- a/src/tools/psb_get_overlap.f90
+++ b/src/tools/psb_get_overlap.f90
@ -14,7 +14,7 @@ subroutine psb_get_ovrlap(ovrel,desc,info)
  name='psb_get_overlap'
  call psb_erractionsave(err_act)

-  if (psb_is_ovl_bld(desc)) then 
+  if (psb_is_ovl_asb(desc)) then 
    i=0
    j=1
    do while(desc%ovrlap_elem(j) /= -1)