[XML-DEV Mailing List Archive Home] [By Thread] [By Date] [Recent Entries] [Reply To This Message]

Re: XSLT question on transitive closures

  • From: David Carlisle <davidc@n...>
  • To: mike@s...
  • Date: Fri, 26 Oct 2007 11:02:21 +0100

Re:  XSLT question on transitive closures

> Transitive closure is intrinsically a higher-order function,

But guessing (since it's Rick) that this is a schematron question
which means that one's generating a stylesheet dynamically anyway,
There is thus the possibility to generate, given a function implementing
an xpath expression, a specific closure function.

As below where the form of the functions c() c2() and c3() are all
identical, but they can't be parameterised by the function to call, so
each have a static reference to f() f2()and f3() respectively.

> The other thing that's needed is the ability to check for cycles. Simply
> blowing the stack or looping isn't good enough.

the code below just uses the Xpath2 except operator so that you only
recurse on new nodes, hopefully that's efficient enough for this

> I think it would be nice to do it properly based on FXSL higher-order

True (but I'll leave that for Dimitre:-)


$ saxon8 -it main closure.xsl 
<?xml version="1.0" encoding="UTF-8"?>

=== . on a  ====

=== grandchild on a ====
a c f kkk hhh c2

=== aunt on kkk ====
d kkk c2 b2

<xsl:stylesheet version="2.0" 
<xsl:function name="c:c" as="node()*">
  <xsl:param name="nodes" as="node()*"/>
  <xsl:variable name="n2" select="$nodes/(c:f(.))"/>
  <xsl:sequence select="$nodes | $n2 |($n2 except $nodes)/c:c(.)"/>

<xsl:function name="c:f" as="node()*">
  <xsl:param name="node" as="node()"/>
  <xsl:sequence select="$node/."/>

<xsl:function name="c:c2" as="node()*">
  <xsl:param name="nodes" as="node()*"/>
  <xsl:variable name="n2" select="$nodes/(c:f2(.))"/>
  <xsl:sequence select="$nodes | $n2 |($n2 except $nodes)/c:c2(.)"/>

<xsl:function name="c:f2" as="node()*">
  <xsl:param name="node" as="node()"/>
  <xsl:sequence select="$node/*/*"/>

<xsl:function name="c:c3" as="node()*">
  <xsl:param name="nodes" as="node()*"/>
  <xsl:variable name="n2" select="$nodes/(c:f3(.))"/>
  <xsl:sequence select="$nodes | $n2 |($n2 except $nodes)/c:c3(.)"/>

<xsl:function name="c:f3" as="node()*">
  <xsl:param name="node" as="node()"/>
  <xsl:sequence select="$node/../../* except $node/parent::*"/>

<xsl:template name="main">

=== . on a  ====
<xsl:sequence select="c:c($doc/a)/name()"/>

=== grandchild on a ====
<xsl:sequence select="c:c2($doc/a)/name()"/>

=== aunt on kkk ====
<xsl:sequence select="c:c3($doc//kkk)/name()"/>


<xsl:variable name="doc">


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. 

[Date Prev] | [Thread Prev] | [Thread Next] | [Date Next] -- [Date Index] | [Thread Index]


Purchasing Stylus Studio from our online shop is Easy, Secure and Value Priced!

Buy Stylus Studio Now

Download The World's Best XML IDE!

Accelerate XML development with our award-winning XML IDE - Download a free trial today!

Don't miss another message! Subscribe to this list today.
First Name
Last Name
Subscribe in XML format
RSS 2.0
Atom 0.3

Stylus Studio has published XML-DEV in RSS and ATOM formats, enabling users to easily subcribe to the list from their preferred news reader application.

Stylus Studio Sponsored Links are added links designed to provide related and additional information to the visitors of this website. they were not included by the author in the initial post. To view the content without the Sponsor Links please click here.

Site Map | Privacy Policy | Terms of Use | Trademarks
Free Stylus Studio XML Training:
W3C Member
Stylus Studio® and DataDirect XQuery ™are products from DataDirect Technologies, is a registered trademark of Progress Software Corporation, in the U.S. and other countries. © 2004-2013 All Rights Reserved.