scm/define-music-properties.scm

   1 ;;;; music-property-description.scm -- part of generated backend documentation
   2 ;;;;
   3 ;;;;  source file of the GNU LilyPond music typesetter
   4 ;;;;
   5 ;;;; (c) 1998--2006  Han-Wen Nienhuys <hanwen@xs4all.nl>
   6 ;;;;                 Jan Nieuwenhuizen <janneke@gnu.org>
   7
   8 (define (music-property-description symbol type? description)
   9   (if (not (equal? #f (object-property symbol 'music-doc)))
  10       (ly:error (_ "symbol ~S redefined") symbol))
  11   (set-object-property! symbol 'music-type? type?)
  12   (set-object-property! symbol 'music-doc description)
  13   symbol)
  14
  15 (define-public all-music-properties
  16   (map
  17    (lambda (x) (apply music-property-description x))
  18    `(
  19      (alteration ,number? "alteration for figured bass")
  20
  21      (absolute-octave ,integer?
  22                       "The absolute octave for a octave check note.")
  23      (articulations ,ly:music-list?
  24                     "Articulation events specifically for this note.")
  25      (articulation-type ,string? "key for script definitions alist.
  26
  27 TODO: consider making type into symbol ")
  28      (augmented ,boolean? "This figure is for an augmented figured bass (with +) sign.")
  29      (associated-context ,string? "Name of the Voice context associated with this \\newaddlyrics section")
  30      (bass ,boolean? "Set if this note is a bass note in a chord")
  31      (bracket-start ,boolean? "start a bracket
  32 here. TODO: use SpanEvents?")
  33      (bracket-stop ,boolean? "stop a bracket here.")
  34      (break-penalty ,number? "Penalty for line break hint.")
  35      (break-permission ,symbol? "Whether to allow, forbid or force a line break.")
  36      (cautionary ,boolean? "If set, this alteration needs cautionary accidental")
  37      (change-to-id ,string? "name of the context to change to ")
  38      (change-to-type ,symbol? "type of the context to change to.")
  39      (compress-procedure ,procedure? "compress this music expression. Argument 1: the music, arg 2: factor")
  40      (context-id ,string? "name of context")
  41      (context-type ,symbol?  "type of context")
  42      (create-new ,boolean? "Create a fresh context.")
  43      (delta-step ,number? "How much should a fall change pitch?")
  44      (descend-only ,boolean? "If set, this @code{\\context} will only descend in the context tree.")
  45      (denominator ,integer? "denominator in a time signature")
  46      (digit ,integer? "digit for fingering")
  47      (diminished ,boolean? "This bass figure should be slashed.")
  48      (direction ,ly:dir? "Print this up or down?")
  49      (drum-type ,symbol? "Which percussion instrument to play this note on.")
  50      (duration ,ly:duration? "Duration of this note/lyric.")
  51      (error-found ,boolean? "If true, a parsing error was found in this expression")
  52      (element ,ly:music? "The single child of a Music_wrapper music object, or the body of a repeat.")
  53      (elements ,ly:music-list? "A list of elements for sequential of simultaneous music, or the alternatives of repeated music. ")
  54      (elements-callback ,procedure? "Return a list of children, for use by a sequential iterator. Takes a single Music parameter")
  55      (expected-beam-count ,integer? "Expected number of non-tremolo beams in a tremolo repeat")
  56      (figure ,integer? "a bass figure")
  57      (force-accidental ,boolean? "If set, a cautionary accidental should always be printed on this note")
  58      (grob-property ,symbol? "The symbol of the grob property to set. ")
  59      (grob-property-path ,list? "A list of symbols, locating a nested grob property, e.g. (beamed-lengths details). ")
  60      (grob-value ,scheme? "The value of the grob property to set")
  61      (input-tag ,scheme? "Arbitrary marker to relate input and output")
  62      (inversion ,boolean? "If set, this chord note is inverted.")
  63      (iterator-ctor ,procedure? "Function to construct music-event-iterator object for this Music")
  64
  65      (label ,markup? "label of a mark.")
  66      (last-pitch ,ly:pitch? "The last pitch after relativization.")
  67      (length ,ly:moment? "The duration of this music")
  68      (length-callback ,procedure? "How to compute the duration of this music. This property can only be defined as initializer in @file{define-music-types.scm}.")
  69      (metronome-count ,number? "How many beats in a minute?")
  70      (name ,symbol? "Name of this music object")
  71      (no-continuation ,boolean? "If set, disallow continuation lines")
  72      (numerator ,integer? "numerator of a time signature")
  73      (once ,boolean? "Apply this operation only during one time step?")
  74      (octavation ,integer? "This pitch was octavated by how many octaves? For chord inversions, this is negative.")
  75      (origin ,ly:input-location? "where was this piece of music defined?")
  76      (part-combine-status ,symbol?
  77                           "Change to what kind of state? Options are
  78 solo1, solo2 and unisono")
  79      (parenthesize ,boolean? "Enclose resulting objects in parentheses?")
  80      (pitch ,ly:pitch? "the pitch of this note")
  81      (pitch-alist ,list? "list of pitches jointly forming the scale of a key signature")
  82      (pop-first ,boolean? "Do a revert before we try to do a override on some grob property.")
  83      (prob-property ,symbol? "The symbol of the prob property to set. ")
  84      (procedure ,procedure?
  85                 "The function to run with \\applycontext.
  86 It must take a single argument, being the context.")
  87      (property-operations ,list?
  88                           "Do these operations for instantiating the context.")
  89      (quoted-events ,vector? "A vector of with moment/event-list entries.")
  90      (quoted-music-name ,string? "The name of the voice to quote.")
  91      (quoted-voice-direction ,ly:dir? "Should the quoted voice be up-stem or down-stem?")
  92      (quoted-context-type ,symbol? "The name of the context to direct quotes to, eg., @code{Voice}.")
  93      (quoted-context-id ,string? "The id of the context to direct quotes to, eg., @code{cue}.")
  94      (quoted-transposition ,ly:pitch? "The pitch used for the quote, overriding \\transposition")
  95      (to-relative-callback ,procedure? "How to transform a piece of music to relative pitches")
  96      (tweaks ,list? "An alist of properties to override in the backend
  97 for the grob made of this event.")
  98
  99      (repeat-count  ,integer? "do a @code{\repeat} how ofen?")
 100      (span-direction ,ly:dir? "Does this start or stop a spanner?")
 101      (span-type ,string? "What kind of spanner should be created?
 102
 103 TODO: consider making type into symbol")
 104      (split-list ,list? "splitting moments for part combiner.")
 105      (start-callback ,procedure? "Function to compute the negative
 106 length of starting grace notes.  This property can only be defined as
 107 initializer in @file{define-music-types.scm}.")
 108      (string-number ,integer? "The number of the string in a StringNumberEvent")
 109      (symbol ,symbol? "Grob name to perform an override/revert on.")
 110      (tags ,list? "List of symbols that for denoting extra details,
 111 e.g. @code{\\tag #'part ...} could tag a piece of music as only being active in a part.")
 112      (text-type ,symbol? "Particular type of text script (e.g. finger, dynamic).")
 113
 114      (text ,markup? "markup expression to be printed")
 115      (tempo-unit ,ly:duration? "The unit for the metronome count.")
 116      (tonic ,ly:pitch? "Base of the scale")
 117      (tremolo-type ,integer? "speed of tremolo, e.g. 16 for c4:16")
 118      (trill-pitch ,ly:pitch? "Pitch of other note of the trill.")
 119      (type ,symbol? "The type of this music object. Determines iteration in some cases.")
 120      (types ,list? "The types of this music object; determines by what
 121 engraver this music expression is processed.")
 122      (value ,scheme? "Assignment value for a
 123 translation property")
 124      (void ,boolean? "If this property is #t, then the music expression is to be
 125 discarded by the toplevel music handler.")
 126      (what ,symbol? "What to change for auto-change. FIXME, naming")
 127      (untransposable ,boolean? "If set, this music is not transposed.")
 128      )))