]> git.donarmstrong.com Git - lilypond.git/blob - scm/translator-description.scm
patch::: 1.3.104.jcn1
[lilypond.git] / scm / translator-description.scm
1 (define (number-or-string? x) (or (number? x) (string? x)))
2 (define (engraver-description name description created-elts properties)
3   (list name description created-elts properties)
4   )
5
6 (define (translator-property-description symbol type? description)
7   (list symbol type? description)
8   )
9
10 (define engraver-description-alist
11   (list
12    (cons
13     'Stem_engraver
14     (engraver-description
15      "Stem_engraver"
16      "Create stems and single-stem tremolos"
17      '(Stem StemTremolo)
18      (list
19       (translator-property-description 'tremoloFlags integer? "")
20       (translator-property-description 'stemLeftBeamCount integer? "
21 Specify the number of beams to draw on the left side of the next note.
22 Overrides automatic beaming.  The value is only used once, and then it
23 is erased.
24 ")
25       (translator-property-description 'stemRightBeamCount integer? "idem, for the right side")    
26       )))
27    
28    (cons
29     'Hyphen_engraver
30     (engraver-description
31      "Hyphen_engraver"
32      "Create lyric hyphens"
33      '(LyricHyphen)
34      (list
35       )))
36
37    (cons
38     'Extender_engraver
39     (engraver-description
40      "Extender_engraver"
41      "Create lyric extenders"
42      '(LyricExtender)
43      (list
44       )))
45
46    
47    (cons
48     'Separating_line_group_engraver
49     (engraver-description
50      "Separating_line_group_engraver"
51      "Generates objects for computing spacing parameters."
52      '(SeparationItem SeparatingGroupSpanner)
53      (list
54       )))
55
56    (cons
57     'Axis_group_engraver
58     (engraver-description
59      "Axis_group_engraver"
60      "Group all objects created in this context in a VerticalAxisGroup spanner."
61      '(VerticalAxisGroup)
62      (list
63       (translator-property-description
64        'CONTEXTNAMEVerticalExtent number-pair? "hard coded vertical extent.
65 The format is a pair of dimensions, for example, this sets the sizes
66 of a staff to 10 (5+5) staffspaces high.
67
68 @example
69 \property Staff.StaffVerticalExtent = #(-5.0 . 5.0)
70 @end example
71
72  [fixme, naming]")
73       (translator-property-description
74        'CONTEXTNAMEMinimumVerticalExtent number-pair?
75        "minimum vertical extent, same format as CONTEXTNAMEVerticalExtent [fixme, naming]")
76       (translator-property-description
77        'CONTEXTNAMExtraVerticalExtent number-pair?
78        "extra vertical extent, same format
79 CONTEXTNAMEMinimumVerticalExtent [fixme, naming]") )))
80
81    (cons
82     'Hara_kiri_engraver
83     (engraver-description
84      "Hara_kiri_engraver"
85      "Like Axis_group_engraver, but make a hara kiri spanner, and add
86 interesting items (ie. note heads, lyric syllables and normal rests)"
87      '(HaraKiriVerticalGroup)
88      '()
89      ))
90
91    
92    (cons
93     'Local_key_engraver
94     (engraver-description
95      "Local_key_engraver"
96      "Make accidentals.  Catches note heads, ties and notices key-change
97    events.  Due to interaction with ties (which don't come together
98    with note heads), this needs to be in a context higher than Tie_engraver.
99    (FIXME)."
100      '(Accidentals)
101      (list
102       (translator-property-description 'localKeySignature list? "the key signature at this point  in the measure")
103       (translator-property-description 'forgetAccidentals boolean? "do
104 not set localKeySignature when a note alterated differently from
105 localKeySignature is found.
106
107 Causes accidentals to be printed at every note instead of
108 remembered for the duration of a measure.
109 ")
110       (translator-property-description 'noResetKey boolean? "Do not
111 reset local key to the value of keySignature at the start of a measure,
112 as determined by measurePosition.
113
114 Do not reset the key at the start of a measure.  Accidentals will be
115 printed only once and are in effect until overridden, possibly many
116 measures later.
117 ")
118       
119       )))
120
121    
122    (cons
123     'Volta_engraver
124     (engraver-description
125      "Volta_engraver"
126      "Make volta brackets"
127      '(VoltaBracket)
128      (list
129       (translator-property-description 'repeatCommands list?
130                                        "This property is read to find any command of the form (volta . X), where X is a string or #f")
131       (translator-property-description 'voltaSpannerDuration moment?
132                                        "maximum duration of the volta bracket.
133
134     Set to a duration to control the size of the brackets printed by
135 @code{\alternative}.  It specifies the number of whole notes duration
136 to use for the brackets.  This can be used to shrink the length of
137 brackets in the situation where one alternative is very large.  It may
138 have odd effects if the specified duration is longer than the music
139 given in an @code{\alternative}.
140 ")
141       )
142      ))
143
144    (cons
145     'Clef_engraver
146     (engraver-description
147      "Clef_engraver"
148      "Determine and set reference point for pitches"
149      '(Clef OctavateEight)
150      (list
151       (translator-property-description 'supportedClefTypes
152                                        list? "Clef settings supported. The value is an association list contain entries (NAME . (GLYPH . POSITION)), where  NAME is the clef name (alto, baritone, etc.), GLYPH the glyph name, POSITION an integer where the center symbol should go.")
153       (translator-property-description 'clefPosition number? " where the center of the symbol should go")
154       (translator-property-description 'clefGlyph string? "name of the symbol within the music font")
155       (translator-property-description 'centralCPosition number? "place of the central C. ")
156       (translator-property-description 'defaultClef string? "generate this clef at the very start of this staff. If not set, don't generate a clef")
157       (translator-property-description 'explicitClefVisibility procedure? "visibility-lambda function for clefs entered as \clef.")
158       (translator-property-description 'clefPitches list? "alist mapping GLYPHNAME to the position of the central C for that symbol")
159
160       )))
161    
162    (cons
163     'A2_engraver
164     (engraver-description
165      "A2_engraver"
166      "Part combine engraver for orchestral scores."
167      '(TextScript)
168      (list
169       (translator-property-description 'combineParts boolean? "try to combine parts?")
170       (translator-property-description 'soloADue  boolean? "set Solo/A due texts?")
171       (translator-property-description 'soloText  string? "text for begin of solo")
172       (translator-property-description 'soloIIText  string? "text for begin of solo for voice ``two''")
173       (translator-property-description 'aDueText string? "text for begin of a due")
174       (translator-property-description 'split-interval number-pair? "always split into two voices for contained intervals")
175       (translator-property-description 'unison  boolean? "set if unisono is detected  ")
176       (translator-property-description 'solo  boolean? "set if solo is detected")
177       (translator-property-description 'unisilence  boolean? "set if unisilence is detected")
178       (translator-property-description 'unirhythm  boolean? "set if unirhythm is detected")
179       )))
180
181    (cons
182     'Align_note_column_engraver
183     (engraver-description
184      "Align_note_column_engraver"
185      "Generate object to put grace notes from left to right."
186      '(GraceAlignment)
187      (list
188       
189       (translator-property-description 'graceAlignPosition dir? "put the grace note before or after the main note?")
190       (translator-property-description 'graceAccidentalSpace number? "amount space to alot for an accidental")
191       )))
192    
193    (cons
194     'Arpeggio_engraver
195     (engraver-description
196      "Arpeggio_engraver"
197      "Generate an Arpeggio from a Arpeggio_req"
198      '(Arpeggio)
199      (list
200       )))
201
202    (cons
203     'Auto_beam_engraver
204     (engraver-description
205      "Auto_beam_engraver"
206      "Generate beams based on measure characteristics and observed Stems.
207 Uses beatLength, measureLength and measurePosition to decide when to start and stop a beam.
208 "
209      '(
210        Beam)
211      (list
212       (translator-property-description 'noAutoBeaming boolean? "  If set to true then beams are not generated automatically.
213 ")
214       (translator-property-description 'autoBeamSettings list? "
215 Specifies when automatically generated beams should begin and end.  The elements have the format:
216
217 @example
218
219    function shortest-duration-in-beam time-signature
220
221 where
222
223     function = begin or end
224     shortest-duration-in-beam = numerator denominator; eg: 1 16
225     time-signature = numerator denominator, eg: 4 4
226
227 unspecified or wildcard entries for duration or time-signature
228 are given by * *
229
230 The user can override beam begin or end time by pushing a wildcard entries
231 '(begin * * * *) or '(end * * * *) resp., eg:
232
233     \property Voice.autoBeamSettings \push #'(end * * * *) = #(make-moment 1 4)
234
235 The head of the list:
236     '(
237      ((end * * 3 2) . ,(make-moment 1 2))
238      ((end 1 16 3 2) . ,(make-moment 1 4))
239      ((end 1 32 3 2) . ,(make-moment 1 8))
240      ...
241     )
242
243 @end example"))))
244
245    (cons
246     'Bar_engraver
247     (engraver-description
248      "Bar_engraver"
249      "Create barlines."
250      '(BarLine)
251      (list
252       (translator-property-description 'whichBar string? "This property is read to determine what type of barline to create.
253 Example:
254 @example
255 \\property Staff.whichBar = \"|:\"
256 @end example
257 will create a start-repeat bar in this staff only 
258 ")
259       (translator-property-description 'staffsFound list? "list of all staff-symbols found.")
260       )))
261
262
263    (cons
264     'Bar_number_engraver
265     (engraver-description
266      "Bar_number_engraver"
267      "A bar number is created whenever measurePosition is zero. It is
268 put on top of all staffs, and appears only at  left side of the staff."
269      '(BarNumber)
270      (list
271       (translator-property-description 'currentBarNumber integer? "this is read to determine
272  the number to put on the bar ")
273       )))
274
275
276    (cons
277     'Beam_engraver
278     (engraver-description
279      "Beam_engraver"
280      "Handles Beam_requests by engraving Beams.    If omitted, then notes will be
281     printed with flags instead of beams."
282      '(Beam)
283      (list
284       (translator-property-description 'beamMelismaBusy boolean? "Signal if a beam is set when automaticMelismata is set")
285       )))
286
287    (cons
288     'Break_align_engraver
289     (engraver-description
290      "Break_align_engraver"
291      "Align graphic elements with corresponding break-align-symbols into groups, and order the groups according to breakAlignOrder"
292      '(BreakAlignment BreakAlignGroup LeftEdge)
293      (list
294       (translator-property-description 'breakAlignOrder list?
295                                        "Defines the order in which
296 prefatory matter (clefs, key signatures) appears, eg. this puts the
297 key signatures after the bar lines:
298
299 @example
300         \\property Score.breakAlignOrder = #'(
301           Span_bar
302           Breathing_sign
303           Clef_item
304           Staff_bar
305           Key_item
306           Time_signature
307         )
308 @end example
309 ")
310       )))
311
312
313    (cons
314     'Breathing_sign_engraver
315     (engraver-description
316      "Breathing_sign_engraver"
317      ""
318      '(BreathingSign)
319      (list
320       )))
321
322
323    (cons
324     'Chord_name_engraver
325     (engraver-description
326      "Chord_name_engraver"
327      "Catch Note_req's, Tonic_reqs, Inversion_reqs, Bass_req
328 and generate the appropriate chordname."
329      '(ChordName)
330      (list
331       (translator-property-description 'chordInversion boolean? " Determines whether LilyPond should look for chord inversions when
332     translating from notes to chord names.  Set to 1 to find
333     inversions.  The default is 0 which does not look for
334     inversions.")
335       (translator-property-description 'drarnChords boolean? "")
336       )))
337
338
339    (cons
340     'Chord_tremolo_engraver
341     (engraver-description
342      "Chord_tremolo_engraver"
343      "Generates beams for the \repeat X tremolo ... construct"
344      '(Beam)
345      (list
346       )))
347
348
349
350    (cons
351     'Collision_engraver
352     (engraver-description
353      "Collision_engraver"
354      ""
355      '(NoteCollision
356        )
357      (list
358       )))
359
360    (cons
361     'Custos_engraver
362     (engraver-description
363      "Custos_engraver"
364      ""
365      '(Custos)
366      (list
367       )))
368
369
370    (cons
371     'Dot_column_engraver
372     (engraver-description
373      "Dot_column_engraver"
374      " Engraves dots on dotted notes shifted to the right of the note.
375 If omitted, then dots appear on top of the notes.
376 "
377      '(DotColumn
378        )
379      (list
380       )))
381
382
383    (cons
384     'Dynamic_engraver
385     (engraver-description
386      "Dynamic_engraver"
387      ""
388      '(DynamicLineSpanner
389        DynamicText Crescendo
390        TextSpanner)
391      (list
392       )))
393
394
395
396
397    (cons
398     'Grace_position_engraver
399     (engraver-description
400      "Grace_position_engraver"
401      "Attach a grace note alignment to a note-column "
402      '()
403      (list
404       )))
405
406    (cons
407     'Grace_engraver_group
408     (engraver-description
409      "Grace_engraver_group"
410      "An engraver that creates a `shielded' context-tree with separate notion of time"
411      '()
412      (list
413       )))
414
415
416    (cons
417     'Instrument_name_engraver
418     (engraver-description
419      "Instrument_name_engraver"
420      " Prints the name of the instrument (specified by
421     @code{Staff.instrument} and @code{Staff.instr}) at the left of the
422     staff."
423      '(InstrumentName)
424      (list
425       (translator-property-description 'instrument string? " If @code{Instrument_name_engraver}
426 @cindex Instrument_name_engraver
427  is
428     added to the Staff translator, then the @code{instrument} property
429     is used to label the first line of the staff and the @code{instr}
430     property is used to label subsequent lines.  If the
431     @code{midiInstrument} property is not set, then @code{instrument}
432     is used to determine the instrument for MIDI output.")
433       (translator-property-description 'instr string? "see @code{instrument}")
434       )))
435
436    (cons
437     'Engraver_group_engraver
438     (engraver-description
439      "Engraver_group_engraver"
440      "A group of engravers taken together"
441      '()
442      (list
443       )))
444
445    (cons
446     'Key_engraver
447     (engraver-description
448      "Key_engraver"
449      ""
450      '(KeySignature
451        )
452      (list
453       
454       (translator-property-description 'keySignature list? "")
455       (translator-property-description 'keyOctaviation boolean? "")
456       (translator-property-description 'explicitKeySignatureVisibility procedure? "")
457       (translator-property-description 'createKeyOnClefChange boolean? "")
458       (translator-property-description 'keyAccidentalOrder list? "")
459       (translator-property-description 'keySignature list? "")
460       )))
461
462    (cons 'Lyric_engraver
463          (engraver-description
464           "Lyric_engraver"
465           ""
466           '()
467           (list
468            ;; FIXME
469            )))
470
471    (cons 'Lyric_phrasing_engraver
472          (engraver-description
473           "Lyric_phrasing_engraver"
474           ""
475           '()
476           (list
477            (translator-property-description 'automaticPhrasing boolean? "")
478            (translator-property-description 'weAreGraceContext boolean? "")
479            (translator-property-description 'melismaEngraverBusy boolean? "")
480            (translator-property-description 'associatedVoice string? "")
481            (translator-property-description 'phrasingPunctuation string? "")
482            )))
483
484    (cons
485     'Mark_engraver
486     (engraver-description
487      "Mark_engraver"
488      ""
489      '(RehearsalMark)
490      (list
491
492       (translator-property-description 'rehearsalMark number-or-string? "")
493       (translator-property-description 'staffsFound list? "")
494       )))
495
496
497    (cons
498     'Melisma_engraver
499     (engraver-description
500      "Melisma_engraver"
501      ""
502      '()
503      (list
504
505       (translator-property-description 'melismaBusy boolean? "")
506       (translator-property-description 'slurMelismaBusy boolean? "")
507       (translator-property-description 'tieMelismaBusy boolean? "")
508       (translator-property-description 'beamMelismaBusy boolean? "")
509       )))
510
511
512    (cons
513     'Multi_measure_rest_engraver
514     (engraver-description
515      "Multi_measure_rest_engraver"
516      "Engraves multi-measure rests that are produced with @code{R}.  Reads
517 measurePosition and currentBarNumber to determine what number to print over the MultiMeasureRest
518    "
519      '(MultiMeasureRest)
520      (list
521       )))
522
523
524    (cons
525     'Note_heads_engraver
526     (engraver-description
527      "Note_heads_engraver"
528      "Generate one or more noteheads from Music of type Note_req."
529      '(NoteHead Dots)
530      (list
531       )))
532
533
534    (cons
535     'Note_name_engraver
536     (engraver-description
537      "Note_name_engraver"
538      ""
539      '(NoteName)
540      (list
541       )))
542
543
544    (cons
545     'Output_property_engraver
546     (engraver-description
547      "Output_property_engraver"
548      "Interpret Music of Output_property type, and apply a function
549 to any Graphic objects that satisfies the predicate."
550      '()
551      (list
552       )))
553
554
555    (cons
556     'Piano_pedal_engraver
557     (engraver-description
558      "Piano_pedal_engraver"
559      "engrave Piano pedals symbols."
560      '(SostenutoPedal SustainPedal UnaChordaPedal)
561      (list
562       
563         (translator-property-description 'startSustain string? "")
564         (translator-property-description 'stopSustain  string? "")
565         (translator-property-description 'stopStartSustain  string? "")
566         (translator-property-description 'startUnaChorda  string? "")
567         (translator-property-description 'stopUnaChorda string? "")
568       )))
569
570    (cons 
571     'Pitch_squash_engraver
572     (engraver-description
573      "Pitch_squash_engraver"
574      "Treat all pitches as middle C.  Note that the notes move, but
575 the locations of accidentals stay the same. 
576 Set the position field of all note heads to zero. This useful for
577 making a single line staff that demonstrates the rhythm of a melody."
578      '()
579      (list
580       (translator-property-description 'squashedPosition integer? " Vertical position of
581 squashing.")
582       )))
583    
584    (cons
585     'Property_engraver
586     (engraver-description
587      "Property_engraver"
588 "This is a engraver that converts \property settings into
589 back-end element-property settings. Example: Voice.stemLength will set
590 #'length in all Stem objects.
591
592 Due to CPU and memory requirements, the use of this engraver is deprecated."
593      '()
594      (list
595       (translator-property-description 'Generic_property_list list? "description of the conversion.
596
597 Defines names and types for generic properties. These are properties
598 than can be plugged into the backend directly. See the init file
599 @file{generic-property.scm} for details.  For internal use only,
600 deprecated.
601 ")
602       )))
603
604
605    (cons
606     'Repeat_acknowledge_engraver
607     (engraver-description
608      "Repeat_acknowledge_engraver"
609      
610      "Acknowledge repeated music, and convert the contents of
611 repeatCommands ainto an appropriate setting for whichBar"
612      '()
613      (list
614       (translator-property-description 'repeatCommands list? "")
615       (translator-property-description 'whichBar string? "")
616  
617       )))
618
619
620    (cons
621     'Rest_collision_engraver
622     (engraver-description
623      "Rest_collision_engraver"
624      "Handles collisions of rests."
625      '(RestCollision)
626      (list
627       )))
628
629
630    (cons
631     'Rest_engraver
632     (engraver-description
633      "Rest_engraver"
634      ""
635       '(Rest Dots)
636    (list
637       )))
638
639
640    (cons
641     'Rhythmic_column_engraver
642     (engraver-description
643      "Rhythmic_column_engraver"
644      "Generates NoteColumn, an objects that groups stems, noteheads and rests."
645      '(NoteColumn)
646      (list
647       )))
648
649
650    (cons
651     'Script_column_engraver
652     (engraver-description
653      "Script_column_engraver"
654      ""
655      '(ScriptColumn)
656      (list
657       )))
658
659
660    (cons
661     'Script_engraver
662     (engraver-description
663      "Script_engraver"
664      "    Handles note ornaments generated by @code{\script}.  
665 "
666      '(Script)
667      (list
668       (translator-property-description 'scriptDefinitions list? "
669 Description of scripts to use.  (fixme) 
670 ")
671
672       (translator-property-description 'scriptHorizontal boolean? "    Put scripts left or right of note heads.  Support for this is
673     limited.  Accidentals will collide with scripts.
674     
675 ")
676       )))
677
678    (cons
679     'Score_engraver
680     (engraver-description
681      "Score_engraver"
682      "Top level engraver. Takes care of generating columns and the complete  system (ie. LineOfScore)"
683      '(LineOfScore PaperColumn NonMusicalPaperColumn)
684      (list
685       (translator-property-description 'currentMusicalColumn ly-element? "")
686       (translator-property-description 'currentCommandColumn ly-element? "")
687       )))
688    
689    (cons 'Skip_req_swallow_translator
690          (engraver-description
691           "Skip_req_swallow_translator"
692           ""
693           '()
694           (list
695            ;; FIXME
696            )))
697
698    (cons
699     'Slur_engraver
700     (engraver-description
701      "Slur_engraver"
702      "Build slurs from Slur_reqs"
703      '(Slur)
704
705      (list
706       (translator-property-description 'slurBeginAttachment symbol? "translates to the car of Slur.element-property 'attachment.")
707       (translator-property-description 'slurEndAttachment symbol? "translates to the cdr of Slur.element-property 'attachment.")
708       (translator-property-description 'slurMelismaBusy boolean? "Signal a slur if automaticMelismata is set")
709       )))
710
711
712    (cons
713     'Spacing_engraver
714     (engraver-description
715      "Spacing_engraver"
716      "make a SpacingSpanner and do bookkeeping of shortest starting and playing notes  "
717      '(SpacingSpanner)
718      (list
719       )))
720
721
722    (cons
723     'Span_arpeggio_engraver
724     (engraver-description
725      "Span_arpeggio_engraver"
726      ""
727      '(Arpeggio)
728      (list
729       (translator-property-description 'connectArpeggios boolean? " If
730 set, connect all arpeggios that are found.  In this way, you can make
731 arpeggios that cross staffs.
732 ")
733       )))
734
735
736    (cons
737     'Span_bar_engraver
738     (engraver-description
739      "Span_bar_engraver"
740      "This engraver makes cross-staff barlines: It catches all normal
741 bar lines, and draws a single span-bar across them."
742
743      '(SpanBar)
744      (list
745       )))
746
747
748    (cons
749     'Staff_symbol_engraver
750     (engraver-description
751      "Staff_symbol_engraver"
752      "create the constellation of five (default) staff lines."
753      '(StaffSymbol)
754      (list
755       )))
756
757
758    (cons
759     'Stanza_number_engraver
760     (engraver-description
761      "Stanza_number_engraver"
762      ""
763      '(StanzaNumber
764        )
765      (list
766       (translator-property-description 'stz string? "")
767       (translator-property-description 'stanza string? "Stanza `number' to print at start of a verse")
768       )))
769
770
771
772    (cons
773     'System_start_delimiter_engraver
774     (engraver-description
775      "System_start_delimiter_engraver"
776      "creates a SystemStartDelimiter spanner"
777      '(SystemStartDelimiter)
778      (list
779       )))
780
781
782    (cons
783     'Text_engraver
784     (engraver-description
785      "Text_engraver"
786      "Create text-scripts"
787      '(TextScript)
788      (list
789       (translator-property-description 'scriptHorizontal boolean? "    Put scripts left or right of note heads.  Support for this is
790     limited.  Accidentals will collide with scripts.
791     
792 ")
793       (translator-property-description 'textNonEmpty boolean? " If set
794 to true then text placed above or below the staff is not assumed to
795 have zero width.  @code{fatText} and @code{emptyText} are predefined
796 settings.
797 ")
798       )))
799
800
801    (cons
802     'Text_spanner_engraver
803     (engraver-description
804      "Text_spanner_engraver"
805      "Create text spanner from a  Span_req "
806      '(TextSpanner)
807      (list
808       )))
809
810
811    (cons
812     'Thread_devnull_engraver
813     (engraver-description
814      "Thread_devnull_engraver"
815      "Kill elements whenever we are Voice called `two' and
816 either unison, unisilence or soloADue is set"
817      '()
818      '()))
819
820
821    (cons
822     'Tie_engraver
823     (engraver-description
824      "Tie_engraver"
825      "Generate ties between noteheads of equal pitch."
826      '(Tie TieColumn)
827      (list
828       
829
830       (translator-property-description 'sparseTies boolean? "only create one tie per chord.")
831       (translator-property-description 'tieMelismaBusy boolean? "Signal ties when automaticMelismata is set")
832       )))
833
834
835    (cons
836     'Time_signature_engraver
837     (engraver-description
838      "Time_signature_engraver"
839      "Create a TimeSignature whenever @code{timeSignatureFraction} changes"
840      '(TimeSignature)
841      (list
842       )))
843
844
845    (cons
846     'Timing_engraver
847     (engraver-description
848      "Timing_engraver"
849      " Responsible for synchronizing timing information from staffs. 
850     Normally in @code{Score}.  In order to create polyrhythmic music,
851     this engraver should be removed from @code{Score} and placed in
852     @code{Staff}."
853      '()
854      (list
855       (translator-property-description 'timeSignatureFraction number-pair? "
856 pair of numbers,  signifying the time signature. For example #'(4 . 4) is a 4/4 time signature.")   
857       
858       (translator-property-description 'barNonAuto boolean? " If set to true then bar lines will not be printed
859     automatically; they must be explicitly created with @code{\bar}
860     keywords.  Unlike with the @code{\cadenza} keyword, measures are
861     still counted.  Bar generation will resume according to that
862     count if this property is set to zero.
863 ")
864       (translator-property-description 'whichBar string? "if not set
865 explicitly (by \property or \bar), this is set according to values of
866 defaultBarType, barAlways, barNonAuto and measurePosition.
867  ")
868       
869       (translator-property-description 'barAlways boolean? " If set to true a bar line is drawn after each note.
870 ")
871       (translator-property-description 'defaultBarType string? "Sets the default type of bar line. See Section XREF-barlines [FIXME] 
872     for a list of available bar types.
873 ")
874       (translator-property-description 'skipBars boolean? " Set to true to skip the empty bars that are produced by
875     multimeasure notes and rests.  These bars will not appear on the
876     printed output.  If not set (the default)  multimeasure
877     notes and rests expand into their full length, printing the appropriate
878     number of empty bars so that synchronization with other voices is
879     preserved.
880
881 @c my @vebatim patch would help...
882 @example
883 @@mudela[fragment,verbatim,center]
884 r1 r1*3 R1*3\property Score.skipBars=1 r1*3 R1*3
885
886 @@end mudela
887 @end example
888
889 ")
890       (translator-property-description 'timing boolean? " Keep administration of measure length, position, bar number, etc?
891 Switch off for cadenzas.")
892       (translator-property-description 'oneBeat moment? "  How long does one beat in the current time signature last?")
893       (translator-property-description 'measureLength moment? "  How long does one measure in the current time signature last?")
894       (translator-property-description 'measurePosition moment? "
895   How much of the current measure (measured in whole notes) have we had?
896 ")
897       (translator-property-description 'currentBarNumber integer? "Contains the current barnumber. This property is incremented at
898 every barline.
899 ")
900       )))
901
902
903    (cons
904     'Tuplet_engraver
905     (engraver-description
906      "Tuplet_engraver"
907      "Catch Time_scaled_music and generate appropriate bracket  "
908      '(
909        TupletBracket)
910      (list
911       (translator-property-description 'tupletSpannerDuration moment? "
912 Normally a tuplet bracket is as wide as the
913 @code{\times} expression that gave rise to it. By setting this
914 property, you can make brackets last shorter. Example
915
916 @example
917 @@mudela[verbatim,fragment]
918 \context Voice \times 2/3 @{
919   \property Voice.tupletSpannerDuration = #(make-moment 1 4)
920   [c8 c c] [c c c]
921 @}
922 @@end mudela
923 @end example
924 ")
925       (translator-property-description 'tupletInvisible boolean? "
926     If set to true, tuplet bracket creation is switched off
927 entirely. This has the same effect as setting both
928 @code{tupletNumberVisibility} and @code{tupletBracketVisibility} to
929 @code{#f}, but as this does not even create elements, this setting
930 uses less memory and time.")
931       )))
932
933
934    (cons
935     'Vertical_align_engraver
936     (engraver-description
937      "Vertical_align_engraver"
938      "Catch Vertical axis groups and stack them."
939      '(VerticalAlignment)
940      (list
941       )))
942
943
944    (cons
945     'Voice_devnull_engraver
946     (engraver-description
947      "Voice_devnull_engraver"
948      "Kill off certain items and spanners if we're Voice `two' and unison or unisilence is set."
949      '()
950      (list
951       )))
952    ))
953
954
955
956
957 (define context-description-alist
958   '(
959 (Grace . "
960     The context for handling grace notes.  It is instantiated
961     automatically when you use @code{\grace}.  Basically, it is an
962     `embedded' miniature of the Score context.  Since this context
963     needs special interaction with the rest of LilyPond, you should
964     not explicitly instantiate it.
965 ")
966 (LyricVoice . "
967     Corresponds to a voice with lyrics.  Handles the printing of a
968     single line of lyrics.
969 ")
970 (Thread . "
971     Handles note heads, and is contained in the Voice context.  You
972     have to instantiate this explicitly if you want to adjust the
973     style of individual note heads.
974 ")
975 (Voice . "
976     Corresponds to a voice on a staff.  This context handles the
977     conversion of dynamic signs, stems, beams, super- and subscripts,
978     slurs, ties, and rests.
979
980     You have to instantiate this explicitly if you want to have
981     multiple voices on the same staff.")
982
983 (ChordNamesVoice . "
984     A voice with chord names.  Handles printing of a line of chord
985     names.")
986
987 (ChordNames . "
988     Typesets chord names.  Can contain @code{ChordNamesVoice}
989     contexts.")
990
991 (Lyrics . "
992     Typesets lyrics.  It can contain @code{LyricVoice} contexts.
993 ")
994 (Staff . "
995     Handles clefs, bar lines, keys, accidentals.  It can contain
996     @code{Voice} contexts.
997 ")
998 (RhythmicStaff . "
999     A context like @code{Staff} but for printing rhythms.  Pitches are
1000     ignored; the notes are printed on one line.  It can contain
1001     @code{Voice} contexts.
1002 ")
1003 (GrandStaff . "
1004     Contains @code{Staff} or @code{RhythmicStaff} contexts.  It adds a
1005     brace on the left side, grouping the staffs together.  The bar
1006     lines of the contained staffs are connected vertically.  It can
1007     contain @code{Staff} contexts.")
1008
1009 (PianoStaff . "
1010     Just like @code{GrandStaff} but with @code{minVerticalAlign} set
1011     equal to @code{maxVerticalAlign} so that interstaff beaming and
1012     slurring can be used.")
1013
1014 (StaffGroup . "
1015     Contains @code{Staff} or @code{RhythmicStaff} contexts.  Adds a
1016     bracket on the left side, grouping the staffs together.  The bar
1017     lines of the contained staffs are connected vertically.  It can
1018     contain @code{Staff}, @code{RhythmicStaff}, @code{GrandStaff}, or
1019     @code{Lyrics} contexts.
1020 ")
1021 (ChoirStaff . "
1022     Identical to @code{StaffGroup} except that the contained staffs
1023     are not connected vertically.
1024 ")
1025 (Score . "
1026     This is the top level notation context.  No other context can
1027     contain a @code{Score} context.  This context handles the
1028     administration of time signatures.  It also makes sure that items
1029     such as clefs, time signatures, and key-signatures are aligned
1030     across staffs.  It can contain @code{Lyrics}, @code{Staff},
1031     @code{RhythmicStaff}, @code{GrandStaff}, @code{StaffGroup}, and
1032     @code{ChoirStaff} contexts.
1033
1034     You cannot explicitly instantiate a Score context (since it is
1035     not contained in any other context).  It is instantiated
1036     automatically when an output definition (a @code{\score} or
1037     @code{\paper} block) is processed.
1038 ")
1039 )
1040 )