Re: number-clause-sosofo

Subject: Re: number-clause-sosofo
From: Richard Light <richard@xxxxxxxxxxxxxxxxx>
Date: Wed, 23 Jul 1997 18:55:52 +0100
In message <33D6124A.FF57E328@xxxxxxxxxxxxxxxx>, Paul Prescod
<papresco@xxxxxxxxxxxxxxxx> writes
>I found the procedure "number-clause-sosofo" in a couple of stylesheets,
>but I can't find it in the spec. Is it obsolete, proprietary or am I
>just not very good at finding things?

It appears in the TEI Lite stylesheet, declared explicitly along with
its friend "number-clause":

(define (number-clause-sosofo node)
   (format-number-list (reverse (number-clause node))

(define (number-clause node)
  (case (gi node)
    (("DIV4" "DIV3" "DIV2")
     (cons (child-number node)
           (number-clause (parent node))))
     (list (child-number node)))
     (if (TOP-LEVEL-DIV?)
         (list (child-number node))
         (cons (child-number node)
               (number-clause (parent node)))))
     (list 1))
     (list 1))
     (list 1))
     (list 1))
    (else (list))))

The reason you have found it in more than one place is (at least partly)
because I shamelessly pirated Jon Bosak's HTML stylesheet as a basis for
my TEI Lite one!  As far as I know, "number-clause-sosofo" has no
official standing.


Richard Light
SGML and Museum Information Consultancy
3 Midfields Walk 
Burgess Hill
West Sussex RH15 8JA
tel. (44) 1444 232067

 DSSSList info and archive:

Current Thread