1번타자 Common LISP
defun quicksort (list &aux (pivot (car list)) )(if (cdr list)
(nconc (quicksort (remove-if-not #'(lambda (x) (< x pivot)) list))
(remove-if-not #'(lambda (x) (= x pivot)) list)
(quicksort (remove-if-not #'(lambda (x) (> x pivot)) list)))
list))
2번타자 Haskell
qsort [] = []qsort (x:xs) = qsort [y | y <- xs, y < x] ++ [x] ++ qsort [y | y <- xs, y >= x]
당근 Haskell 이 짱짱맨이지.
중복제거할수 있을것같은디
코세아재 안주무셔요???
안잘건디, 코딩할거임 있다가.
히잌.... 갓코세님 카페에 올린 Makefile 작성한 것 좀 봐주실 수 있으신지요 굽신굽신.....
귀찮음. 데헷.
;ㅂ; 나중에 심심한데 할 것도 없고 코딩도 좀 살짝 귀찮다 싶어지시면 봐주십시요 ㅠㅠㅠ
ㅇㅇ
좋은 밤 보내세용 ㅎㅎ 저는 다시 코오오오오딩 하러....
그런데 코딩의 길이로 우열을 가리는게 합리적인 건가요? 그럼 mathematica를 쓰세요.
그리고 평균적으로 clojure의 한줄이 haskell에서 3줄 정도로 불어난다고 알려져 있습니다.