consolidated-compliance-map.xqy

declare function local:doc-compliance-map($uri, $terms)
{
  let $map := map:new(
    for $term in $terms
    return map:entry($term, 0)
  )
 
  let $doc := fn:doc($uri)
  let $_ := 
    for $s in $doc/document/body//(section|subsection)
    for $term in $TERMS
    where fn:contains($s/fn:data(compliance), $term)
    return map:put($map, $term, map:get($map, $term) + 1)

  return $map
};