(skribe-load "letter.skr")
(skribe-load "french.skr")

(document :where "Sophia-Antipolis"
          :date "28 octobre 2003"
          :author (author :name "Manuel Serrano" 
                          :address '("2004 route des Lucioles - BP 93"
                                     "F-06902 Sophia Antipolis, Cedex"
                                      "France"
                                      ("tel: " ,(it "(+33) 4 92 38 76 39"))))

(p [À qui de droit])
(p [Objet: ,(underline [Une version de test de Skribe est disponible.])])
(p [])

(p [Monsieur,])
(p [])

(p [J'ai le plaisir de vous annoncer que le logiciel Skribe est
maintenant disponible en version de test. À terme, ce dernier 
remplacera le logiciel Scribe. Nous avons dû adopter le nom ,(emph "Skribe")
car il est apparu que le nom ,(emph "Scribe") avait été utilisé dans les
années 70 pour nommé un système développé à ,(sc "Cmu").])

(center [Veuillez croire, Monsieur, à l'expression de mes sentiments
distingués.]))