diff --git a/pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-more.rkt b/pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-more.rkt index 1d8e045720..7937f5f1c4 100644 --- a/pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-more.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-more.rkt @@ -705,7 +705,6 @@ (max ay by cy dy)))) (define (rotate-points in-points θ) - (printf "θ ~s\n" θ) (let* ([cs (map point->c in-points)] [vectors (points->vectors cs)] [rotated-vectors (map (λ (c) (rotate-c c θ)) vectors)]