for $x in doc("sortiexml-slurp_3208.xml")//item//article/element let $SkipLigne := " " return ( (:NOM ADJ:) if ($x/data[1]="NOM" and $x/following-sibling::*[1]/data[1]="ADJ" ) then concat ( $x/data[3] , " ", $x/following-sibling::*[1]/data[3]," - NOM-ADJ" ) else(), (:ADJ NOM:) if ($x/data[1]="ADJ" and $x/following-sibling::*[1]/data[1]="NOM" ) then concat ( $x/data[3] , " ", $x/following-sibling::*[1]/data[3]," - ADJ-NOM" ) else(), (:NOM VER ADV:) if($x/data[1]="NOM" and $x/following-sibling::*[1]/data[1][contains(.,'VER')] and $x/following-sibling::*[2]/data[1]="ADV") then concat( $x/data[3] , " ", $x/following-sibling::*[1]/data[3] , " " , $x/following-sibling::*[2]/data[3]," - NOM-VER-ADV") else(), (:VER DET NOM:) if($x/data[1][contains(.,'VER')] and $x/following-sibling::*[1]/data[1]="DET" and $x/following-sibling::*[2]/data[1]="NOM") then concat( $x/data[3] , " ", $x/following-sibling::*[1]/data[3] , " " , $x/following-sibling::*[2]/data[3]," - VER-DET-NOM") else(), (:NOM PREP NOM:) if($x/data[1]="NOM" and $x/following-sibling::*[1]/data[1]="PRP" and $x/following-sibling::*[2]/data[1]="NOM") then concat( $x/data[3] , " ", $x/following-sibling::*[1]/data[3] , " " , $x/following-sibling::*[2]/data[3] ," - NOM-PREP-NOM") else(), (:NOM PREP NOM PREP:) if($x/data[1]="NOM" and $x/following-sibling::*[1]/data[1]="PRP" and $x/following-sibling::*[2]/data[1]="NOM"and $x/following-sibling::*[3]/data[1]="PRP") then concat( $x/data[3] , " ", $x/following-sibling::*[1]/data[3] , " " , $x/following-sibling::*[2]/data[3] , " " , $x/following-sibling::*[3]/data[3] ," - NOM-PREP-NOM-PREP") else() )