import module namespace sparql ="http://www.cems.uwe.ac.uk/xmlwiki/sparql" at "../lib/sparql.xqm";
declare variable $service := "http://api.talis.com/stores/cwallace-dev2/services/sparql";

declare variable $query := "
PREFIX p: <http://www.cems.uwe.ac.uk/rdffold/vocab/>
PREFIX rdfs:  <http://www.w3.org/2000/01/rdf-schema#>

 select   ?from ?to ?label
 where  {
  ?run p:Internal_Moderator ?im.
  ?im rdfs:label ?from.
  ?run p:Module_Leader ?ml.
  ?ml rdfs:label ?to.
  ?run p:module ?mod.
  ?mod p:shortCode ?label.
 }
";

declare option exist:serialize "method=text media-type=text/text";

let $result:= sparql:execute-query($query, $service)
return 
   transform:transform($result,doc("/db/Wiki/FOLD/graph.xsl"),())