|
|
@ -117,7 +117,7 @@ module mld_c_dec_aggregator_mod
|
|
|
|
class(mld_c_dec_aggregator_type), target, intent(inout) :: ag
|
|
|
|
class(mld_c_dec_aggregator_type), target, intent(inout) :: ag
|
|
|
|
type(mld_sml_parms), intent(inout) :: parms
|
|
|
|
type(mld_sml_parms), intent(inout) :: parms
|
|
|
|
type(psb_cspmat_type), intent(in) :: a
|
|
|
|
type(psb_cspmat_type), intent(in) :: a
|
|
|
|
type(psb_desc_type), intent(in) :: desc_a
|
|
|
|
type(psb_desc_type), intent(inout) :: desc_a
|
|
|
|
integer(psb_lpk_), intent(inout) :: ilaggr(:), nlaggr(:)
|
|
|
|
integer(psb_lpk_), intent(inout) :: ilaggr(:), nlaggr(:)
|
|
|
|
type(psb_lcspmat_type), intent(inout) :: op_prol
|
|
|
|
type(psb_lcspmat_type), intent(inout) :: op_prol
|
|
|
|
type(psb_lcspmat_type), intent(out) :: ac,op_restr
|
|
|
|
type(psb_lcspmat_type), intent(out) :: ac,op_restr
|
|
|
@ -134,7 +134,7 @@ module mld_c_dec_aggregator_mod
|
|
|
|
class(mld_c_dec_aggregator_type), target, intent(inout) :: ag
|
|
|
|
class(mld_c_dec_aggregator_type), target, intent(inout) :: ag
|
|
|
|
type(mld_sml_parms), intent(inout) :: parms
|
|
|
|
type(mld_sml_parms), intent(inout) :: parms
|
|
|
|
type(psb_cspmat_type), intent(in) :: a
|
|
|
|
type(psb_cspmat_type), intent(in) :: a
|
|
|
|
type(psb_desc_type), intent(in) :: desc_a
|
|
|
|
type(psb_desc_type), intent(inout) :: desc_a
|
|
|
|
integer(psb_lpk_), intent(inout) :: ilaggr(:), nlaggr(:)
|
|
|
|
integer(psb_lpk_), intent(inout) :: ilaggr(:), nlaggr(:)
|
|
|
|
type(psb_lcspmat_type), intent(inout) :: op_prol,ac,op_restr
|
|
|
|
type(psb_lcspmat_type), intent(inout) :: op_prol,ac,op_restr
|
|
|
|
type(psb_desc_type), intent(inout) :: desc_ac
|
|
|
|
type(psb_desc_type), intent(inout) :: desc_ac
|
|
|
|