Re: How to increase shift dynamic and end of hairpin

2020-01-14 Thread David Kastrup
Kieren MacMillan  writes:

> Hi David,
>
>> It's kind of embarrassing after that accolade that this particular
>> solution (the \after function) is probably the least brilliant and
>> involved of all.
>
> Sometimes, the most brilliant solutions are the most elegant ones. In
> particular, your \after function was the first time I ever saw the
> Bottom context directly addressed, and became aware of the power of
> doing so.

It's just something included in the definition to avoid things behaving
unexpectedly in some situations (like first thing in a StaffGroup or
so).  I don't think you'd see it outside of definitions.

>> We probably should include it in LilyPond
>
> I think that’s a great idea.

Noted.

-- 
David Kastrup



Re: How to increase shift dynamic and end of hairpin

2020-01-14 Thread Kieren MacMillan
Hi David,

> It's kind of embarrassing after that accolade that this particular
> solution (the \after function) is probably the least brilliant and
> involved of all.

Sometimes, the most brilliant solutions are the most elegant ones. In 
particular, your \after function was the first time I ever saw the Bottom 
context directly addressed, and became aware of the power of doing so.

> We probably should include it in LilyPond

I think that’s a great idea.

Thanks,
Kieren.


Kieren MacMillan, composer (he/him/his)
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info




Re: How to increase shift dynamic and end of hairpin

2020-01-14 Thread Xavier Scheuer
On Tue, 7 Jan 2020 at 23:23, Guy Stalnaker  wrote:
>
> Sorry, Knute -- Harm's suggestion is less work LOL

Hi,

Even less work would be to change Hairpin.minimum-length.

%% MWE
\version "2.19"
\language "english"

\layout {
  \context {
\Voice
\override Hairpin.minimum-length = #8
  }
}

\score {
  <<
\new Staff \with {
  \dynamicUp
} {
  c'2\< a2 c'2\mf\> f'2\p
  c'2\< a2 c'2\mf\> f'2\p
}
\new Staff \with {
  \dynamicUp
} {
  a2\< f2 a2\mf\> c'4( bf)\p
  a2\< f2 a2\mf\> c'4( bf)\p
}
\addlyrics {
  Al -- le -- lu -- ia
  Al -- le -- lu -- ia
}
  >>
}
%%

It works. Although it would be better if Hairpin #'minimum-length would
apply to REAL length of the hairpin.
https://sourceforge.net/p/testlilyissues/issues/2207/

Cheers,
Xavier

-- 
Xavier Scheuer 


Re: How to increase shift dynamic and end of hairpin

2020-01-14 Thread David Kastrup
Kieren MacMillan  writes:

> Hi Guy,
>
>> You sir are a gentleman and a scholar!
>
> Well, ½ of each means I’m a total of 1.  ;)
>
>> I didn't want to say anything, but each of the three previous
>> suggestions worked for the MWE, but when applied to my score either
>> either did not work at all, or only worked for some of the areas
>> that needed the extended hairpin decrescendo. This function,
>> however, worked perfectly in all the places I used it.
>
> All the credit belongs to the brilliant and always-helpful David Kastrup.

It's kind of embarrassing after that accolade that this particular
solution (the \after function) is probably the least brilliant and
involved of all.  We probably should include it in LilyPond before any
of the tweaks done to it in response to "this doesn't work, again"
reports gets lost.

-- 
David Kastrup



Re: How to increase shift dynamic and end of hairpin

2020-01-13 Thread Kieren MacMillan
Hi Guy,

> You sir are a gentleman and a scholar!

Well, ½ of each means I’m a total of 1.  ;)

> I didn't want to say anything, but each of the three previous suggestions 
> worked for the MWE, but when applied to my score either either did not work 
> at all, or only worked for some of the areas that needed the extended hairpin 
> decrescendo. This function, however, worked perfectly in all the places I 
> used it.

All the credit belongs to the brilliant and always-helpful David Kastrup.

Best,
Kieren.


Kieren MacMillan, composer (he/him/his)
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info




Re: How to increase shift dynamic and end of hairpin

2020-01-13 Thread Guy Stalnaker

Kieren,

You sir are a gentleman and a scholar!

I didn't want to say anything, but each of the three previous 
suggestions worked for the MWE, but when applied to my score either 
either did not work at all, or only worked for some of the areas that 
needed the extended hairpin decrescendo.


This function, however, worked perfectly in all the places I used it.

Much thanks.

Guy

On 1/13/2020 9:55 AM, Kieren MacMillan wrote:

\version "2.19.83"

\language "english"

