diff options
| author | miguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-10-03 09:42:00 +0000 |
|---|---|---|
| committer | miguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-10-03 09:42:00 +0000 |
| commit | bb66cc1eda3369c4bc83b1ec60da2896cf11a532 (patch) | |
| tree | 6a03b084e7a52fc3176463cf6fd0e91dba62136d /src | |
| parent | 23ed1898df8ea0e029cb59ddb1f19c79d9e12bfe (diff) | |
Making sure it does not try to calculate distance between horizons when those
horizons do not exist.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@248 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src')
| -rw-r--r-- | src/AHFinder.F | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/AHFinder.F b/src/AHFinder.F index 0033fd0..81e3454 100644 --- a/src/AHFinder.F +++ b/src/AHFinder.F @@ -1400,7 +1400,9 @@ ! ****************************************************** if (find3) then - call AHFinder_find3(CCTK_ARGUMENTS,mtype) + if (status_old_1.and.status_old_2) then + call AHFinder_find3(CCTK_ARGUMENTS,mtype) + end if end if |