tests/xpath-pt/xquery/F7.xql

   1 declare namespace fun = 'have.more.fun';
   2
   3 declare function fun:closure($input as node()*, $result as node()*) as node()*
   4 {
   5    let $current := ($input | doc()//edge[@from = $input]/@to)
   6    let $new := $current except $result
   7    let $all := ($result,$new)
   8
   9    return
  10       if(exists($new))
  11       then ($new, fun:closure($new,$all))
  12       else ()
  13 };
  14
  15 doc()//category[@id="category0"]/@id/fun:closure(.,())/id(.)/name