after =
#(define-music-function (parser location t e m)
  (ly:duration? ly:music? ly:music?)
  #{
  \context Bottom <<
  #m
  { \skip $t <> -\tweak extra-spacing-width #empty-interval $e }
  >>
  #})

\score {
   <<
 \new Staff {
   c'2^\< a2 c'2^\mf^\> \after 4 \p f'2
   c'2^\< a2 c'2^\mf^\> \after 4 \p f'2
 }
 \new Staff {
   a2^\< f2 a2^\mf^\> c'4( bf) ^\p
   a2^\< f2 a2^\mf^\> c'4( bf)^\p
 }
 \addlyrics {
   Al -- le -- lu -- ia
   Al -- le -- lu -- ia
 }
   >>
}


--
“Happiness is the meaning and the purpose of life, the whole aim and end 
of human existence.”

― Aristotle



Re: How to increase shift dynamic and end of hairpin

2020-01-13 Thread Kieren MacMillan
Hi Guy,

> Sorry, Knute -- Harm's suggestion is less work LOL

Even less work is to have David K’s \after function in your toolbox:

\version "2.19.83"

\language "english"

after =
#(define-music-function (parser location t e m)
 (ly:duration? ly:music? ly:music?)
 #{
 \context Bottom <<
 #m
 { \skip $t <> -\tweak extra-spacing-width #empty-interval $e }
 >>
 #})

\score {
  <<
\new Staff {
  c'2^\< a2 c'2^\mf^\> \after 4 \p f'2
  c'2^\< a2 c'2^\mf^\> \after 4 \p f'2
}
\new Staff {
  a2^\< f2 a2^\mf^\> c'4( bf) ^\p
  a2^\< f2 a2^\mf^\> c'4( bf)^\p
}
\addlyrics {
  Al -- le -- lu -- ia
  Al -- le -- lu -- ia
}
  >>
}

Hope that helps!
Kieren.


Kieren MacMillan, composer (he/him/his)
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info




Re: How to increase shift dynamic and end of hairpin

2020-01-07 Thread Flaming Hakama by Elaine
-- Forwarded message --
> From: Guy Stalnaker 
> To: lilypond-user Mailinglist 
> Cc:
> Bcc:
> Date: Tue, 7 Jan 2020 14:53:00 -0600
> Subject: How to increase shift dynamic and end of hairpin
> Hello everyone,
>
> I've written a choral work. There are some places in the score where I
> have a four-voice choir singing Alleluia on successive half notes. I've
> notated a crescendo hairpin to \mf followed by a decrescendo hairpin to
> \p on the final half note. Some times LP engraves the score such that
> the decrescendo hairpin is clearly visible, but other times the spacing
> between the 3rd and 4th half notes is so minimal that that hairpin is,
> well, useless as a visual symbol.
>
> This MWE shows what I mean. The dynamics for the upper voice show the
> barely visible decrescendo hairpin while the one for the lower voice is
> what's desired.
>
> Ideally I simply (!) need to move/shift the upper voice \p and hairpin
> end one quarter note to the right. Yet how to do that?
>
> %% MWE
> \version "2.19"
> \language "english"
> \score {
><<
>  \new Staff {
>c'2^\< a2 c'2^\mf^\> f'2^\p
>c'2^\< a2 c'2^\mf^\> f'2^\p
>  }
>  \new Staff {
>a2^\< f2 a2^\mf^\> c'4( bf) ^\p
>a2^\< f2 a2^\mf^\> c'4( bf)^\p
>  }
>  \addlyrics {
>Al -- le -- lu -- ia
>Al -- le -- lu -- ia
>  }
>>>
> }
> %%
>
> --
> “Happiness is the meaning and the purpose of life, the whole aim and end
> of human existence.”
> ― Aristotle
>
>
This approach is even more succinct:
use scaling to make the half note look like a half, but actually only take
up a quarter note of space,
then add the dynamic on a spacer quarter note.

\version "2.19.83"
\include "english.ly"

\score {
<<
\new Staff {
c'2^\< a2 c'2^\mf^\> f'2*1/2 s4^\p
c'2^\< a2 c'2^\mf^\> f'2*1/2 s4^\p
}
\new Staff {
a2^\< f2 a2^\mf^\> c'4( bf)^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
}
\addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
}
>>
}


HTH,

Elaine Alt
415 . 341 .4954   "*Confusion is
highly underrated*"
ela...@flaminghakama.com
Producer ~ Composer ~ Instrumentalist ~ Educator
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


Re: How to increase shift dynamic and end of hairpin

2020-01-07 Thread Guy Stalnaker

Sorry, Knute -- Harm's suggestion is less work LOL

Thanks Harm!

On 1/7/2020 4:16 PM, Thomas Morley wrote:

Am Di., 7. Jan. 2020 um 22:44 Uhr schrieb Knute Snortum :


One way would be to use another voice for the dynamics:

%%%
\version "2.19"
\language "english"
\score {
<<
  \new Staff {
<< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
<< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
  }
  \new Staff {
a2^\< f2 a2^\mf^\> c'4( bf) ^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
  }
  \addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
  }
>>
}
%%%

