\version "2.18.2"

galoubet = \relative c'' {
  \override Staff.Beam.stencil = ##f
  \override Staff.Stem.stencil = ##f
  \override Staff.Flag.stencil = ##f
  %\override Staff.SpacingSpanner.uniform-stretching = ##t
  %\set Score.proportionalNotationDuration = #(ly:make-moment 1/64)
  \set Staff.whichBar = ".|:" g16-. 
  \unset Staff.whichBar a-. cis-. fis,-. bes-. f-. b-. g-. bes-. fis-. b-. a-. f-. cis'-. b-. fis-. a-. bes-. g-. f-. cis'-. g-. b-. bes-. fis-. cis'-. a-. f-. \once \set Staff.whichBar = ":..:" 
  c'-.-\markup \italic "simile" bes-. des-. d-. e-. b-. c-. b-. e-. cis-. d-. bes-. b-. d-. c-. es-. e-. cis-. bes-. \once \set Staff.whichBar = ":..:"
}

global = {
  \set Staff.markFormatter = #format-mark-box-letters
  \omit Staff.TimeSignature
  \tweak X-offset #3 \tempo Calme
  \time 7/4
  s1. s4 \bar "!" \break
  \time 19/16
  s1 s8. \bar "!" \break
  \time 9/8
  s4.*3
}

pianoMD = \relative c''{
}

pianoMG = \relative c'' {
  s2 s8 \once \set PianoStaff.whichBar = ".|:" 
  %\shape #'((0 . -2) (-1 . 2) (1.5 . 2.5) (0 . -2)) Slur
  fis32[ _(  b d \change Staff = "MD" \ottava #1 fis gis b e b gis fis \ottava #0 \change Staff = "MG" d b]) \once \set PianoStaff.whichBar = ":|."  s2. 
  \once \set PianoStaff.whichBar = ".|:" cis,32[(-\markup \italic "simile" g' b! \change Staff = "MD" e fis g bes g fis e \change Staff = "MG" b! g]) \once \set PianoStaff.whichBar = ":|." s8 s2 s8.
}

galoubettbPartMouvementJ = \new PianoStaff \with {
  fontSize = #-4
  \override StaffSymbol #'staff-space = #(magstep -4)
  \accidentalStyle neo-modern
}
<<
  \new Staff \with {
    \remove "Bar_number_engraver"
  }
  <<
    \galoubet
    \global
  >>
  \new Dynamics = "galoubetDYN" {
    %\galoubetDYN
  }  
>>

pianoPartMouvementJ = \new PianoStaff \with {
  %instrumentName = \markup { \override #'(font-name . "Sanford") "Piano" }
  extraNatural = ##f
  \accidentalStyle neo-modern
}
<<
  \set PianoStaff.connectArpeggios = ##t
  \new Staff = "MD" {
    <<
      \global
      \pianoMD
    >>
  }
  \new Dynamics = "pianoDYN" {
    %\pianoDYN
  }
  \new Staff = "MG" \with {
    \remove "Metronome_mark_engraver"
    \remove "Mark_engraver"
    \remove "Bar_number_engraver"
  }
  <<
    \global         
    \pianoMG
  >>
  \new Dynamics = "pianoPED" {
    %\pianoPED
  }      
>>

\score {
      <<    
        \keepWithTag solofullscore
        \removeWithTag pnofullscore
        \removeWithTag solopartsep
        \galoubettbPartMouvementJ
  
        \keepWithTag pnofullscore
        \removeWithTag solofullscore
        \removeWithTag solopartsep
        \pianoPartMouvementJ
      >> 
}