module Main where import MiniTreeRollouts.Plan ( renderPaths , renderPlan , samplePlan ) main :: IO () main = do putStrLn "plan:" putStrLn (renderPlan samplePlan) putStrLn "paths:" putStr (renderPaths samplePlan)