PasteRack.org
Paste # 4274
2014-03-27 14:22:03

Forked from paste # 5944.

Fork as a new paste.

Paste viewed 518 times.


Embed:

  1. #lang racket
  2. (require pict)
  3. (list
  4.   (frame (circle 30))
  5.   (list (frame (circle 30) #:segment 5)
  6.         (frame (circle 30) #:color "chartreuse" #:line-width 3)))

=>

'(image (image image))