◊->html[doc] ◊(define prev-page (previous here)) ◊when/block[prev-page]{
←
◊(select 'h1 prev-page)
} ◊(define next-page (next here)) ◊when/block[next-page]{
◊(select 'h1 next-page)
→
}