Make desc_is_asb always a method

development
sfilippone 3 days ago
parent 187a8c3051
commit 1c51cab1b5

@ -674,7 +674,7 @@ contains
integer(psb_ipk_) :: info integer(psb_ipk_) :: info
info = 0 info = 0
if (psb_is_asb_desc(desc)) & if (desc%is_asb()) &
& call desc%indxmap%set_state(psb_desc_ovl_asb_) & call desc%indxmap%set_state(psb_desc_ovl_asb_)
end subroutine psb_cd_set_ovl_asb end subroutine psb_cd_set_ovl_asb

Loading…
Cancel
Save