module test

import iTasks
import qualified Data.Map as DM

Start w = startEngine t w

t :: Task ('DM'.Map Int String)
t = viewInformation () [] ('DM'.fromList [(42, "foo")])