Use modulos operation in remainder protocol

benchmarks/pp-print/src/PopulationProtocol.hs

@@ -279,9 +279,9 @@ createModuloProtocol n c = PopulationProtocol { states = [Mod i | i <- [0..(n-1)
     modOpinion (Mod a) = a == c
     modOpinion (ModPassive b) = b
 
-    modPredicate = "EXISTS k : " ++
+    modPredicate = "( " ++
                     (intercalate " + " [ show i ++ " * " ++ toVar (Mod i) | i <- [0..(n-1)] ]) ++
-                    " = " ++ show c ++ " + " ++ show n ++ " * k"
+                    " ) % " ++ show n ++ " = " ++ show c
 
 
 createMajorityProtocol :: MajorityProtocol