From 7d3ae1673f039fbd6c3843b32df1d3952c8d6685 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Thu, 24 Jan 2019 16:16:41 +0100 Subject: [PATCH] not needed --- src/FEM_utilities.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/src/FEM_utilities.f90 b/src/FEM_utilities.f90 index 1db950e63..bf5e62851 100644 --- a/src/FEM_utilities.f90 +++ b/src/FEM_utilities.f90 @@ -503,7 +503,6 @@ subroutine utilities_indexActiveSet(field,section,x_local,f_local,localIS,global CHKERRQ(ierr) call ISDestroy(dummyIS,ierr); CHKERRQ(ierr) endif - deallocate(localIndices) end subroutine utilities_indexActiveSet