for $c in doc("/Volumes/TOSHIBA/3214_sortieTT.txt.xml")//element
let $elt1:= $c/following-sibling::element[1]
let $nom:= $c/data[3]/text()
let $adj:= $elt1/data[3]/text()
where $c/data[1]='NOM' and $elt1/data[1]='ADJ' 
let $resultat:= concat($nom," ",$adj)
group by $i:=$resultat
order by count($resultat)
return concat(count($resultat)," ",$i)