%%% test \partcombine
%%% but: deux éditions différentes pour une même musique
\version "2.11.43"
\include "english.ly"

#(set-global-staff-size 14)		% marche pas dans \paper
\paper
{
	ragged-right = ##t
	ragged-bottom = ##t
	ragged-last-bottom = ##t
	#(set-paper-size "a6")
}

IWords = \lyricmode	{	BI BA BI BE BO BE BU1.__	}

INotesDiscantus = \relative c'	{	g'4 a g f | e d c b | c1 || }

INotesCantus = \relative c'		{	e4 f e d | c b a gs | a1 || }

INotesFiller = \relative c'		{	c4 c c b | c g a e | a1 || }

INotesBassusOne = \relative c'	{	r4 r r r | R1 | r1 || }

IBars =		{	s4 s s s \bar "|" s s s s \bar "|" s1 \bar "||" }
IGlobal =	{	\key c \major }

INotesCantusDiscantus = \relative c'
{	<e g>4 <f a> <e g> <d f> | <c e> <b d> <a c> <gs b> | <a c>1 || }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\layout {}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% version 1 : SA/TB
\score
{
	\new ChoirStaff
	<<
		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align {"S. " "A. "} }
			\clef "G" \transpose c f \IGlobal
			{ s \mark "Version 1 (initiale)" }
			\IBars
			\new Voice = "one" { \voiceOne \transpose c f \INotesDiscantus }
			\new Voice { \voiceTwo \transpose c f \INotesCantus }
		>>

		\new Lyrics = thewords { s }

		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align {"T. " "B. "} }
			\clef "F" \transpose c f \IGlobal
			\new Voice { \voiceOne \transpose c f \INotesFiller }
			\new Voice { \voiceTwo \transpose c f \INotesBassusOne }
		>>
	\context Lyrics = thewords \lyricsto "one" { \IWords }
	>>
%	\layout {}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% version 2 : STA/B
%%% MAUVAIS ! les deux premières voix n'ont pas les hampes en haut
\score
{
	\new ChoirStaff
	<<
		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align {"S.T. "  "A. "} }
			\clef "G" \transpose c f \IGlobal
			{ s \mark "Version 2 : mauvais" }
			\IBars
			\new Voice = "one" { \partcombine
									\transpose c f \INotesDiscantus 
									\transpose c f \INotesCantus
			}
			\new Voice { \voiceTwo \transpose c f \INotesFiller  }
		>>

		\new Lyrics = thewords { s }

		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align { "B. "} }
			\clef "F" \transpose c f \IGlobal
			\new Voice { \transpose c f \INotesBassusOne }
		>>
	\context Lyrics = thewords \lyricsto "one" { \IWords }
	>>
%	\layout {}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% version 3 : STA/B
%%% Ce que je voudrais obtenir, mais en utilisant les même données (notes) que
%%% pour la version 1. Ici, la mise en page souhaitée est obtenue en redéfinissant
%%% les données.
\score
{
	\new ChoirStaff
	<<
		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align {"S.T. "  "A. "} }
			\clef "G" \transpose c f \IGlobal
			{ s \mark "Version 3 : ce que je veux" }
			\IBars
			\new Voice = "one" { \voiceOne \transpose c f \INotesCantusDiscantus }
			\new Voice { \voiceTwo \transpose c f \INotesFiller  }
		>>

		\new Lyrics = thewords { s }

		\new Staff
		<<
			\set Staff.instrumentName = \markup{ \center-align { "B. "} }
			\clef "F" \transpose c f \IGlobal
			\new Voice { \transpose c f \INotesBassusOne }
		>>
	\context Lyrics = thewords \lyricsto "one" { \IWords }
	>>
%	\layout {}
}