for $c in doc("/Volumes/TOSHIBA/3208_sortieTT.txt.xml")//element
let $elt1:= $c/following-sibling::element[1]
let $elt2:= $c/following-sibling::element[2]
let $det:= $c/data[3]/text()
let $nom:= $elt1/data[3]/text()
let $verb:= $elt2/data[3]/text()
where $c/data[1][contains(text(),'DET')] and $elt1/data[1]='NOM' and $elt2/data[1][contains(text(),'VER')]
let $resultat:= concat($det," ",$nom," ",$verb)
group by $i:=$resultat
order by count($resultat)
return concat(count($resultat)," ",$i)