Fix indx_map compilation

implement-ainv
Salvatore Filippone 4 years ago
parent b32053d8aa
commit bab24cec27

@ -1349,7 +1349,6 @@ contains
subroutine base_init_null(idxmap,ctxt,info) subroutine base_init_null(idxmap,ctxt,info)
class(psb_indx_map), intent(inout) :: idxmap class(psb_indx_map), intent(inout) :: idxmap
type(psb_ctxt_type), intent(in) :: ctxt type(psb_ctxt_type), intent(in) :: ctxt
integer(psb_lpk_), intent(in) :: vl(:)
integer(psb_ipk_), intent(out) :: info integer(psb_ipk_), intent(out) :: info
call idxmap%set_null() call idxmap%set_null()

Loading…
Cancel
Save