diff --git a/amgprec/impl/smoother/amg_c_as_smoother_free.f90 b/amgprec/impl/smoother/amg_c_as_smoother_free.f90
index 77ae7e95..6c22e1d2 100644
--- a/amgprec/impl/smoother/amg_c_as_smoother_free.f90
+++ b/amgprec/impl/smoother/amg_c_as_smoother_free.f90
@@ -61,6 +61,7 @@ subroutine amg_c_as_smoother_free(sm,info)
     end if
   end if
   call sm%nd%free()
+  call sm%desc_data%free(info)
 
   call psb_erractionrestore(err_act)
   return
diff --git a/amgprec/impl/smoother/amg_d_as_smoother_free.f90 b/amgprec/impl/smoother/amg_d_as_smoother_free.f90
index d6217e0f..b5e1aa6e 100644
--- a/amgprec/impl/smoother/amg_d_as_smoother_free.f90
+++ b/amgprec/impl/smoother/amg_d_as_smoother_free.f90
@@ -61,6 +61,7 @@ subroutine amg_d_as_smoother_free(sm,info)
     end if
   end if
   call sm%nd%free()
+  call sm%desc_data%free(info)
 
   call psb_erractionrestore(err_act)
   return
diff --git a/amgprec/impl/smoother/amg_s_as_smoother_free.f90 b/amgprec/impl/smoother/amg_s_as_smoother_free.f90
index e245e17f..3085f485 100644
--- a/amgprec/impl/smoother/amg_s_as_smoother_free.f90
+++ b/amgprec/impl/smoother/amg_s_as_smoother_free.f90
@@ -61,6 +61,7 @@ subroutine amg_s_as_smoother_free(sm,info)
     end if
   end if
   call sm%nd%free()
+  call sm%desc_data%free(info)
 
   call psb_erractionrestore(err_act)
   return
diff --git a/amgprec/impl/smoother/amg_z_as_smoother_free.f90 b/amgprec/impl/smoother/amg_z_as_smoother_free.f90
index 3fce8b8a..dc6c98b6 100644
--- a/amgprec/impl/smoother/amg_z_as_smoother_free.f90
+++ b/amgprec/impl/smoother/amg_z_as_smoother_free.f90
@@ -61,6 +61,7 @@ subroutine amg_z_as_smoother_free(sm,info)
     end if
   end if
   call sm%nd%free()
+  call sm%desc_data%free(info)
 
   call psb_erractionrestore(err_act)
   return