diff --git a/lab2/prisoner/game.hs b/lab2/prisoner/game.hs
index 96adbfe..ddeb426 100644
--- a/lab2/prisoner/game.hs
+++ b/lab2/prisoner/game.hs
@@ -14,7 +14,7 @@ indexOf (x : xs) target
   | x == target = 0
   | otherwise = 1 + indexOf xs target
 
-nashEquilibriumStrategy :: [a] -> [Char] -> Int -> [Char]
+nashEquilibriumStrategy :: [Char] -> [Char] -> Int -> [Char]
 nashEquilibriumStrategy opponentMoves generatedMoves n =
   if n <= 100 && length opponentMoves > 0
     then
@@ -29,7 +29,7 @@ nashEquilibriumStrategy opponentMoves generatedMoves n =
       ]
     nextStep = cases !! indexOf results result !! 1
 
-getScore :: Num t => [Char] -> [Char] -> t -> t -> (t, t)
+getScore :: [Char] -> [Char] -> Int -> Int -> (Int, Int)
 getScore moves1 moves2 score1 score2 =
     if length moves1 == 0 then (score1, score2)
     else getScore (tail moves1) (tail moves2) newScore1 newScore2