% My Lady Carey's Dome - from Frisch's hand-written version
% set by A. Moneti ... with some effort to put it all on one page

\header {
    title = "My Lady Carey's Dompe (1525)"
    %composer= "Anonymous"
    footer = ""
    pagenumber = "no"
}

upperOne = \notes\relative c'' {
  \voiceOne
  \key d \minor \stemBoth 
  r4 g4 d'2                                           % 1
  \repeat volta 2 {  
      c4 bes a g f2 r4 g4                             % 2-5
      bes a g f g2 bes a g f2. g4 bes a g f           % 6-8
      g2 < bes d>  < a c > <g bes>  < f a >1          % 9-11
      r2 d'8 e f4 e8 f d4 c8 d bes4 a8 bes g4 f8 g e4 % 12-14
      f2 r4 d8 e   f g a b? c d e f                   % 15-16
      e4-\trill d-\trill c-\trill bes-\trill          % 17
      a-\trill g-\trill f-\trill e-\trill f2. g4      % 18-19
      bes a g f   g2 < bes d, > < a c, > < g e >      % 20-22
      f2 d8 e f g   a g f e g [ f g16 f e f ]         % 23-24
      g2 bes a4 g f e f2 g bes4 a g f                 % 25-28
%      g2 r4 g,8-1 a   bes c d c bes-3 c d-3 e         % 29-30 with fingering
      g2 r4 g,8 a   bes c d c bes c d e               % 29-30
      f e d e f g a bes  a g f e   g[ f g16 f e f]    % 31-32
      g8 f g a bes g a bes   a bes c d c bes a g      % 33-34
      f2. d8 e   f g a b? c d e f   e f e d e d c bes % 35-37
      a bes a g f g f e  f e d e  f g a bes           % 38-39
      a g f e g [f g16 f e f]  g8 f g a bes g a bes   % 40-41
      a bes g a f g e4 f2 d8 e f g                    % 42-43
      a g f e g [f g16 f e f]  g2 < d' g > ~          % 44-45
      < c g'> < bes g' > f' d8 e f g                % 46-47
      a g f e g [f g16 f e f] }                         % 48
  \alternative { { g2 d } { g1 } }                % 49-50
}

lowerOne = \notes\relative c {
  \voiceOne
  \key d \minor \stemBoth 
  r4 g' d g   r g d g  	r d' a d   r d a d	 % grp 1
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 2
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 3
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 4
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 5
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 6
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 7
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 8
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 9
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 10
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 11
  r4 g, d g   r g d g  	r d' a d   r d a d	 % grp 12
  r4 g, d g                          	         % grp 13
}

lowerTwo = \notes\relative c {
  \voiceTwo
  g1 g d' d   g, g d' d   g, g d' d   g, g d' d 
  g, g d' d   g, g d' d   g, g d' d   g, g d' d 
  g, g d' d   g, g d' d   g, g d' d   g, g d' d 
  g, < g d' g> 
}

\score {
  \context PianoStaff <<
      \time 4/4
      \context Staff = treble <<
	  \context Voice = one \upperOne
    >>  
    \context Staff = lower <<
	\clef bass
      \context Voice = one \lowerOne
      \context Voice = two \lowerTwo
    >>  
  >>
  \paper {
      papersize = "a4"
      linewidth = 18.5 \cm
      textheight = 27.0 \cm
      interscoreline = -0.2 \cm
      indent = 0.0 \cm
      \translator { \ScoreContext
	    SpacingSpanner \override #'spacing-increment = #0.6
	    SpacingSpanner \override #'shortest-duration-space = #1.3	
	}  
%  \midi { }  
	}
}