0

私はスキームでスキームを書かなければなりません..静かで面白いですが、それが状況です。いずれにせよ、これは私が使用する可能性のあるすべてのプローセダーを使用して「ラムダ」式を記述しようとする例であり、「Let」式を記述する際にも助けが必要です。同様の方法で「Let」式をラムダに変換するにはどうすればよいですか? ありがとう。

    (define (lambda? exp) (tag-check exp 'lambda))
 
(define (eval exp env)
  (cond  ((number? exp)       exp)
         ((symbol? exp)      (lookup exp env))
         ((define? exp)      (eval-define exp env))  
         ((if? exp)          (eval-if exp env))
         ((lambda? exp)      (eval-lambda exp env))
         ((application? exp) (apply (eval (car exp) env)
                                 (map (lambda (e) (eval e env))
                                         (cdr exp))))
         (else (error "unknown expression " exp))))
 
(define (eval-lambda exp env) 
      (make-procedure (lambda-parameters exp)
                         (lambda-body exp)
                         env))

(define (lambda-parameters exp) (cadr exp))
(define (lambda-body exp) (cddr exp))

(define (make-procedure parameters body env)
  (list 'procedure parameters body env))
4

1 に答える 1

3

変換するプログラムを書くだけです。

(let ((e1 v1) (e2 v2) ...) 本体..) => ((ラムダ (e1 e2 ...) 本体..) v1 v2 ...)

そして、SICPの第4章をチェックしてください。

于 2011-05-15T14:43:22.817 に答える