optimize :: Expr -> Expr | |
optimize = cata (optimizeMul `comp` optimizeAdd) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
optimize :: Expr -> Expr | |
optimize = cata (optimizeMul `comp` optimizeAdd) |