과제4 썸네일형 리스트형 [프로그래밍 언어/ Racket] check_bst.rkt , apply.rkt, equals.rkt - Programming Language #lang racket (provide (all-defined-out)) (define (node_value node) (car node)) (define (node_left_child node) (cadr node)) (define (node_right_child node) (caddr node)) (define (check_bst ROOT) (if (null? ROOT) #t (letrec ([value (node_value ROOT)] [check_right_child_value (lambda(node) (if (null? node) #t (< value (node_value node))))] [check_left_child_value (lambda(node) (if (null? node) #t (.. 더보기 이전 1 다음
