(import
	(chibi)
	(chibi sxml))

(define strand
	(sxml->xml 
		`(html
			(head
				(title "bean"))
			(body
				(h1 "hello there")
				(p "this is some text, hmmm.")))))

(display strand)