\version "2.18.0"

arrUp = _\markup \translate #'(-.2 . 0) \rotate #90 "?"
arrDown = _\markup \translate #'(.8 . 8) \rotate #90 "?"

%{strokeDown = \markup { \postscript #"
  0.9     setlinewidth
  0.5 2   moveto
  0.5 0   lineto
  0.2 0.6 lineto
  0.5 0   moveto
  0.8 0.6 lineto
  stroke
"}
%}


  \new Voice \with {
    \consists "Pitch_squash_engraver"
  } {
    \relative c'' {
      \numericTimeSignature \time 3/4
      \improvisationOn
%      c4\strokeDown c8 c c c 
%      c4\arrDown c8 c c c
       c4-> c8-+ c c c
      c4 c8 c c c 
      c2 c4
      c1
      \bar "|."
    }
  }