• Clojure
  • 43 lines
  • 1781 views
  • Private
  • Pasted by anonymous on February 5, 2013
;; A teaser to practical Swearjure by hyPiRion
;; Part I: Quicksort

(#((% (+ (*) (*))) % (`[~@%&] (+)))
 [#({} %& [])
  #([[(`[~@%] (+))]] (+))
  #((% ({[] (+)} `[~@(`[~@%&] (+))] (+ (*) (*) (*))))
    % (`[~@%&] (+)))
  #([`[~@((% (+ (*) (*))) %
          ((% (+ (*) (*) (*) (*))) % (`[~@(`[~@%&] (+))] (+))
           (`[~@%&] (+))))
       ~(`[~@(`[~@%&] (+))] (+))
       ~@((% (+ (*) (*))) %
          ((% (* (+ (*) (*)) (+ (*) (*) (*)))) % (`[~@(`[~@%&] (+))] (+))
           ((% (* (+ (*) (*)) (+ (*) (*) (*) (*)))) % (`[~@%&] (+)))))]] (+))
  #((% ({[] (+)}
        `[~@(`[~@%&] (*))] (+ (*) (*) (*) (*) (*))))
    % (`[~@%&] (+)) (`[~@%&] (*)))
  #([`[~@((% ({(= + +) (*)}
              (< (`[~@(`[~@%&] (*))] (+)) (`[~@%&] (+)))
              (+)))
          (`[~@%&] (*)))
       ~@((% (+ (*) (*) (*) (*))) % (`[~@%&] (+))
          ((% (* (+ (*) (*)) (+ (*) (*) (*) (*)))) % (`[~@%&] (*))))]] (+))
  #((% ({[] (+)}
        `[~@(`[~@%&] (*))] (+ (*) (* (+ (*) (*)) (+ (*) (*) (*))))))
    % (`[~@%&] (+)) (`[~@%&] (*)))
  #([`[~@((% ({(= + +) (*)}
              (>= (`[~@(`[~@%&] (*))] (+)) (`[~@%&] (+)))
              (+)))
          (`[~@%&] (*)))
       ~@((% (* (+ (*) (*)) (+ (*) (*) (*)))) % (`[~@%&] (+))
          ((% (* (+ (*) (*)) (+ (*) (*) (*) (*)))) % (`[~@%&] (*))))]] (+))
  #((% ({[] (+)} `[~@(`[~@%&] (+))] (* (+ (*) (*) (*)) (+ (*) (*) (*)))))
    % (`[~@%&] (+)) (*) [])
  #((% ({'% (+ (*) (* (+ (*) (*) (*)) (+ (*) (*) (*))))}
        (`[~@(`[~@%&] (+)) ~'%] (`[~@%&] (*)))
        (- (* (+ (*) (*) (*)) (+ (*) (*) (*) (*))) (*))))
    % (`[~@%&] (+)) (`[~@%&] (*)) (`[~@%&] (+ (*) (*))))
  #({} % (`[~@%&] (+ (*) (*))))
  #((% (* (+ (*) (*) (*)) (+ (*) (*) (*)))) % (`[~@%&] (+))(+ (`[~@%&] (*)) (*))
    `[~@(`[~@%&] (+ (*) (*))) ~(`[~@(`[~@%&] (+))] (`[~@%&] (*)))])]
   [3 0 2 4 1 5])

Did you know? CLOSE

  • There are keyboard shortcuts!
    • When Creating A Paste
      • ALT+P Toggle Private
      • CTRL+Enter Create Paste
      • ALT+W Toggle word wrap
    • When Viewing A Paste
      • ALT+G Go to a line
      • ALT+CTRL+E Edit the paste
      • ALT+R Show the raw code
  • There are URL options!
    • When Creating A Paste
      • ?lang=Javascript to default to javascript
    • When Viewing A Paste
      • #L-N Jump to line number N
?