From 090eb6e87e6326df3f24ec0ecdac9b58a6761da9 Mon Sep 17 00:00:00 2001 From: hawke Date: Mon, 3 Nov 2003 13:59:47 +0000 Subject: Excision is active when emask is 0, not 1. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/ADMConstraints/trunk@97 b7a48df3-cbbf-4440-997f-b4b717c9f7fc --- src/ADMConstraints.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F index 87a27a5..6dc45a7 100644 --- a/src/ADMConstraints.F +++ b/src/ADMConstraints.F @@ -118,7 +118,7 @@ c Calculate constraints. docalc = .TRUE. if (use_mask .eq. 1) then - if (abs(emask(i,j,k) - 1) < 0.001) then + if (abs(emask(i,j,k)) < 0.001) then docalc = .FALSE. end if end if -- cgit v1.2.3