runExplore :: Monoid m => Explore a -> (a -> m) -> m
runExplore = runCont . unExplore
runExplore :: Monoid m => Explore a -> (a -> m) -> m
runExplore = runCont . unExplore
runExplore = runCont . unExplore