for $a in doc("../../bao2/XML/sortie-udpipe-3208.xml")//p
for $b in $a//item
let $sibling := $b/following-sibling::item[1]
let $secsibling := $b/following-sibling::item[2]
where $b/a[4] = "NOUN" and $sibling/a[4] = "ADP" and $secsibling/a[4] = "NOUN"
return <patron>{$b/a[2]/text(), ' ', $sibling/a[2]/text(), ' ', $secsibling/a[2]/text()}</patron>