magic_xml 0.1.0

data/xquery_use_cases/tree/book.xml

@@ -0,0 +1,50 @@
+<?xml version="1.0"?>
+<!DOCTYPE book SYSTEM "book.dtd">
+<book>
+  <title>Data on the Web</title>
+  <author>Serge Abiteboul</author>
+  <author>Peter Buneman</author>
+  <author>Dan Suciu</author>
+  <section id="intro" difficulty="easy" >
+    <title>Introduction</title>
+    <p>Text ... </p>
+    <section>
+      <title>Audience</title>
+      <p>Text ... </p>
+    </section>
+    <section>
+      <title>Web Data and the Two Cultures</title>
+      <p>Text ... </p>
+      <figure height="400" width="400">
+        <title>Traditional client/server architecture</title>
+        <image source="csarch.gif"/>
+      </figure>
+      <p>Text ... </p>
+    </section>
+  </section>
+  <section id="syntax" difficulty="medium" >
+    <title>A Syntax For Data</title>
+    <p>Text ... </p>
+    <figure height="200" width="500">
+      <title>Graph representations of structures</title>
+      <image source="graphs.gif"/>
+    </figure>
+    <p>Text ... </p>
+    <section>
+      <title>Base Types</title>
+      <p>Text ... </p>
+    </section>
+    <section>
+      <title>Representing Relational Databases</title>
+      <p>Text ... </p>
+      <figure height="250" width="400">
+        <title>Examples of Relations</title>
+        <image source="relations.gif"/>
+      </figure>
+    </section>
+    <section>
+      <title>Representing Object Databases</title>
+      <p>Text ... </p>
+    </section>       
+  </section>
+</book>

data/xquery_use_cases/tree/q1.out

@@ -0,0 +1,23 @@
+<toc>
+    <section id="intro" difficulty="easy">
+        <title>Introduction</title>
+        <section>
+            <title>Audience</title>
+        </section>
+        <section>
+            <title>Web Data and the Two Cultures</title>
+        </section>
+    </section>
+    <section id="syntax" difficulty="medium">
+        <title>A Syntax For Data</title>
+        <section>
+            <title>Base Types</title>
+        </section>
+        <section>
+            <title>Representing Relational Databases</title>
+        </section>
+        <section>
+            <title>Representing Object Databases</title>
+        </section>
+    </section>
+</toc>

data/xquery_use_cases/tree/q1.rb

@@ -0,0 +1,31 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+def local_toc(node)
+    node.children(:section).map{|c|
+        XML.section(c.attrs, c.child(:title), local_toc(c))
+    }
+end
+
+XML.toc! {
+    add! local_toc(XML.load('book.xml'))
+}

data/xquery_use_cases/tree/q1.xquery

@@ -0,0 +1,14 @@
+declare function local:toc($book-or-section as element()) as element()*
+{
+    for $section in $book-or-section/section
+    return
+      <section>
+         { $section/@* , $section/title , local:toc($section) }                 
+      </section>
+};
+
+<toc>
+   {
+     for $s in doc("book.xml")/book return local:toc($s)
+   }
+</toc>

data/xquery_use_cases/tree/q2.out

@@ -0,0 +1,11 @@
+<figlist>
+    <figure  height="400" width="400">
+        <title>Traditional client/server architecture</title>
+    </figure>
+    <figure  height="200" width="500">
+        <title>Graph representations of structures</title>
+    </figure>
+    <figure  height="250" width ="400">
+        <title>Examples of Relations</title>
+    </figure>
+</figlist>

data/xquery_use_cases/tree/q2.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.figlist! {
+    XML.load('book.xml').descendants(:figure) {|f|
+        figure!(f.attrs, f.children(:title))
+    }
+}

data/xquery_use_cases/tree/q2.xquery

@@ -0,0 +1,10 @@
+<figlist>
+  {
+    for $f in doc("book.xml")//figure
+    return
+        <figure>
+            { $f/@* }
+            { $f/title }
+        </figure>
+  }
+</figlist>

data/xquery_use_cases/tree/q3.out

@@ -0,0 +1,2 @@
+<section_count>7</section_count>
+<figure_count>3</figure_count>

data/xquery_use_cases/tree/q3.rb

@@ -0,0 +1,26 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+doc = XML.load('book.xml')
+
+XML.section_count!(doc.descendants(:section).size)
+XML.figure_count!(doc.descendants(:figure).size)

data/xquery_use_cases/tree/q3.xquery

