aboutsummaryrefslogtreecommitdiff
path: root/src/AHFinder_dat.F
diff options
context:
space:
mode:
authorpollney <pollney@89daf98e-ef62-4674-b946-b8ff9de2216c>2002-12-13 15:39:01 +0000
committerpollney <pollney@89daf98e-ef62-4674-b946-b8ff9de2216c>2002-12-13 15:39:01 +0000
commitdf8bb95c19fd2476e762daa0f4880fea475e3b34 (patch)
treeaf3750bbe6d936b194f18d573873be69696f2ea2 /src/AHFinder_dat.F
parent148275738986b70f6321a67b19c167ccd057018d (diff)
Modified output so that data is appended after checkpoint, rather
than deleting any existing files. * Starting a run from scratch will still wipe out any files that already exist in the output directory, as is usual for cactus 1d data. * If you do a horizon find on the timestep when you are also checkpointing, then you'll end up with a duplicate point in the output, as the horizon is found again at restart. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@320 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_dat.F')
-rw-r--r--src/AHFinder_dat.F2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/AHFinder_dat.F b/src/AHFinder_dat.F
index a7fc589..718d16e 100644
--- a/src/AHFinder_dat.F
+++ b/src/AHFinder_dat.F
@@ -59,7 +59,7 @@
CCTK_REAL, allocatable, dimension (:,:) :: hflowc,cflowc,nflowc
CCTK_REAL, allocatable, dimension (:,:) :: hflows,cflows,nflows
- character*200 filestr
+ character(len=200) :: filestr
data ahf_ncall / 0 /
data status_old / .false. /