diff --git a/mlprec/impl/mld_cprecinit.F90 b/mlprec/impl/mld_cprecinit.F90
index 3681caac..c6e3330f 100644
--- a/mlprec/impl/mld_cprecinit.F90
+++ b/mlprec/impl/mld_cprecinit.F90
@@ -207,6 +207,7 @@ subroutine mld_cprecinit(p,ptype,info,nlev)
     do ilev_=1,nlev_
       call p%precv(ilev_)%set(mld_aggr_thresh_,thr,info)
       call p%precv(ilev_)%set(mld_aggr_scale_,scale,info)
+      call p%precv(ilev_)%set(mld_aggr_filter_,mld_no_filter_mat_,info)
     end do
 
   case default
diff --git a/mlprec/impl/mld_dprecinit.F90 b/mlprec/impl/mld_dprecinit.F90
index 3276c9e7..b4ab1d50 100644
--- a/mlprec/impl/mld_dprecinit.F90
+++ b/mlprec/impl/mld_dprecinit.F90
@@ -212,6 +212,7 @@ subroutine mld_dprecinit(p,ptype,info,nlev)
     do ilev_=1,nlev_
       call p%precv(ilev_)%set(mld_aggr_thresh_,thr,info)
       call p%precv(ilev_)%set(mld_aggr_scale_,scale,info)
+      call p%precv(ilev_)%set(mld_aggr_filter_,mld_no_filter_mat_,info)
     end do
 
   case default
diff --git a/mlprec/impl/mld_sprecinit.F90 b/mlprec/impl/mld_sprecinit.F90
index 5474d9b5..f3fba2fc 100644
--- a/mlprec/impl/mld_sprecinit.F90
+++ b/mlprec/impl/mld_sprecinit.F90
@@ -207,6 +207,7 @@ subroutine mld_sprecinit(p,ptype,info,nlev)
     do ilev_=1,nlev_
       call p%precv(ilev_)%set(mld_aggr_thresh_,thr,info)
       call p%precv(ilev_)%set(mld_aggr_scale_,scale,info)
+      call p%precv(ilev_)%set(mld_aggr_filter_,mld_no_filter_mat_,info)
     end do
 
   case default
diff --git a/mlprec/impl/mld_zprecinit.F90 b/mlprec/impl/mld_zprecinit.F90
index 548f7d85..1dac23a8 100644
--- a/mlprec/impl/mld_zprecinit.F90
+++ b/mlprec/impl/mld_zprecinit.F90
@@ -212,6 +212,7 @@ subroutine mld_zprecinit(p,ptype,info,nlev)
     do ilev_=1,nlev_
       call p%precv(ilev_)%set(mld_aggr_thresh_,thr,info)
       call p%precv(ilev_)%set(mld_aggr_scale_,scale,info)
+      call p%precv(ilev_)%set(mld_aggr_filter_,mld_no_filter_mat_,info)
     end do
 
   case default