simplify imports in Waterdeep.Types

This commit is contained in:
Jesse D. McDonald 2014-07-26 17:07:47 -05:00
parent 62260d2d28
commit a8d2a603be
1 changed files with 4 additions and 7 deletions

View File

@ -111,8 +111,6 @@ import Control.Monad.State.Class
import Control.Monad.Trans
import Control.Monad.Trans.Maybe (MaybeT, runMaybeT)
import Control.Monad.Trans.State (StateT, runStateT)
import Data.IntMap (IntMap)
import Data.Map (Map)
import Data.Maybe
import Data.Monoid
import Lens.Family2
@ -123,7 +121,6 @@ import Lens.Family2.Unchecked (lens)
import System.Random (StdGen)
import qualified Data.IntMap as IM
import qualified Data.Map as M
import qualified Data.MultiSet as MS
import qualified System.Random as R
@ -200,7 +197,7 @@ data BuildingState =
data WaterdeepState =
WaterdeepState
{ _gamePlayerStates :: IntMap PlayerState
{ _gamePlayerStates :: IM.IntMap PlayerState
, _gameNumberOfPlayers :: Int
, _gameFirstPlayer :: PlayerID
, _gameCurrentRound :: Int
@ -214,9 +211,9 @@ data WaterdeepState =
, _gameIntrigueDiscard :: [IntrigueCard]
, _gameBuildingDeck :: [Building]
, _gameBuildingDiscard :: [Building]
, _gameBuildersHall :: IntMap BuildingState
, _gameBuildings :: IntMap BuildingState
, _gameWaterdeepHarbor :: IntMap BuildingState
, _gameBuildersHall :: IM.IntMap BuildingState
, _gameBuildings :: IM.IntMap BuildingState
, _gameWaterdeepHarbor :: IM.IntMap BuildingState
, _gameReassigningAgents :: Bool
, _gameStdGen :: StdGen
}