From 14d853c8786ba9318f3985fce05cdd8de242f193 Mon Sep 17 00:00:00 2001
From: Arity-T <tish.mainmail@gmail.com>
Date: Thu, 5 Dec 2024 18:13:01 +0300
Subject: [PATCH] =?UTF-8?q?=D0=97=D0=B0=D0=B1=D1=8B=D0=BB=20=D0=B8=D1=81?=
 =?UTF-8?q?=D0=BF=D1=80=D0=B0=D0=B2=D0=B8=D1=82=D1=8C=20=D0=BE=D0=BF=D0=B5?=
 =?UTF-8?q?=D1=87=D0=B0=D1=82=D0=BA=D1=83?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lab4/src/Lib.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lab4/src/Lib.hs b/lab4/src/Lib.hs
index 7c78342..5c91057 100644
--- a/lab4/src/Lib.hs
+++ b/lab4/src/Lib.hs
@@ -4,7 +4,7 @@ module Lib
     ) where
 
 isCongruent :: Int -> Int -> Int -> Bool
-isCongruent a b d = a `mod` d + 1 == b `mod` d
+isCongruent a b d = a `mod` d == b `mod` d
 
 
 filterByPredicate :: (a -> Bool) -> [a] -> [a]