PasteRack.org
Paste # 69167
2025-02-27 20:42:55

Fork as a new paste.

Paste viewed 680 times.


Embed:

  1. #lang racket
  2. ;; The first three lines of this file were inserted by DrRacket. They record metadata
  3. ;; about the language level of this file in a form that our tools can easily process.
  4. #reader(lib "htdp-beginner-reader.ss" "lang")((modname MyImageExample) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #f #t none #f () #f)))
  5. (require 2htdp/image)
  6.  
  7. ;(circle 10 "solid" "red")
  8.  
  9. ;(circle 20 "outline" "green")
  10.  
  11. ;(rectangle 30 60 "outline" "blue")
  12.  
  13. ;(above (circle 10 "solid" "red")
  14. ;       (circle 10 "solid" "yellow")
  15. ;       (circle 10 "solid" "green")
  16. ;)
  17.  
  18. ;(text "hello" 50 "blue")
  19.  
  20. (above (circle 10 "solid" "red")
  21.        (circle 20 "solid" "green")
  22. )
  23.  
  24. (string-append "A " "B")

=>