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)