(use-modules (person))
`(html
(head
(meta (@ :charset "utf-8"))
(title [This is a page generated from scheme])
(meta (@ :name "author" :content "Amirouche BOUBEKKI "))
(meta (@ :name "viewport" :content "width=device-width, initial-scale=1"))
(link (@ :rel "stylesheet" :href "static/css/bootstrap.min.css"))
(link (@ :rel "stylesheet" :href "static/css/bootstrap-theme.min.css"))
(link (@ :rel "stylesheet" :href "static/css/main.css")))
(body (@ :class "index")
(div (@ :class container)
(div (@ :class "header clearfix")
(nav
(ul (@ :class "nav nav-pills pull-right")
(li (@ :role "presentation" :class "active")
(a (@ :href "#") [Home]))
(li (@ :role "presentation" )
(a (@ :href "mailto:amirouche@hyperdev.fr") [Contact]))))
(h3 (@ :class "text-muted") [hyperdev.fr]))
(div (@ :class "row")
(p [,(person-name amirouche) says: Héllo stranger! Here is a lucky number for you «,(value)»])))))