---
Knute Snortum
(via Gmail)

On Tue, Jan 7, 2020 at 12:53 PM Guy Stalnaker  wrote:


Hello everyone,

I've written a choral work. There are some places in the score where I
have a four-voice choir singing Alleluia on successive half notes. I've
notated a crescendo hairpin to \mf followed by a decrescendo hairpin to
\p on the final half note. Some times LP engraves the score such that
the decrescendo hairpin is clearly visible, but other times the spacing
between the 3rd and 4th half notes is so minimal that that hairpin is,
well, useless as a visual symbol.

This MWE shows what I mean. The dynamics for the upper voice show the
barely visible decrescendo hairpin while the one for the lower voice is
what's desired.

Ideally I simply (!) need to move/shift the upper voice \p and hairpin
end one quarter note to the right. Yet how to do that?

%% MWE
\version "2.19"
\language "english"
\score {
<<
  \new Staff {
c'2^\< a2 c'2^\mf^\> f'2^\p
c'2^\< a2 c'2^\mf^\> f'2^\p
  }
  \new Staff {
a2^\< f2 a2^\mf^\> c'4( bf) ^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
  }
  \addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
  }
>>
}
%%


Or:

\language "english"

\score {
<<
  \new Staff {
c'2^\< a2 c'2^\mf^\> <>
c'2^\< a2 c'2^\mf^\> <>
  }
  \new Staff {
a2^\< f2 a2^\mf^\> c'4( bf) ^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
  }
  \addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
  }
>>
}

Cheers,
   Harm



--
“Happiness is the meaning and the purpose of life, the whole aim and end 
of human existence.”

― Aristotle



Re: How to increase shift dynamic and end of hairpin

2020-01-07 Thread Thomas Morley
Am Di., 7. Jan. 2020 um 22:44 Uhr schrieb Knute Snortum :
>
> One way would be to use another voice for the dynamics:
>
> %%%
> \version "2.19"
> \language "english"
> \score {
><<
>  \new Staff {
><< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
><< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
>  }
>  \new Staff {
>a2^\< f2 a2^\mf^\> c'4( bf) ^\p
>a2^\< f2 a2^\mf^\> c'4( bf)^\p
>  }
>  \addlyrics {
>Al -- le -- lu -- ia
>Al -- le -- lu -- ia
>  }
>>>
> }
> %%%
>
> ---
> Knute Snortum
> (via Gmail)
>
> On Tue, Jan 7, 2020 at 12:53 PM Guy Stalnaker  wrote:
> >
> > Hello everyone,
> >
> > I've written a choral work. There are some places in the score where I
> > have a four-voice choir singing Alleluia on successive half notes. I've
> > notated a crescendo hairpin to \mf followed by a decrescendo hairpin to
> > \p on the final half note. Some times LP engraves the score such that
> > the decrescendo hairpin is clearly visible, but other times the spacing
> > between the 3rd and 4th half notes is so minimal that that hairpin is,
> > well, useless as a visual symbol.
> >
> > This MWE shows what I mean. The dynamics for the upper voice show the
> > barely visible decrescendo hairpin while the one for the lower voice is
> > what's desired.
> >
> > Ideally I simply (!) need to move/shift the upper voice \p and hairpin
> > end one quarter note to the right. Yet how to do that?
> >
> > %% MWE
> > \version "2.19"
> > \language "english"
> > \score {
> ><<
> >  \new Staff {
> >c'2^\< a2 c'2^\mf^\> f'2^\p
> >c'2^\< a2 c'2^\mf^\> f'2^\p
> >  }
> >  \new Staff {
> >a2^\< f2 a2^\mf^\> c'4( bf) ^\p
> >a2^\< f2 a2^\mf^\> c'4( bf)^\p
> >  }
> >  \addlyrics {
> >Al -- le -- lu -- ia
> >Al -- le -- lu -- ia
> >  }
> >>>
> > }
> > %%

Or:

\language "english"

\score {
   <<
 \new Staff {
   c'2^\< a2 c'2^\mf^\> <>
   c'2^\< a2 c'2^\mf^\> <>
 }
 \new Staff {
   a2^\< f2 a2^\mf^\> c'4( bf) ^\p
   a2^\< f2 a2^\mf^\> c'4( bf)^\p
 }
 \addlyrics {
   Al -- le -- lu -- ia
   Al -- le -- lu -- ia
 }
   >>
}

