xsparql.tmp.initial.liftit.xquery Maven / Gradle / Ivy

Go to download

Show more of this group Show more artifacts with this name
Show all versions of xsparql-test-suite Show documentation

XSPARQL compliance test suite

The newest version!

declare namespace foaf="http://xmlns.com/foaf/0.1/";
declare namespace rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#";
let $doc := doc("http://xsparql.deri.org/data/relations.xml")
let $persons := $doc//*[@name or ../knows]
return

 {
 for $p in $persons
 let $n := if( $p[@name] ) then $p/@name else $p
 let $id := count($p/preceding::*)+count($p/ancestor::*)
 where 
   not(exists($p/following::*[@name = $n or data(.)=$n]))
 return
 
   { data($n) }
    {
    for $k in $persons
    let $kn := if( $k[@name] ) then $k/@name else $k
    let $kid := count($k/preceding::*)+count($k/ancestor::*)
    where 
      $kn = data($doc//*[@name=$n]/knows) and  
      not(exists($kn/../following::*[@name = $kn or data(.)=$kn]))
    return 
    
    }
   
}