(:Extraction du pratron étiquette Talismane NC - P - NC - P :)
<Talismane_NpNp>{
for $art in doc('sortietalismane-slurp_3246.txt.xml')//p
for $item in $art/item
let $pos := $item/a[4]/text()
let $next1:= $item/following-sibling::item[1]
let $next2:= $item/following-sibling::item[2]
let $next3:= $item/following-sibling::item[3]
where $pos = 'NC' and $next1/a[4] = 'P' and $next2/a[4] = 'NC' and $next3/a[4] = 'P'
return <NpNp>{$item/a[2]/text(),' ',$next1/a[2]/text(),' ',$next2/a[2]/text(),' ',$next3/a[2]/text()}</NpNp>
}
</Talismane_NpNp>