SCM oct = n->get_property ("octavation");
if (scm_is_number (oct))
{
- Pitch orig = unsmob_pitch (p)->transposed (Pitch (-scm_to_int (oct), 0, 0));
+ Pitch orig = unsmob_pitch (p)->transposed (Pitch (-scm_to_int (oct), 0));
pitches = scm_cons (orig.smobbed_copy (), pitches);
}
else
}
Audio_note *p = new Audio_note (*pit, len,
- tie_event, Pitch (0, 0, 0), velocity);
+ tie_event, Pitch (0, 0), velocity);
Audio_element_info info (p, n);
announce_element (info);
}
context ()->set_property ("keyAlterations", SCM_EOL);
context ()->set_property ("lastKeyAlterations", SCM_EOL);
- Pitch p (0, 0, 0);
+ Pitch p;
context ()->set_property ("tonic", p.smobbed_copy ());
}
scm_to_int (scm_caar (pitchlist)),
ly_scm2rational (scm_cdar (pitchlist)));
- Pitch c_do (0, 0, 0);
+ Pitch c_do;
SCM c_pitchlist
= ly_transpose_key_alist (pitchlist,
if (scm_is_vector (shape_vector))
{
SCM scm_tonic = get_property ("tonic");
- Pitch tonic (0, 0, 0);
+ Pitch tonic;
if (unsmob_pitch (scm_tonic))
tonic = *unsmob_pitch (scm_tonic);
if (!scm_is_eq (SCM_INUM0, $2))
{
Pitch p = *unsmob_pitch ($1);
- p = p.transposed (Pitch (scm_to_int ($2),0,0));
+ p = p.transposed (Pitch (scm_to_int ($2), 0));
$$ = p.smobbed_copy ();
}
}
if (!scm_is_eq (SCM_INUM0, $2))
{
Pitch p = *unsmob_pitch ($1);
- p = p.transposed (Pitch (scm_to_int ($2),0,0));
+ p = p.transposed (Pitch (scm_to_int ($2), 0));
$$ = p.smobbed_copy ();
}
}
if (!scm_is_eq (SCM_INUM0, $2))
{
Pitch p = *unsmob_pitch ($1);
- p = p.transposed (Pitch (scm_to_int ($2),0,0));
+ p = p.transposed (Pitch (scm_to_int ($2), 0));
$$ = p.smobbed_copy ();
}
}
Pitch_interval::Pitch_interval ()
{
- at (LEFT) = Pitch (100, 0, 0);
- at (RIGHT) = Pitch (-100, 0, 0);
+ at (LEFT) = Pitch (100, 0);
+ at (RIGHT) = Pitch (-100, 0);
}
bool
Pitch_lexicographic_interval::Pitch_lexicographic_interval ()
{
- at (LEFT) = Pitch (100, 0, 0);
- at (RIGHT) = Pitch (-100, 0, 0);
+ at (LEFT) = Pitch (100, 0);
+ at (RIGHT) = Pitch (-100, 0);
}
bool