Advertisement
Guest User

Untitled

a guest
Jan 20th, 2017
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.10 KB | None | 0 0
  1. cataExpr :: (ExprR a -> a) -> Expr -> a
  2. cataExpr algebra =
  3. algebra
  4. . fmap (cataExpr algebra)
  5. . unFix
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement