ly/declarations-as.ly

   1
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% UGH UGH UGH UGHUGH FIXME
   3 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -> duplication!
   4
   5 breve = \duration #'( -1 0)
   6 longa = \duration #'( -2 0 )
   7 maxima = \duration #'( -3 0 )
   8
   9 #(begin
  10   (eval-string (ly-gulp-file "slur.scm"))
  11   (eval-string (ly-gulp-file "generic-property.scm"))
  12   (eval-string (ly-gulp-file "basic-properties.scm"))
  13  )
  14
  15 \include "nederlands.ly"                % dutch
  16 \include "chord-modifiers.ly"
  17 \include "script.ly"
  18
  19
  20 % declarations for standard directions
  21 left = -1
  22 right = 1
  23 up = 1
  24 down = -1
  25 start = -1
  26 stop = 1
  27 smaller = -1
  28 bigger = 1
  29
  30 center=0
  31
  32 break =  \penalty  -1000000;
  33 nobreak =  \penalty 1000000;
  34 \include "scale-definitions.ly"
  35
  36
  37 melisma = \property Staff.melismaBusy = ##t
  38 melismaEnd = \property Staff.melismaBusy = ##f
  39
  40 %papersize = "a4"
  41 %\include "generic-paper.ly"
  42
  43 #(eval-string (ly-gulp-file "paper.scm"))
  44
  45 \paper {
  46         texsetting = "";
  47         pssetting = "";
  48         scmsetting = "(lilyponddefs.ps) findlibfile {exch pop //systemdict /run get exec} { /undefinedfilename signalerror } ifelse;\n";% UGH.
  49 }
  50
  51 \include "paper-as9.ly"
  52
  53 % ugh
  54 \include "midi.ly"
  55
  56 \include "dynamic-scripts.ly"
  57 \include "spanners.ly"
  58
  59 \include "property.ly"
  60
  61
  62
  63 unusedEntry = \notes { c4 }             % reset default duration
  64
  65 % music = "\melodic\relative c"
  66