Make desc_is_asb always a method

2026-10-19 04:12:09 +00:00 · 2026-06-10 13:52:23 +02:00
parent 187a8c3051
commit 1c51cab1b5
1 changed files with 1 additions and 1 deletions
@@ -674,7 +674,7 @@ contains
    integer(psb_ipk_) :: info

    info = 0
-    if (psb_is_asb_desc(desc)) &
+    if (desc%is_asb()) &
         & call desc%indxmap%set_state(psb_desc_ovl_asb_)

  end subroutine psb_cd_set_ovl_asb