diff options
-rw-r--r-- | src/Lib.hs | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -35,8 +35,7 @@ automatize dir (QNMFormula (Neg : quas) m) = let nfa = automatize dir (QNMFormula quas m) in minReachability (length dir) (ncompl nfa) where - md dfa = minDistinguishability dfa (length dir) - ncompl = nondeterminize . compl . md . determinize + ncompl = nondeterminize . compl . determinize automatize dir (QNMFormula (Qua (Exists, v) : quas) m) = let nfa = automatize dir (QNMFormula quas m) in case M.lookup (Var v) dir of |