#let poem(content) = {
  set par(first-line-indent: 0em)

  align(center, block[
    #set align(left)
    #set block(breakable: false)
    #emph(content)
  ])
}

#poem[
  #block[
    “Beautiful Soup, so rich and green, \
    Waiting in a hot tureen! \
    Who for such dainties would not stoop? \
    Soup of the evening, beautiful Soup! \
    Soup of the evening, beautiful Soup! \
    #h(1em)Beau---ootiful Soo---oop! \
    #h(1em)Beau---ootiful Soo---oop! \
    Soo---oop of the e---e---evening, \
    #h(1em)Beautiful, beautiful Soup!
  ]

  #block[
    “Beautiful Soup! Who cares for fish, \
    Game, or any other dish? \
    Who would not give all else for two p \
    ennyworth only of beautiful Soup? \
    Pennyworth only of beautiful Soup? \
    #h(1em)Beau---ootiful Soo---oop! \
    #h(1em)Beau---ootiful Soo---oop! \
    Soo---oop of the e---e---evening, \
    #h(1em)Beautiful, beauti---FUL SOUP!”
  ]
]