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), <div><h2>Projects</h2>{c:writelist($allprojects[contributor/@refid=$person/@id])}</div>, $person/div[*]), $peoplemenu),for $project in $allprojects return c:writepage(c:href($project),(c:writelabel($project), <div><h2>Contributors</h2>{c:writelist($allpersons[@id=$project/contributor/@refid])}</div>,$project/div[*]), $projectmenu),c:writepage('list_persons.html', <div>{c:writelist($allpersons)}</div>, $peoplemenu),c:writepage('list_projects.html', (for $date in distinct-values($allprojects/@presented) order by xs:date($date) descending return <div><h2>{string($date)}</h2><p>{c:writelist($allprojects[@presented=$date])}</p></div>), $projectmenu)