Skip to content

Instantly share code, notes, and snippets.

@cartermp

cartermp/pipe-forward.scm

Created December 25, 2014 00:13
Show Gist options
  • Save cartermp/f329105ef9d52cb3f9dd to your computer and use it in GitHub Desktop.
Save cartermp/f329105ef9d52cb3f9dd to your computer and use it in GitHub Desktop.
Download ZIP
F# pipe-forward operator implemented in Scheme with a quick test
Raw
pipe-forward.scm
(define (|> f g)
(g f))
(define (square x)
(* x x))
(|> '(1 2 3 4 5) (lambda (x) (map square x)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment