for $el in collection("../../../BAO2/PERL/CINEMA/corpus-titre-description.xml")//element
let $mot1:=$el/data[1]/text()
let $mot2:=$el/following-sibling::element[1]
let $mot3:=$el/following-sibling::element[2]
let $patron:=string-join(($el/data[3]/text(),' ',$mot2/data[3],' ',$mot3/data[3],'
'))
where  $mot1='NOM' and $mot2/data[1]='PRP' and $mot3/data[1]='NOM'
return ($patron)