(list 'gallery
      (list 'title "Me at the Britney Spears Concert")
      (list 'picture
            (list 'filename "pict01.jpg")
            (list 'caption "Waiting in line for a Pepsi."))
      (list 'picture
            (list 'filename "pict07.jpg")
            (list 'caption "Waiting in line for " (list 'em "another") " Pepsi."))
      (list 'picture
            (list 'caption "Waiting in line for the bathroom.")
            (list 'filename "pict19.jpg")))


;; Or, equivalently, using the strictly-optional quoted-list form,
;; as mentioned in lecture friday:
;;
'(gallery (title "Me at the Britney Spears Concert")
          (picture (filename "pict01.jpg")
                   (caption "Waiting in line for a Pepsi."))
          (picture (filename "pict07.jpg")
                   (caption "Waiting in line for " (em "another") " Pepsi."))
          (picture (caption "Waiting in line for the bathroom.")
                   (filename "pict19.jpg"))