diff --git a/Examples/HydrogenAtom/main.f90 b/Examples/HydrogenAtom/main.f90
index 92e3ac65..b7cd2121 100644
--- a/Examples/HydrogenAtom/main.f90
+++ b/Examples/HydrogenAtom/main.f90
@@ -3,7 +3,6 @@
 PROGRAM HydrogenAtom
   USE DataTypesModule, ONLY : NTREAL
   USE DensityMatrixSolversModule, ONLY : TRS2
-  USE PermutationModule, ONLY : Permutation_t, ConstructRandomPermutation
   USE ProcessGridModule, ONLY : ConstructProcessGrid, DestructProcessGrid
   USE PSMatrixModule, ONLY : Matrix_ps, WriteMatrixToMatrixMarket, &
        & ConstructEmptyMatrix, FillMatrixFromTripletList, CopyMatrix, &
diff --git a/Examples/OverlapMatrix/main.f90 b/Examples/OverlapMatrix/main.f90
index 44a53ac7..9a8ec862 100644
--- a/Examples/OverlapMatrix/main.f90
+++ b/Examples/OverlapMatrix/main.f90
@@ -2,7 +2,8 @@
 !> An example that shows how to compute the overlap matrix.
 PROGRAM OverlapExample
   USE DataTypesModule, ONLY : NTREAL
-  USE PermutationModule, ONLY : Permutation_t, ConstructRandomPermutation
+  USE PermutationModule, ONLY : Permutation_t, ConstructRandomPermutation, &
+       & DestructPermutation
   USE ProcessGridModule, ONLY : ConstructProcessGrid, global_grid, &
        & DestructProcessGrid
   USE PSMatrixModule, ONLY : Matrix_ps, ConstructEmptyMatrix, &
@@ -124,6 +125,7 @@ PROGRAM OverlapExample
 
   !! Cleanup
   CALL PrintAllTimers()
+  CALL DestructPermutation(permutation)
   CALL DestructMatrix(Overlap)
   CALL DestructMatrix(ISQOverlap)
   CALL DestructProcessGrid
diff --git a/Examples/PremadeMatrix/main.f90 b/Examples/PremadeMatrix/main.f90
index 90dd414e..962b9595 100644
--- a/Examples/PremadeMatrix/main.f90
+++ b/Examples/PremadeMatrix/main.f90
@@ -4,7 +4,8 @@ PROGRAM PremadeMatrixProgram
   USE DataTypesModule, ONLY : NTREAL
   USE DensityMatrixSolversModule, ONLY : TRS2
   USE LoggingModule, ONLY : EnterSubLog, ExitSubLog, WriteElement, WriteHeader
-  USE PermutationModule, ONLY : Permutation_t, ConstructRandomPermutation
+  USE PermutationModule, ONLY : Permutation_t, ConstructRandomPermutation, &
+       & DestructPermutation
   USE ProcessGridModule, ONLY : ConstructProcessGrid, IsRoot, &
        & DestructProcessGrid
   USE PSMatrixModule, ONLY : Matrix_ps, ConstructMatrixFromMatrixMarket, &
@@ -111,6 +112,7 @@ PROGRAM PremadeMatrixProgram
   CALL WriteMatrixToMatrixMarket(Density,density_file_out)
 
   !! Cleanup
+  CALL DestructPermutation(permutation)
   CALL DestructMatrix(Overlap)
   CALL DestructMatrix(ISQOverlap)
   CALL DestructMatrix(Hamiltonian)