Commit 3ef9ccea authored by Philipp Meyer's avatar Philipp Meyer
Browse files

Make protocol generator produce correct remainder predicate

parent c3f3c6f4
Loading
Loading
Loading
Loading
+1 −1
Original line number Original line Diff line number Diff line
@@ -281,7 +281,7 @@ createModuloProtocol n c = PopulationProtocol { states = [Mod i | i <- [0..(n-1)


    modPredicate = "( " ++
    modPredicate = "( " ++
                    (intercalate " + " [ show i ++ " * " ++ toVar (Mod i) | i <- [0..(n-1)] ]) ++
                    (intercalate " + " [ show i ++ " * " ++ toVar (Mod i) | i <- [0..(n-1)] ]) ++
                    " ) % " ++ show n ++ " = " ++ show c
                    " ) =% " ++ show n ++ " " ++ show c




createMajorityProtocol :: MajorityProtocol
createMajorityProtocol :: MajorityProtocol