for $page in $allpages return c:writepage(c:href($page),$page/div[*], $defaultmenu) , for $person in $allpersons order by $person/@title return c:writepage(c:href($person),(c:writelabel($person),

Projects

{c:writelist($allprojects[contributor/@refid=$person/@id])}
, $person/div[*]), $peoplemenu), for $project in $allprojects return c:writepage(c:href($project),(c:writelabel($project),

Contributors

{c:writelist($allpersons[@id=$project/contributor/@refid])}
,$project/div[*]), $projectmenu), c:writepage('list_persons.html',
{c:writelist($allpersons)}
, $peoplemenu), c:writepage('list_projects.html', (for $date in distinct-values($allprojects/@presented) order by xs:date($date) descending return

{string($date)}

{c:writelist($allprojects[@presented=$date])}

), $projectmenu)