@@ -0,0 +1,2 @@
+<section_count>{ count(doc("book.xml")//section) }</section_count>, 
+<figure_count>{ count(doc("book.xml")//figure) }</figure_count>

data/xquery_use_cases/tree/q4.out

@@ -0,0 +1 @@
+<top_section_count>2</top_section_count>

data/xquery_use_cases/tree/q4.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.top_section_count!(XML.load('book.xml').children(:section).size)

data/xquery_use_cases/tree/q4.xquery

@@ -0,0 +1,5 @@
+<top_section_count>
+ { 
+   count(doc("book.xml")/book/section) 
+ }
+</top_section_count>

data/xquery_use_cases/tree/q5.out

@@ -0,0 +1,9 @@
+<section_list>
+    <section title="Introduction" figcount="0"/>
+    <section title="Audience" figcount="0"/>
+    <section title="Web Data and the Two Cultures" figcount="1"/>
+    <section title="A Syntax For Data" figcount="1"/>
+    <section title="Base Types" figcount="0"/>
+    <section title="Representing Relational Databases" figcount="1"/>
+    <section title="Representing Object Databases" figcount="0"/>
+</section_list>

data/xquery_use_cases/tree/q5.rb

@@ -0,0 +1,30 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.section_list! {
+    XML.load('book.xml').descendants(:section) {|s|
+        section!({
+            :title => s[:@title],
+            :figcount => s.children(:figure).size,
+        })
+    }
+}

data/xquery_use_cases/tree/q5.xquery

@@ -0,0 +1,8 @@
+<section_list>
+  {
+    for $s in doc("book.xml")//section
+    let $f := $s/figure
+    return
+        <section title="{ $s/title/text() }" figcount="{ count($f) }"/>
+  }
+</section_list>

data/xquery_use_cases/tree/q6.out

@@ -0,0 +1,30 @@
+<toc>
+    <section id="intro" difficulty="easy">
+        <title>Introduction</title>
+        <figcount>0</figcount>
+        <section>
+            <title>Audience</title>
+            <figcount>0</figcount>
+        </section>
+        <section>
+            <title>Web Data and the Two Cultures</title>
+            <figcount>1</figcount>
+        </section>
+    </section>
+    <section id="syntax" difficulty="medium">
+        <title>A Syntax For Data</title>
+        <figcount>1</figcount>
+        <section>
+            <title>Base Types</title>
+            <figcount>0</figcount>
+        </section>
+        <section>
+            <title>Representing Relational Databases</title>
+            <figcount>1</figcount>
+        </section>
+        <section>
+            <title>Representing Object Databases</title>
+            <figcount>0</figcount>
+        </section>
+    </section>
+</toc>

data/xquery_use_cases/tree/q6.rb

@@ -0,0 +1,35 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+def section_summary(s)
+    XML.section(s.attrs) {
+        add! s.child(:title)
+        figcount! s.children(:figure).size
+        add! s.children(:section).map{|c| section_summary(c)}
+    }
+end
+
+XML.toc! {
+    XML.load('book.xml').children(:section) {|s|
+        add! section_summary(s)
+    }
+}

data/xquery_use_cases/tree/q6.xquery

@@ -0,0 +1,21 @@
+declare function local:section-summary($book-or-section as element()*)
+  as element()*
+{
+  for $section in $book-or-section
+  return
+    <section>
+       { $section/@* }
+       { $section/title }       
+       <figcount>         
+         { count($section/figure) }
+       </figcount>                
+       { local:section-summary($section/section) }                      
+    </section>
+};
+
+<toc>
+  {
+    for $s in doc("book.xml")/book/section
+    return local:section-summary($s)
+  }
+</toc>

data/xquery_use_cases/xmp/README

@@ -0,0 +1,41 @@
+Use Case "XMP": Experiences and Exemplars
+from XML Query Use Cases.
+
+Source: http://www.w3.org/TR/xquery-use-cases/#xmp
+
+Q1 - List books published by Addison-Wesley after 1991,
+     including their year and title.
+Q2 - Create a flat list of all the title-author pairs,
+     with each pair enclosed in a "result" element.
+Q3 - For each book in the bibliography, list the title and
+     authors, grouped inside a "result" element.
+Q4 - For each author in the bibliography, list the author's
+     name and the titles of all books by that author,
+     grouped inside a "result" element.
+Q5 - For each book found at both bstore1.example.com and
+     bstore2.example.com, list the title of the book and
+     its price from each source.
+Q6 - For each book that has at least one author, list the
+     title and first two authors, and an empty "et-al"
+     element if the book has additional authors.
+Q7 - List the titles and years of all books published
+     by Addison-Wesley after 1991, in alphabetic order.
+Q8 - Find books in which the name of some element ends
+     with the string "or" and the same element contains
+     the string "Suciu" somewhere in its content.
+     For each such book, return the title and the qualifying element.
+Q9 - In the document "books.xml", find all section or chapter
+     titles that contain the word "XML", regardless of the
+     level of nesting.
+Q10 - In the document "prices.xml", find the minimum price
+      for each book, in the form of a "minprice" element
+      with the book title as its title attribute.
+Q11 - For each book with an author, return the book with
+      its title and authors. For each book with an editor,
+      return a reference with the book title and the editor's affiliation.
+Q12 - Find pairs of books that have different titles but
+      the same set of authors (possibly in a different order).
+
+magic/xml solutions more or less follow XQuery solutions,
+with significant changes only where naive translation
+would result in very cumbersome code.

data/xquery_use_cases/xmp/bib.xml

@@ -0,0 +1,35 @@
+<bib>
+    <book year="1994">
+        <title>TCP/IP Illustrated</title>
+        <author><last>Stevens</last><first>W.</first></author>
+        <publisher>Addison-Wesley</publisher>
+        <price>65.95</price>
+    </book>
+ 
+    <book year="1992">
+        <title>Advanced Programming in the Unix environment</title>
+        <author><last>Stevens</last><first>W.</first></author>
+        <publisher>Addison-Wesley</publisher>
+        <price>65.95</price>
+    </book>
+ 
+    <book year="2000">
+        <title>Data on the Web</title>
+        <author><last>Abiteboul</last><first>Serge</first></author>
+        <author><last>Buneman</last><first>Peter</first></author>
+        <author><last>Suciu</last><first>Dan</first></author>
+        <publisher>Morgan Kaufmann Publishers</publisher>
+        <price>39.95</price>
+    </book>
+ 
+    <book year="1999">
+        <title>The Economics of Technology and Content for Digital TV</title>
+        <editor>
+               <last>Gerbarg</last><first>Darcy</first>
+                <affiliation>CITI</affiliation>
+        </editor>
+            <publisher>Kluwer Academic Publishers</publisher>
+        <price>129.95</price>
+    </book>
+ 
+</bib>

data/xquery_use_cases/xmp/books.xml

@@ -0,0 +1,15 @@
+<chapter>
+    <title>Data Model</title>
+    <section>
+        <title>Syntax For Data Model</title>
+    </section>
+    <section>
+        <title>XML</title>
+        <section>
+            <title>Basic Syntax</title>
+        </section>
+        <section>
+            <title>XML and Semistructured Data</title>
+        </section>
+    </section>
+</chapter>

data/xquery_use_cases/xmp/prices.xml

@@ -0,0 +1,32 @@
+<prices>
+    <book>
+        <title>Advanced Programming in the Unix environment</title>
+        <source>bstore2.example.com</source>
+        <price>65.95</price>
+    </book>
+    <book>
+        <title>Advanced Programming in the Unix environment</title>
+        <source>bstore1.example.com</source>
+        <price>65.95</price>
+    </book>
+    <book>
+        <title>TCP/IP Illustrated</title>
+        <source>bstore2.example.com</source>
+        <price>65.95</price>
+    </book>
+    <book>
+        <title>TCP/IP Illustrated</title>
+        <source>bstore1.example.com</source>
+        <price>65.95</price>
+    </book>
+    <book>
+        <title>Data on the Web</title>
+        <source>bstore2.example.com</source>
+        <price>34.95</price>
+    </book>
+    <book>
+        <title>Data on the Web</title>
+        <source>bstore1.example.com</source>
+        <price>39.95</price>
+    </book>
+</prices>

data/xquery_use_cases/xmp/q1.out

@@ -0,0 +1,8 @@
+<bib>
+    <book year="1994">
+        <title>TCP/IP Illustrated</title>
+    </book>
+    <book year="1992">
+        <title>Advanced Programming in the Unix environment</title>
+    </book>
+</bib>

data/xquery_use_cases/xmp/q1.rb

@@ -0,0 +1,29 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.bib! {
+    XML.load('bib.xml').children(:book) {|b|
+        if b[:@publisher] == "Addison-Wesley" and b[:year].to_i > 1991
+            book!({:year => b[:year]}, b.child(:title))
+        end
+    }
+}

data/xquery_use_cases/xmp/q1.xquery

@@ -0,0 +1,10 @@
+<bib>
+ {
+  for $b in doc("http://bstore1.example.com/bib.xml")/bib/book
+  where $b/publisher = "Addison-Wesley" and $b/@year > 1991
+  return
+    <book year="{ $b/@year }">
+     { $b/title }
+    </book>
+ }
+</bib>

data/xquery_use_cases/xmp/q10.out

@@ -0,0 +1,11 @@
+<results>
+    <minprice title="Advanced Programming in the Unix environment">
+        <price>65.95</price>
+    </minprice>
+    <minprice title="TCP/IP Illustrated">
+        <price>65.95</price>
+    </minprice>
+    <minprice title="Data on the Web">
+        <price>34.95</price>
+    </minprice>
+</results>

data/xquery_use_cases/xmp/q10.rb

@@ -0,0 +1,36 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.results! {
+    doc = XML.load('prices.xml')
+    doc.children(:book).children(:title).map{|node| node.text}.uniq.each{|title|
+        minprice!({:title => title}) {
+            price! {
+                text! doc.children(:book).find_all{|book|
+                          book[:@title] == title
+                      }.map{|book|
+                          book[:@price].to_f 
+                      }.min
+            }
+        }
+    }
+}

data/xquery_use_cases/xmp/q10.xquery

@@ -0,0 +1,11 @@
+<results>
+  {
+    let $doc := doc("prices.xml")
+    for $t in distinct-values($doc//book/title)
+    let $p := $doc//book[title = $t]/price
+    return
+      <minprice title="{ $t }">
+        <price>{ min($p) }</price>
+      </minprice>
+  }
+</results>