[gpkde, memory, deallocate] solves minor memory leak, deallocating di…

…mensions array in kernel module, passing cleanly through valgrind.
upc-ghs · Aug 8, 2024 · d795dd1 · d795dd1
1 parent a7ceabb
commit d795dd1
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/GridProjectedKDE.F90 b/src/GridProjectedKDE.F90
@@ -8,6 +8,7 @@ module GridProjectedKDEModule
                               fSIX, fEIGHT, pi, sqrtEightPi
   use HistogramModule, only : HistogramType
   use KernelMultiGaussianModule, only : InitializeKernelDimensions, &
+                                             ResetKernelDimensions, &
                                            KernelMultiGaussianType, &
                                        KernelSecondDerivativeXType, &
                                        KernelSecondDerivativeYType, &
@@ -1121,8 +1122,10 @@ subroutine prReset( this )
 
     if ( associated(this%histogramCounts)  ) this%histogramCounts  => null()
     if ( associated(this%histogramWCounts) ) this%histogramWCounts => null()
-
-
+    !
+    ! -- reset in kernel module
+    call ResetKernelDimensions() 
+    !
   end subroutine prReset