Eliminate lambda in Scheme?
-
11-06-2021 - |
Pregunta
I need to eliminate this Scheme lambda construction for my school assignment.
Any ideas how to accomplish this?
(define (foo x)
(letrec
((h
(lambda (y z)
(cond
((null? y) 'undefined)
((null? (cdr y)) (car z))
(else (h (cddr y) (cdr z)))
))))
(h x x))
)
Solución
Well, you could replace the lambda
expression in the letrec
with an internal definition:
(define (foo x)
(define (h y z)
(cond
((null? y) 'undefined)
((null? (cdr y)) (car z))
(else (h (cddr y) (cdr z)))))
(h x x))
... Or you could extract the h
procedure outside of foo
, as a helper procedure. Either way the result would be the same.
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow