--- a/gameServer/Consts.hs	Sat Jul 21 02:19:32 2018 +0300
+++ b/gameServer/Consts.hs	Fri Jul 20 20:00:52 2018 -0400
@@ -23,3 +23,12 @@
 
 serverVersion :: B.ByteString
 serverVersion = "3"
+
+cHogsPerTeam :: Int
+cHogsPerTeam = 8
+
+cMaxTeams :: Int
+cMaxTeams = 8
+
+cMaxHHs :: Int
+cMaxHHs = cHogsPerTeam * cMaxTeams