Skip to content

GitLab

Notice to GitKraken users: A vulnerability has been found in the SSH key generation of GitKraken versions 7.6.0 to 8.0.0 (https://www.gitkraken.com/blog/weak-ssh-key-fix). If you use GitKraken and have generated a SSH key using one of these versions, please remove it both from your local workstation and from your LRZ GitLab profile.

21.10.2021, 9:00 - 11:00: Due to updates GitLab may be unavailable for some minutes between 09:00 and 11:00.

Commit c892a4e3 authored by Philipp Meyer's avatar Philipp Meyer
Browse files

Removed debug output from communication-free solver

parent d99ffafa
Hide whitespace changes
Inline Side-by-side
src/Solver/CommFreeReachability.hs
View file @ c892a4e3
......@@ -8,7 +8,6 @@ import PetriNet
import Property
import Solver
import Solver.StateEquation
import Debug.Trace
checkSubnet :: PetriNet -> ModelSI -> SBool
checkSubnet net m =
......@@ -31,11 +30,9 @@ checkNodes net m =
where checkNode p =
mVal m (prime p) .> 0 ==> bOr (map checkPreCond (pre net p))
where checkPreCond t =
trace ("checking '" ++ p ++ " > 0 => '" ++ p ++ " > '" ++ head (pre net t)
++ " ^ " ++ t ++ " > 0")
(mVal m (prime p) .>
mVal m (prime (head (pre net t))) &&&
mVal m t .> 0)
mVal m (prime p) .==
mVal m (prime (head (pre net t))) + 1 &&&
mVal m t .> 0
checkMarkableSubnet :: PetriNet -> ModelSI -> SBool
checkMarkableSubnet net m =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment