Removed unneeded constraint for checking closure

ddea4d17 · Philipp Meyer · bdde204b · ddea4d17
Commit ddea4d17 authored May 19, 2014 by Philipp Meyer
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/Solver/SComponent.hs src/Solver/SComponent.hs +1 -1

No files found.
--- a/src/Solver/SComponent.hs
+++ b/src/Solver/SComponent.hs
@@ -46,7 +46,7 @@ checkClosed net ax m =
                             [(t,t') | t <- pre net p, t' <- post net p,
                                       cElem ax t, cElem ax t' ])
              checkTransition (t,t') =
-                  mElem m (prime t) &&& mElem m t' ==> mElem m (prime t')
+                  mElem m (prime t) ==> mElem m (prime t')

 checkTokens :: PetriNet -> ModelSI -> SBool
 checkTokens net m =