Eが変数のとき

• 関数(diff-variable x E)

　　「Eがxと等しいとき1」

　　「Eがxと等しくないとき0」

(define (diff-variable x E)

　(if (equal? x E) 1

0

　)

)

diff-variable　を定義する

(if …)

(cond …)

どちらでも記述できる