From cab695bb52a140b7bf91105866763aaeea750750 Mon Sep 17 00:00:00 2001 From: allen Date: Thu, 6 Jul 2000 09:13:53 +0000 Subject: Fixed typo git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/Extract/trunk@17 5301f0c2-dbc4-4cee-b2f5-8d7afba4d129 --- src/Extract.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Extract.F b/src/Extract.F index 3bdc63b..658721a 100644 --- a/src/Extract.F +++ b/src/Extract.F @@ -105,7 +105,7 @@ c 0. Check to see if Extract should have been called c c ------------------------------------------------------------------ - IF (itout) .LE. 0) RETURN + IF ((itout) .LE. 0) RETURN IF (MODULO(int(cctk_iteration),int(itout)) .NE. 0) RETURN if (verbose == 1) then -- cgit v1.2.3