1\version "2.16.0" 2\header { 3 texidoc = "\modalTranspose, \retrograde, \inversion and 4\modalInversion work for an octatonic motif." 5} 6 7cOctatonicScale = { 8 c' d' ees' f' 9 ges' aes' a' b' 10} 11motif = { 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} 37