From 87a19cbc2262638565cd40fb5251f4f56952b065 Mon Sep 17 00:00:00 2001
From: Joris van der Hoeven <vdhoeven@lix.polytechnique.fr>
Date: Mon, 27 Aug 2012 14:18:21 +0000
Subject: [PATCH] correction

---
 devel/scheme/utils/utils-select.en.tm | 50 ++++++++++++---------------
 1 file changed, 22 insertions(+), 28 deletions(-)

diff --git a/devel/scheme/utils/utils-select.en.tm b/devel/scheme/utils/utils-select.en.tm
index de6085a..d6eaca5 100644
--- a/devel/scheme/utils/utils-select.en.tm
+++ b/devel/scheme/utils/utils-select.en.tm
@@ -1,4 +1,4 @@
-<TeXmacs|1.0.6.10>
+<TeXmacs|1.0.7.16>
 
 <style|tmdoc>
 
@@ -48,33 +48,29 @@
   <|explain>
     Select all compound subtrees with the specified <scm-arg|label>. Example:
 
-    <with|prog-language|scheme|prog-session|default|<\session>
-      <\input|scheme] >
+    <\session|scheme|default>
+      <\unfolded-io|scheme] >
         (select '(document (strong "x") (math "a+b") (strong "y")) '(strong))
-      </input>
-
-      <\output>
+      <|unfolded-io>
         ((strong "x") (strong "y"))
-      </output>
-    </session>>
+      </unfolded-io>
+    </session>
   </explain>
 
   <\explain>
-    <scm|:#1>, <scm|:#2>, <scm|:#3>, ...<explain-synopsis|select descendants
+    <scm|:%1>, <scm|:%2>, <scm|:%3>, ...<explain-synopsis|select descendants
     of a given generation>
   <|explain>
-    The pattern <scm|:#n>, where <scm|n> is a number, selects all descendants
+    The pattern <scm|:%n>, where <scm|n> is a number, selects all descendants
     of the <scm|n>-th generation. Example:
 
-    <with|prog-language|scheme|prog-session|default|<\session>
-      <\input|scheme] >
-        (select '(foo (bar "x" "y") (slash (dot))) '(:#2))
-      </input>
-
-      <\output>
+    <\session|scheme|default>
+      <\unfolded-io|scheme] >
+        (select '(foo (bar "x" "y") (slash (dot))) '(:%2))
+      <|unfolded-io>
         ("x" "y" (dot))
-      </output>
-    </session>>
+      </unfolded-io>
+    </session>
   </explain>
 
   <\explain>
@@ -98,15 +94,13 @@
     This pattern matches the input tree if and only the input tree matches
     the specified <scm-arg|pattern> according to <scm|match?>. Example:
 
-    <with|prog-language|scheme|prog-session|default|<\session>
-      <\input|scheme] >
-        (select '(foo "x" (bar)) '(:#1 (:match :string?)))
-      </input>
-
-      <\output>
+    <\session|scheme|default>
+      <\unfolded-io|scheme] >
+        (select '(foo "x" (bar)) '(:%1 (:match :string?)))
+      <|unfolded-io>
         ("x")
-      </output>
-    </session>>
+      </unfolded-io>
+    </session>
   </explain>
 
   <\explain>
@@ -140,14 +134,14 @@
     <scm|:next><explain-synopsis|next child>
   <|explain>
     If the input tree is the <math|i>-th child of its parent, then this
-    pattern will select the <math|(i+1)>-th child.
+    pattern will select the <math|<around|(|i+1|)>>-th child.
   </explain>
 
   <\explain>
     <scm|:previous><explain-synopsis|previous child>
   <|explain>
     If the input tree is the <math|i>-th child of its parent, then this
-    pattern will select the <math|(i-1)>-th child.
+    pattern will select the <math|<around|(|i-1|)>>-th child.
   </explain>
 
   <tmdoc-copyright|2007|Joris van der Hoeven>