% Generated automatically by: lilypond-book.py
% options are filename=/home/hanwen/usr/src/savannah/lily/lilypond-1.6/input/test/ac-extra-voice.ly printfilename
\include "paper16.ly"
\paper  {
  linewidth = 433.619940\pt
  
  
}
\version "1.5.68"
%
% TODO: what's this?
%


global =  \notes {
	\key a \minor
	\time 6/4
%	\skip 1.*34
%	\bar ".|"
}

melody =  \notes\relative c''{
	r2 r r 
	r2 r r
	r4 a'8-- \< a--	a-- a-- c-- \!b-- a--\> gis f \!e 
	es8 \grace b c r4 r2 r
}

basloopje =  \notes\relative c{
	d,8(	a' d f a d f d a f d	)a
}

accompany =  \notes \relative c{
	\notes\relative c \basloopje
	\notes\relative c \basloopje
	\notes\relative c \basloopje
	\notes\relative c \basloopje
}

\score{
	\notes \context PianoStaff <
		\context Staff=up < 
			\global
			\context Voice=foo {
			\stemUp\slurUp\tieUp
			\scriptUp
			\melody 
			}
		>
		\context Staff=down <
			\global
			\clef bass
			\autochange Staff \context Voice \accompany
		>
	>

	\paper {
		indent = 8.\mm
		textheight = 295.\mm

		\translator{ 
			\PianoStaffContext
			defaultBarType = #"" 
		}
		\translator{ 
			\StaffContext
			% don't auto-generate bars: not a good idea: -> no breakpoints
			% barAuto = "0"
			% urg defaultBarType = #""
			defaultBarType = #"" 
			\remove "Time_signature_engraver"

			Slur \override #'direction = #1

			
			autoBeamSettings \override #'(end * * * *)  = #(make-moment 1 2)
		}
	}
	\midi {
		\tempo 4 = 54
	}
}