Flared hairpin flare

[Andrew Bernard]

How can I obtain a sharper flare, closer to the left had end of the
hairpin, with longish hairpins, as below?

I have code to do very elaborate segmented hairpins with precisely
specified flares and so on, but I am hoping there is a simple way to
achieve this sort of adjustment.

Andrew

%====

\version "2.19.83"

flaredHairpin = {
  \once \override Hairpin.height = #1
  \once \override Hairpin.stencil = #flared-hairpin
}
{
  \flaredHairpin
  c''4^\> \repeat unfold 18 { c'' } c''\!
}

%====