recurrency

[David Carlisle]

> I wrote functions for going depper and deeper in the definition. Can it be
> simplified?

probably, but what output do you want from the posted input?


looking at your code
    let $processed := replace(data($node1), ' \(.*\)' , '')
this appears to be  substring-after($node1,' ') but none of your text
nodes (other than indentation white space have a space?

    let $res := testXML/$sys//node-name[data(name) = $processed]
is the same as
    let $res := $sys//node-name[data(name) = $processed]
as if you use a node sequence on the right hand side of / the left hand
side argumemt of / isn't used at all, all that happens is that 
the nodes on the right hand side are sorted into document order and
duplicates removed.
 
testXML/$sys is $sys/.


David

________________________________________________________________________
The Numerical Algorithms Group Ltd is a company registered in England
and Wales with company number 1249803. The registered office is:
Wilkinson House, Jordan Hill Road, Oxford OX2 8DR, United Kingdom.

This e-mail has been scanned for all viruses by Star. The service is
powered by MessageLabs. 
________________________________________________________________________