Skip to content

Instantly share code, notes, and snippets.

@Sophia-Gold
Created June 12, 2018 01:15
Show Gist options
  • Select an option

  • Save Sophia-Gold/e80eb539e9ebec0571aa76d02ef3c0fe to your computer and use it in GitHub Desktop.

Select an option

Save Sophia-Gold/e80eb539e9ebec0571aa76d02ef3c0fe to your computer and use it in GitHub Desktop.
-- https://aupiff.com/eliminating-explicit-parentheses-with-a-handy-combinator
u = (:) 'g' (show 13)
u' = (.) (.) (:) 'g' show 13
v = length ((:) 1 [4,2])
v' = (.) (.) (.) length (:) 1 [4,2]
w = (++) "elab" ((:) 'o' "rate")
w' = (.) ((.) (.) (.)) (++) "elab" (:) 'o' "rate"
w'' = (.) ((.) (.)) ((.) (.)) (++) "elab" (:) 'o' "rate"
divide = (/)
mult = (*)
q = divide 3 (mult 5 4)
q' = (.) flip ((.) ((.) (.)) ((.) (.))) divide mult 3 5 4
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment