Play audio slide show -- Keyboard shortcut: 'x'  Back to slide -- Keyboard shortcut: 'u'  previous -- Keyboard shortcut: 'p'        Annotated program -- Keyboard shortcut: 't'      ast-ast-example.lsp - The abstract syntax tree represented as nested lists.Lecture 3 - slide 18 : 42
Program 2

(ast
   "html"
   ((ast
      "head"
      ((ast "title" ("Demo Links") () double xhtml10-strict))
      ()
      double
      xhtml10-strict)
      #t
      (ast
         "body"
         ((ast
            "p"
            ("ACM has a useful"
               #t
               (ast
                  "a"
                  ("digital library")
                  (href "http://www.acm.org/dl" shape "rect")
                  double
                  xhtml10-strict))
            ()
            double
            xhtml10-strict)
            #t
            (ast
               "p"
               ("The following places are also of interest:")
               ()
               double
               xhtml10-strict)
            #t
            (ast
               "ul"
               ((ast
                  "li"
                  ((ast
                     "a"
                     ("The IEEE")
                     (href "http://www.ieee.org/ieeexplore/" shape "rect")
                     double
                     xhtml10-strict))
                  ()
                  double
                  xhtml10-strict)
                  #t
                  (ast
                     "li"
                     ("The"
                        #t
                        (ast
                           "a"
                           ("W3C")
                           (href "http://www.w3c.org" shape "rect")
                           double
                           xhtml10-strict)
                        #t
                        "for web standards")
                     ()
                     double
                     xhtml10-strict)
                  #t
                  (ast
                     "li"
                     ((ast
                        "a"
                        ("Lecture Notes in Computer Science")
                        (href
                           "http://link.springer.de/link/service/series/0558/"
                           shape
                           "rect")
                        double
                        xhtml10-strict))
                     ()
                     double
                     xhtml10-strict))
               ()
               double
               xhtml10-strict)
            #t
            (ast
               "p"
               ("Kurt NÝrmark"
                  #t
                  (ast "br" () () single xhtml10-strict)
                  #t
                  (ast
                     "a"
                     ("Department of Computer Science")
                     (href "http://www.cs.auc.dk" shape "rect")
                     double
                     xhtml10-strict)
                  #t
                  (ast "br" () () single xhtml10-strict)
                  #t
                  (ast
                     "a"
                     ("Aalborg University")
                     (href "http://www.auc.dk" shape "rect")
                     double
                     xhtml10-strict))
               ()
               double
               xhtml10-strict))
         ()
         double
         xhtml10-strict))
   (xmlns "http://www.w3.org/1999/xhtml")
   double
   xhtml10-strict)