diff --git a/src/generate_databases/setup_mesh_adjacency.f90 b/src/generate_databases/setup_mesh_adjacency.f90 index a53391f28..2587cd9d4 100644 --- a/src/generate_databases/setup_mesh_adjacency.f90 +++ b/src/generate_databases/setup_mesh_adjacency.f90 @@ -354,6 +354,7 @@ subroutine setup_mesh_adjacency() ! frees temporary array deallocate(ibool_corner) + deallocate(node_to_elem,node_to_elem_count) ! debug: for vtk output if (DEBUG_VTK_OUTPUT) then