1 declare namespace fun = 'have.more.fun';
3 declare function fun:closure($input as node()*, $result as node()*) as node()*
5 let $current := ($input | doc()//edge[@from = $input]/@to)
6 let $new := $current except $result
7 let $all := ($result,$new)
11 then ($new, fun:closure($new,$all))
15 doc()//category[@id="category0"]/@id/fun:closure(.,())/id(.)/name