]> git.donarmstrong.com Git - lilypond.git/blob - lily/simultaneous-music.cc
* lily/parser.yy (command_element): move clef stuff into Scheme.
[lilypond.git] / lily / simultaneous-music.cc
1
2 #include "moment.hh"
3 #include "pitch.hh"
4 #include "simultaneous-music-iterator.hh"
5 #include "music-list.hh"
6
7 Moment
8 Simultaneous_music::get_length () const
9 {
10   return Music_sequence::maximum_length (get_mus_property ("elements"));
11 }
12
13 Moment
14 Simultaneous_music::start_mom () const
15 {
16   return Music_sequence::minimum_start (get_mus_property ("elements"));
17 }
18
19 Simultaneous_music::Simultaneous_music()
20 {
21 }
22
23 Pitch
24 Simultaneous_music::to_relative_octave (Pitch p)
25 {
26   return do_relative_octave (p, true);
27 }
28 ADD_MUSIC (Simultaneous_music);