diff options
author | tradke <tradke@5301f0c2-dbc4-4cee-b2f5-8d7afba4d129> | 2000-06-29 14:00:32 +0000 |
---|---|---|
committer | tradke <tradke@5301f0c2-dbc4-4cee-b2f5-8d7afba4d129> | 2000-06-29 14:00:32 +0000 |
commit | e1d4e52632ab27ce4fb79e47f899b3db1e24f10b (patch) | |
tree | ee6e925837a656bd7826fd6834b5eb6226d5c565 | |
parent | af301e77e570f5d9ee4da0a3f0d7d03a44eb9d41 (diff) |
Disable extract if itout is 0.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/Extract/trunk@16 5301f0c2-dbc4-4cee-b2f5-8d7afba4d129
-rw-r--r-- | src/Extract.F | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Extract.F b/src/Extract.F index c59cd1c..3bdc63b 100644 --- a/src/Extract.F +++ b/src/Extract.F @@ -105,6 +105,7 @@ c 0. Check to see if Extract should have been called c c ------------------------------------------------------------------ + IF (itout) .LE. 0) RETURN IF (MODULO(int(cctk_iteration),int(itout)) .NE. 0) RETURN if (verbose == 1) then |