changeset 13531 | 282218ab1b28 |
parent 13510 | 69f0f437c75a |
child 13696 | d732ca5dcab9 |
13530:80db7232b4b5 | 13531:282218ab1b28 |
---|---|
21 |
21 |
22 import qualified Data.ByteString.Char8 as B |
22 import qualified Data.ByteString.Char8 as B |
23 |
23 |
24 serverVersion :: B.ByteString |
24 serverVersion :: B.ByteString |
25 serverVersion = "3" |
25 serverVersion = "3" |
26 |
|
27 cHogsPerTeam :: Int |
|
28 cHogsPerTeam = 8 |
|
29 |
|
30 cMaxTeams :: Int |
|
31 cMaxTeams = 8 |
|
32 |
|
33 cMaxHHs :: Int |
|
34 cMaxHHs = cHogsPerTeam * cMaxTeams |