CODEWITHSUNDEEP
lambdafunctional-programmingschemelambda-calculus
user1306283
user1306283

Reputation:

Eliminate lambda in Scheme?

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))
)

Upvotes: 3

Views: 165

Answers (1)

Óscar López
Óscar López

Reputation: 236140

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.

Upvotes: 3

Related Questions