From 52f7e4a4321a378267b067f9b6cdefe1475dd09b Mon Sep 17 00:00:00 2001 From: yye00 Date: Wed, 7 Dec 2005 22:32:35 +0000 Subject: fix pointed out by Erik, inconsistent memory usage git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@384 89daf98e-ef62-4674-b946-b8ff9de2216c --- src/AHFinder_gau.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/AHFinder_gau.F b/src/AHFinder_gau.F index ed74d51..d4d03ed 100644 --- a/src/AHFinder_gau.F +++ b/src/AHFinder_gau.F @@ -87,7 +87,7 @@ c CCTK_REAL i2dx,i2dy,i2dz,idxx,idyy,idzz,idxy,idxz,idyz ! Reduction variables CCTK_INT , dimension(1) :: input_array_dim - CCTK_POINTER_TO_CONST, dimension(1) :: input_array + CCTK_POINTER_TO_CONST, dimension(3) :: input_array CCTK_POINTER, dimension(1) :: reduction_value CCTK_POINTER, dimension(3) :: reduction_value3 CCTK_INT, dimension(3) ::input_array_type -- cgit v1.2.3