input/regression/modal-transforms.ly

   1 \version "2.16.0"
   2 \header {
   3     texidoc = "\modalTranspose, \retrograde, \inversion and
   4 \modalInversion work for an octatonic motif."
   5 }
   6
   7 cOctatonicScale = {
   8   c' d' ees' f'
   9   ges' aes' a' b'
  10 }
  11 motif = {
  12   c'8. ees'16( ges'8. a'16
  13   b'8.) aes'16 f'8. d'16
  14 }
  15
  16 \score {
  17   \new Staff {
  18     \time 4/4
  19     <<
  20       {
  21         \motif
  22         \modalTranspose c' f' \cOctatonicScale \motif
  23         \retrograde \motif
  24         \modalInversion aes' b' \cOctatonicScale \motif
  25         \inversion aes' b' \motif
  26       }
  27       {
  28         s1-"Octatonic motif" |
  29         s1-"motif transposed from c to f" |
  30         s1-"motif in retrograde" |
  31         s1-"motif inverted around aes to b" |
  32         s1-"motif inverted exactly"
  33       }
  34     >>
  35   }
  36 }