2.48
练习 2.48 平面上的一条直线段可以用一对向量表示——从原点到线段起点的向量,以及从原点到线段终点的向量。请用你在练习2.46做出的向量表示定义一种线段表示,其中用构造函数make-segment以及选择函数start-segment和end-segment。
(define make-vect cons)
(define xcor-vect car)
(define ycor-vect cdr)
(define e1 (make-vect 2 3))
(define e2 (make-vect 4 5))
(define make-segment cons)
(define s (make-segment e1 e2))
s
(define start-segment car)
(start-segment s)
(define end-segment cdr)
(end-segment s)