From 9dfe891335881717fb06e20707389464c82b05d3 Mon Sep 17 00:00:00 2001 From: siddharth ravikumar Date: Mon, 13 Jun 2022 20:31:40 -0400 Subject: ex: 50.rkt: implement counterclockwise-270 --- ex/2/50.rkt | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'ex') diff --git a/ex/2/50.rkt b/ex/2/50.rkt index 6db473d..a4f2433 100644 --- a/ex/2/50.rkt +++ b/ex/2/50.rkt @@ -36,3 +36,10 @@ (make-vect 1.0 1.0) (make-vect 0.0 1.0) (make-vect 1.0 0.0))) + + +(define (counterclockwise-270 painter) + (transform-painter painter + (make-vect 1.0 0.0) + (make-vect 1.0 1.0) + (make-vect 0.0 0.0))) -- cgit v1.2.3