Код Ревью
Сравни свои решения
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#
#| BEGIN (Введите свое решение) |#
#| BEGIN (Введите свое решение) |#
(define one (lambda (f) (lambda (x) (f x))))
(define two (lambda (f) (lambda (x) (f (f x)))))
(define (add m n) (lambda (f) (lambda (x) ((m f) ((n f) x)))))
#| END |#
#| END |#