1 module HWProtoInRoomState where

     2 module HWProtoInRoomState where

     2 

     3 

     3 import qualified Data.Foldable as Foldable

     4 import qualified Data.Foldable as Foldable

     4 import qualified Data.Map as Map

     5 import qualified Data.Map as Map

     5 import Data.Sequence(Seq, (|>), (><), fromList, empty)

     6 import Data.Sequence(Seq, (|>), (><), fromList, empty)