\paper {
%	line-width = 195 \mm
    indent = 0.0\mm
    ragged-right = ##f

% use low values to maximize systems per page
%	between-system-padding = 1\mm
%	between-system-space = 1\mm
    foot-separation = 5\mm
    page-top-space = 2\mm
	head-separation = 2\mm
%	top-margin = 4\mm
%	bottom-margin = 4\mm

	next-padding = 1.5\mm
%	before-title-space = 13\mm
	after-title-space = 2\mm

% for debugging spacing issues
%	annotate-spacing = ##t
}

\header {
	title = "Problem Demonstration"
	composer = "Extra Cruft"
	piece = "Moderato"
	copyright= "Copyright (c) 2007 by Ed Ravin"
	
}

\version "2.10.10"


introupper = \relative c' {
    \clef treble
    \key g \major
    \time 2/2
	<< { b'4 a g a } \\ { <c, e>1 } >> |
	<< { b'4 a g a } \\ { <c, ees>1 } >> |
	<b d g >1 ~ | <b d g>1 \bar "||"
}

introlower = \relative c' {
    \clef bass 
    \key g \major
    \time 2/2
	<a, e' g>1 | <a ees' g>1 | <g g'>2 <d d'>2 |
	#(set-octavation -1)
 	g,1
	#(set-octavation 0)
	\bar "||"
}

upper = \relative c'' {
	\clef treble
	\key g \major
	\time 2/2

% verse
	<<	{ d,8 e fis g fis e d e } \\ { b1 } >> |
    }


lower = \relative c' {
	\clef bass
	\key g \major
	\time 2/2

%verse
	<< { d,8 e fis g fis e d e } \\ { g,1 } >> |
	
    }



melody =  \relative c'' {
  \clef treble
  \key g \major 
   \time 2/2
	d,8\mf e fis g fis e d e |
}

text = \lyricmode {
  I could talk for ho -- urs gi -- ving pro and con,
}

\score {
	{
	
		\new PianoStaff = "introduction" <<
			#(set-accidental-style 'piano)
			\context Staff = "introupper" \introupper
			\context Staff = "introlower" \introlower
		>>
	\break

	<<
      \new Staff = "singer"
		<<
        	\new Voice = "vocal" {
				\autoBeamOff
				\melody
			}
      	>>
      \new Lyrics \lyricsto vocal \new Lyrics { \text }
      \new PianoStaff = "piano" <<
		#(set-accidental-style 'piano)
        \new Staff = "upper" { \upper }
        \new Staff = "lower" { \lower }
      >>
    >>
	}

	\layout {
    	\context { \RemoveEmptyStaffContext }
		\context {
       		\Score
       		\remove "Bar_number_engraver"
		}
	}

  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 105 4)
      }
    }

}