PasteRack.org
Paste # 4126
2014-03-27 14:53:57

Forked from paste # 2634.

Fork as a new paste.

Paste viewed 3307 times.


Embed:

nested list of pict images

  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))