diff --git a/src/EXTRA-COMPUTE/compute_slcsa_atom.cpp b/src/EXTRA-COMPUTE/compute_slcsa_atom.cpp
index 1cc11d4fb2..f12551085c 100644
--- a/src/EXTRA-COMPUTE/compute_slcsa_atom.cpp
+++ b/src/EXTRA-COMPUTE/compute_slcsa_atom.cpp
@@ -382,6 +382,7 @@ void ComputeSLCSAAtom::compute_peratom()
   memory->destroy(scores);
   memory->destroy(probas);
   memory->destroy(prodright);
+  memory->destroy(dmaha);
 }
 
 int ComputeSLCSAAtom::compute_ncomps(int twojmax)