=>

const x = list(1,list(2, list(3,4),5), list(6,7)); function tree_map(func, tree){ return map(sub_tree=> is_pair(sub_tree) ? tree_map(func, sub_tree) : func(sub_tree), tree); } function suquare_tree(tree){ return tree_map(square,tree); } suquare_tree(x)//[1, [[4, [[9, [16, null]], [25, null]]], [[36, [49, null]], null]]];

function square_tree(tree){ return is_null(tree) ? null : ! is_pair(tree) ? square(tree) : pair(square_tree(head(tree)), square_tree(tail(tree))); } function square_tree_map(tree){ return map(sub_tree => is_pair(sub_tree) ? square_tree_map(sub_tree) : square(sub_tree),tree); }

function for_each(fun, list){ fun(head(list)); return is_null(tail(list)) ? true : for_each(fun, tail(list)); } function for_each_map(fun, list){ map(fun, list); } 반환값이 정해지지 않았기 때문에(적용할 함수가 돌려주는 인자를 변환하는 게 아닌 side effect임) 여러 방식의 구현이 가능하다.

function square(x){ return x * x; } function map(fun, items) { return is_null(items) ? null : pair(fun(head(items)), map(fun, tail(items))); } function square_list(items){ return is_null(items) ? null : pair(square(head(items)), square_list(tail(items))); } function square_list_m(items){ return map(square, items); }

SICP(The Structure and Interpretation of Computer Programs, 컴퓨터 프로그램의 구조와 해석)은 MIT의 컴퓨터 과학 입문 강의를 기반으로 만들어진 서적이다. 컴퓨터 과학의 기본 원리와 설계의 핵심 개념을 밑바닥부터 다져가면서 학습할 수 있는 SICP는 Scheme이라는 LISP의 방언을 통해 학습을 진행하기 때문에 다소 접근하기 어려운 편이었다. 이를 널리 사용되고 있는 언어인 Javascript로 각색한 SICP in JS가 이번에 한빛미디어를 통해 번역본으로 출시되었다. 많은 모던 프로그래밍 언어 중 Javascript로 이 책이 각색된 이유는 Javascript의 멀티 패러다임 중, 함수형 프로그래밍이 가능한 부분을 꼽을 수 있겠다. 책의 주된 내용은 ..

function plus_curried(x){ return y => x + y; } function brooks(f, list){ return is_null(list) ? f : brooks(f(head(list)), tail(list)); } function brooks_curried(list){ return brooks(head(list), tail(list)); } brooks_curried(list(brooks_curried, list(plus_curried, 3, 4))); brooks_curried(list(brooks_curried, list(brooks_curried, list(plus_curried, 3, 4)))); 두 문장 모두 7로 평가된다.

function last_pair(items){ return is_null(tail(items)) ? items : last_pair(tail(items)); } 꼬리를 돌려주면서 꼬리의 꼬리가 null이면 그대로 꼬리를 반환한다.

function make_point(x, y){ return pair(x, y); } function x_point(p){ return head(p); } function y_point(p){ return tail(p); } function make_segment(start, end) { return pair(start, end) } function start_segment(s){ return head(s); } function end_segment(s){ return tail(s); } function midpoint_segment(s){ return make_point( x_point(start_segment(s))+x_point(end_segment(s))/2, y_point(start_segmen..

function abs(x){ return x 0 ? pair(abs(n), abs(d)) : n < 0 ? pair(n, d) : pair(-n, abs(d)); }

function compose(f, g){ return x=> f(g(x)); }