input/regression/modal-transforms.ly

   1 \version "2.13.51"
   2 \header {
   3     texidoc = "\modalTranspose, \retrograde and \modalInversion work
   4 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       }
  26       {
  27         s1-"Octatonic motif" |
  28         s1-"motif transposed from c to f" |
  29         s1-"motif in retrograde" |
  30         s1-"motif inverted around aes to b" |
  31       }
  32     >>
  33   }
  34 }