summaryrefslogtreecommitdiff
path: root/Assignment2/src/DTMC.icl
diff options
context:
space:
mode:
Diffstat (limited to 'Assignment2/src/DTMC.icl')
-rw-r--r--Assignment2/src/DTMC.icl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assignment2/src/DTMC.icl b/Assignment2/src/DTMC.icl
index 9d3eda1..0adfa1f 100644
--- a/Assignment2/src/DTMC.icl
+++ b/Assignment2/src/DTMC.icl
@@ -283,7 +283,7 @@ Start w
# (z3,w) = startZ3 w
# (dtmc,w) = assertProperty prop dtmc z3 w
# (rC,dtmc) = repairConfig dtmc
-# (_,w) = mapSt (\s w -> (0, addAssert z3 s w)) rC.totality_restrictions w // Ugly, I know, don't care
+# w = seqSt (addAssert z3) rC.totality_restrictions w
# (dtmcs,dtmc) = printDTMC dtmc
# (_,w) = writeFile drn_out dtmcs w
= w