7 lines
135 B
Scheme
7 lines
135 B
Scheme
#lang sicp
|
|
|
|
(define (cubic a b c)
|
|
(lambda (x) (+ (* x x x)
|
|
(* a x x)
|
|
(* b x)
|
|
c)))
|