input/test/sleur.ly

   1 \header{
   2 enteredby =      "jcn";
   3 copyright =      "PD";
   4 TestedFeatures =         "This file tests Feta embedded slurs"
   5          "(Feta definitively is not an abbreviation of Font-En-TjA)";
   6 }
   7
   8 \version "0.1.9";
   9
  10 shortlong = \melodic{
  11         c4()c( c c  |
  12         c c c c |
  13         c c c c |
  14         c c c )c |
  15 }
  16
  17 dirs = \melodic {
  18         \octave c';
  19         c'1() g' () c () g () c |
  20 }
  21
  22 complex = \melodic{
  23         \octave c';
  24         'c16( 'e( 'g( 'b( d( f( a( c'())))))))c4 c4 |
  25         \octave c''';
  26         'c16( a( f( d( 'b( 'g( 'e( 'c())))))))c4 c4 |
  27 }
  28
  29 over = \melodic{
  30         \octave c';
  31
  32         e( g' g' )e
  33         e( a' a' )e
  34         e( b' b' )e
  35         e( c'' c'' )e
  36         \stemup
  37         e( c' c' )e
  38         e( d' d' )e
  39         e( e' e' )e
  40         e( c'' c'' )e
  41         \stemboth
  42         e( f' b' )e
  43         e( b' f' )e
  44         e( e'' g' )e
  45         e( g' e'' )e
  46         \stemup
  47         e( d' b )e
  48         e( b d' )e
  49         e( f' c'' )e
  50         e( c'' f )e
  51 }
  52
  53 under = \melodic{
  54         \octave c';
  55         \stemdown
  56         f'( \stemboth d d \stemdown )f'
  57         f'( \stemboth c c \stemdown )f'
  58         f'( \stemboth 'b 'b \stemdown )f'
  59         f'( \stemboth 'a 'a \stemdown )f'
  60         \stemdown
  61         f'( a a )f'
  62         f'( g g )f'
  63         f'( f f )f'
  64         f'( 'a 'a )f'
  65
  66         \stemdown
  67         f'( \stemboth d 'b \stemdown )f'
  68         f'( \stemboth 'b d \stemdown )f'
  69         f'( \stemboth 'd 'b \stemdown )f'
  70         f'( \stemboth 'b 'd \stemdown )f'
  71         \stemdown
  72         f'( f a )f'
  73         f'( a f )f'
  74         f'( f 'e )f'
  75         f'( 'e f )f'
  76 }
  77
  78 eccentric = \melodic{
  79         \octave c';
  80         \stemup
  81         \[4/7 f( a' f f f f )f \] |
  82         \[4/7 f( f f f f a' )f \] |
  83         \stemdown
  84         \[4/7 e'( c e' e' e' e' )e' \] |
  85         \[4/7 e'( e' e' e' e' c )e' \] |
  86 }
  87
  88 tiltup = \melodic{
  89         \octave c';
  90         e( c'' c'' )e'
  91         \stemup
  92         e( c'' c'' )e'
  93         \stemboth
  94         e( g' e'' )e'
  95         \stemup
  96         e( c'' f )e'
  97         \stemdown
  98         f'( \stemboth 'a 'a \stemdown )f''
  99         \stemdown
 100         f'( 'a 'a )f''
 101 }
 102
 103 tiltdown = \melodic{
 104         \octave c';
 105         e'( c'' c'' )e
 106         \stemup
 107         e'( c'' c'' )e
 108         \stemboth
 109         e'( g' e'' )e
 110         \stemup
 111         e'( c'' f )e
 112         \stemdown
 113         f''( \stemboth 'a 'a \stemdown )f'
 114         \stemdown
 115         f''( 'a 'a )f'
 116 }
 117
 118 broken = \melodic{
 119       \octave c'';
 120       c c c c()
 121       c c c c(
 122       c )c c c(
 123       c c )c c(
 124       )a' a' a' a'()
 125       a' a' a' a'()
 126       c( c c )c
 127       c( c c )'f
 128       'f( c c )c
 129       'f( c c )'f
 130 }
 131
 132 blend = \melodic{
 133         \octave c';
 134         e( c'' c'' )e
 135         \stemup
 136         e( c'' c'' )e
 137         \stemdown
 138         f'( \stemboth 'a 'a \stemdown )f'
 139         f'( 'a 'a )f'
 140
 141         \stemboth
 142         e( c'' c'' )e'
 143         e'( c'' c'' )e
 144         d( d d )d
 145
 146         \stemdown
 147         e( c'' c'' )e'
 148         e'( c'' c'' )e
 149         d( d d )d
 150 }
 151
 152
 153 bug = \melodic{
 154         \octave c';
 155         a()g( f )e
 156         b'()a'( g' )f'
 157         g( f' e' )d'
 158         f f( g )a
 159         c' () b () c' c'
 160 }
 161
 162 clipping = \melodic{
 163         \octave c';
 164         \stemboth
 165         c( c''' c''')c
 166         c( c''' c )c''
 167         c''( c c''' )c
 168         \stemdown
 169         c( \stemup '''c '''c \stemdown )c
 170         c( \stemup '''c c \stemdown )''c
 171         ''c( \stemup c '''c \stemdown )c
 172 }
 173
 174 \score{
 175         \melodic{
 176                 % use blend for fast check
 177                 %\blend
 178 % {
 179                 \shortlong
 180                 \dirs
 181                 \complex
 182                 \over
 183                 \under
 184                 \eccentric
 185                 \tiltup
 186                 \tiltdown
 187                 \bug
 188                 \clipping
 189 % }
 190                 % use broken with small linewidth
 191                 %\broken
 192         }
 193         \paper{
 194               indent = 0.0\pt;
 195                 %for broken!
 196                 %linewidth= 40.\mm;
 197                 %castingalgorithm = \Wordwrap;
 198         }
 199 }
 200