Advertisement
Guest User

Untitled

a guest
Jan 21st, 2019
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.10 KB | None | 0 0
  1. (require 2htdp/image)
  2.  
  3. (define a-red-square (rectangle 100 100 "solid" "red"))
  4. (define a-blue-circle (circle 50 "solid" "blue"))
  5. (define outlined-square (rectangle 100 100 "outline" "red"))
  6. (define outlined-circle (circle 50 "outline" "blue"))
  7. (beside (rectangle 100 100 "solid" "red") (rectangle 100 100 "solid" "blue") (rectangle 100 100 "solid" "green"))
  8. (above (rectangle 100 100 "solid" "red") (rectangle 100 100 "solid" "blue") (rectangle 100 100 "solid" "green"))
  9. (overlay (rectangle 20 20 "solid" "black") (rectangle 50 50 "solid" "green") (rectangle 80 80 "solid" "blue") (rectangle 110 110 "solid" "red"))
  10. (define rotated-square (rotate 45 (overlay (rectangle 20 20 "solid" "black") (rectangle 50 50 "solid" "green") (rectangle 80 80 "solid" "blue") (rectangle 110 110 "solid" "red"))))
  11. (define flag-of-chicago (overlay (above (rectangle 300 20 "solid" "sky blue") (above(beside(radial-star 7 12 24 "solid" "red") (radial-star 7 12 24 "solid" "red") (radial-star 7 12 24 "solid" "red") (radial-star 7 12 24 "solid" "red")) (rectangle 300 20 "solid" "sky blue"))) (rectangle 300 200 "outline" "black")))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement