Skip to content

Instantly share code, notes, and snippets.

@timmc
Created March 4, 2011 23:48
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save timmc/855925 to your computer and use it in GitHub Desktop.
Save timmc/855925 to your computer and use it in GitHub Desktop.
;; Original:
((fn[[?<&,%*+,$*|]](?<&,%*+,$*|))({[^:<?>,'*$][+(+(*)(*))(*,3(*))]}['*$]))
;; Without gratuitous use of non-alphanumerics in symbols
((fn[[a,b,c]](a,b,c))({[^:x,'y][+(+(*)(*))(*,3(*))]}['y]))
;; and spacing normalized
((fn [[a b c]] (a b c)) ({[^:x 'y] [+ (+ (*) (*)) (* 3 (*))]} ['y]))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment