{
let $conspFiles := collection('personTestingOutput')
let $ents := $conspFiles//ent
let $entTypes := $ents/@type[. = 'NORP'] ! string() => distinct-values()
for $e in $entTypes
return
{
let $namesE := $conspFiles//ent[@type=$e]
let $distNamesE := $namesE ! normalize-space() => distinct-values() => sort()
for $t in $distNamesE
let $countT := $conspFiles//ent[. ! normalize-space() = $t] => count()
where $countT > 10
(: order by $countT descending:)
return