Hi,

I hope the author of the SICP package is on this email list. I have encountered 
this problem doing affine transformation of the picture:

 (paint ((transform-painter (make-vect 0 0) (make-vect 0.5 0.1) (make-vect 0 
0.5)) einstein))

. . 
../../../../../../Library/Racket/planet/300/6.1/cache/soegaard/sicp.plt/2/1/prmpnt.scm:376:12:
 vector-ref: contract violation
  expected: vector?
  given: 0
  argument position: 1st
  other arguments...:
   2

If edge-2 vector is changed to (0 1), there is no problem:

(paint ((transform-painter (make-vect 0 0) (make-vect 0.5 0.1) (make-vect 0 1)) 
einstein))

Cheers,
Alexey
____________________
  Racket Users list:
  http://lists.racket-lang.org/users

Reply via email to