From 28b3ab5f772baf04e0ada75c309795072939c560 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Wed, 21 Oct 2020 16:08:56 +0200 Subject: [PATCH] Fix import of psb_dpk_ --- util/psb_metispart_mod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/util/psb_metispart_mod.F90 b/util/psb_metispart_mod.F90 index 496e263f..081d1bc1 100644 --- a/util/psb_metispart_mod.F90 +++ b/util/psb_metispart_mod.F90 @@ -72,7 +72,7 @@ module psb_metispart_mod interface psi_build_mtpart subroutine psi_l_build_mtpart(n,ja,irp,nparts,vect, weights) - import :: psb_lpk_, psb_spk_ + import :: psb_lpk_, psb_spk_, psb_dpk_ implicit none integer(psb_lpk_), intent(in) :: n, nparts integer(psb_lpk_), intent(in) :: ja(:), irp(:)