Data.EventList.Relative.BodyBody

data T time body

concatMapMonoid

traverse

mapM