Cheers,
  Harm



Re: How to increase shift dynamic and end of hairpin

2020-01-07 Thread Guy Stalnaker
Excellent Knute! Thanks. I can do that I think just for those measures 
that the measure compression is too small.


Regards.

On 1/7/2020 3:43 PM, Knute Snortum wrote:

One way would be to use another voice for the dynamics:

%%%
\version "2.19"
\language "english"
\score {
<<
  \new Staff {
<< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
<< { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
  }
  \new Staff {
a2^\< f2 a2^\mf^\> c'4( bf) ^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
  }
  \addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
  }
>>
}
%%%

---
Knute Snortum
(via Gmail)

On Tue, Jan 7, 2020 at 12:53 PM Guy Stalnaker  wrote:


Hello everyone,

I've written a choral work. There are some places in the score where I
have a four-voice choir singing Alleluia on successive half notes. I've
notated a crescendo hairpin to \mf followed by a decrescendo hairpin to
\p on the final half note. Some times LP engraves the score such that
the decrescendo hairpin is clearly visible, but other times the spacing
between the 3rd and 4th half notes is so minimal that that hairpin is,
well, useless as a visual symbol.

This MWE shows what I mean. The dynamics for the upper voice show the
barely visible decrescendo hairpin while the one for the lower voice is
what's desired.

Ideally I simply (!) need to move/shift the upper voice \p and hairpin
end one quarter note to the right. Yet how to do that?

%% MWE
\version "2.19"
\language "english"
\score {
<<
  \new Staff {
c'2^\< a2 c'2^\mf^\> f'2^\p
c'2^\< a2 c'2^\mf^\> f'2^\p
  }
  \new Staff {
a2^\< f2 a2^\mf^\> c'4( bf) ^\p
a2^\< f2 a2^\mf^\> c'4( bf)^\p
  }
  \addlyrics {
Al -- le -- lu -- ia
Al -- le -- lu -- ia
  }
>>
}
%%

--
“Happiness is the meaning and the purpose of life, the whole aim and end
of human existence.”
― Aristotle



--
“Happiness is the meaning and the purpose of life, the whole aim and end 
of human existence.”

― Aristotle



Re: How to increase shift dynamic and end of hairpin

2020-01-07 Thread Knute Snortum
One way would be to use another voice for the dynamics:

%%%
\version "2.19"
\language "english"
\score {
   <<
 \new Staff {
   << { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
   << { c'2 a2 c'2 f'2 } \\ { s2^\< s2 s2^\mf\> s4 s4^\p } >>
 }
 \new Staff {
   a2^\< f2 a2^\mf^\> c'4( bf) ^\p
   a2^\< f2 a2^\mf^\> c'4( bf)^\p
 }
 \addlyrics {
   Al -- le -- lu -- ia
   Al -- le -- lu -- ia
 }
   >>
}
%%%

---
Knute Snortum
(via Gmail)

On Tue, Jan 7, 2020 at 12:53 PM Guy Stalnaker  wrote:
>
> Hello everyone,
>
> I've written a choral work. There are some places in the score where I
> have a four-voice choir singing Alleluia on successive half notes. I've
> notated a crescendo hairpin to \mf followed by a decrescendo hairpin to
> \p on the final half note. Some times LP engraves the score such that
> the decrescendo hairpin is clearly visible, but other times the spacing
> between the 3rd and 4th half notes is so minimal that that hairpin is,
> well, useless as a visual symbol.
>
> This MWE shows what I mean. The dynamics for the upper voice show the
> barely visible decrescendo hairpin while the one for the lower voice is
> what's desired.
>
> Ideally I simply (!) need to move/shift the upper voice \p and hairpin
> end one quarter note to the right. Yet how to do that?
>
> %% MWE
> \version "2.19"
> \language "english"
> \score {
><<
>  \new Staff {
>c'2^\< a2 c'2^\mf^\> f'2^\p
>c'2^\< a2 c'2^\mf^\> f'2^\p
>  }
>  \new Staff {
>a2^\< f2 a2^\mf^\> c'4( bf) ^\p
>a2^\< f2 a2^\mf^\> c'4( bf)^\p
>  }
>  \addlyrics {
>Al -- le -- lu -- ia
>Al -- le -- lu -- ia
>  }
>>>
> }
> %%
>
> --
> “Happiness is the meaning and the purpose of life, the whole aim and end
> of human existence.”
> ― Aristotle
>