input/test/gregorian-scripts.ly

   1 \version "2.1.26"
   2 \header {
   3     title       = "Gregorian Scripts"
   4     texidoc  = "@cindex Gregorian Scripts
   5
   6 Gregorian Scripts:
   7
   8 ictus, circulus, semicirculus, accentus, episem.
   9
  10 TODO: augmentum.  Syntax: either as bracket (\augmentumInitium,
  11 \augmentumFinis), or as head prefix with subsequently collecting all
  12 dots and putting them behind the ligature in a vertical row.
  13 Counterexample to the second approach: Graduale Triplex, tempus per
  14 annum, hebdomada septima, alleluia (page 280).
  15
  16 FIXME: horizontal spacing (ragged right mode).
  17
  18 FIXME: padding/minimum-distance is fragile.
  19
  20 FIXME: episem stops one notehead too early.
  21
  22 "}
  23
  24 \include "gregorian-init.ly"
  25
  26 \score {
  27   \context VaticanaVoice {
  28     \override VaticanaScript  #'padding = #-0.5
  29     \notes {
  30       a\ictus
  31       a\circulus
  32       a\semicirculus
  33       a\accentus
  34
  35       %{ %% TODO: augmentum:
  36         a\augmentum
  37         \[ \augmentumInitium b \flexa a \augmentumFinis \]
  38       %}
  39
  40       \[ a \episemInitium \pes b \flexa a \episemFinis \]
  41     }
  42   }
  43   \paper {
  44     linewidth = 70.0
  45     linethickness = \staffspace / 5.0
  46     width = 60.0
  47     indent = 0.0
  48     raggedright = ##t
  49   }
  50 }