\version "2.10.0"
\include "english.ly"


verse = { \set stanza = "℣." } %V/
response = { \set stanza = "℟." }  %R/
join = { \set stanza = "❋" }  %*

noBar = {
  \once \override Staff.BarLine  #'stencil = ##f
}
divisioMinima = {
  \once \override Staff.BarLine  #'stencil = #ly:breathing-sign::divisio-minima
  \once \override Staff.BarLine  #'Y-offset = #2
}
divisioMaior = {
  \once \override Staff.BarLine  #'stencil = #ly:breathing-sign::divisio-maior
}
divisioMaxima = {
  \once \override Staff.BarLine  #'stencil = #ly:breathing-sign::divisio-maxima
}
finalis = {
  \once \override Staff.BarLine #'stencil = #ly:breathing-sign::finalis
}

phrase =
  #(define-music-function (parser location music) (ly:music?)
      (let* ((mus-len (ly:music-length music))
	     (dummy-notes #{ \notemode{ \relative c'' {c1} } #} ))
	(ly:music-compress dummy-notes mus-len)
       #{ 
             #(set-time-signature (ly:moment-main-numerator $mus-len)
				(ly:moment-main-denominator $mus-len))
		<< \context Voice = "phrases" {
		     \override NoteHead #'stencil = ##f
		     \override Stem #'stencil = ##f
		     $dummy-notes
		   }
		{ $music } >> #} ))

phraseLyrics = 
  #(define-music-function (parser location lyrics) (ly:music?)
     #{ \context Lyrics = "phraseLyrics" \lyricsto "phrases" \lyricmode {
           \override LyricText #'self-alignment-X = #-1
           $lyrics } #})

italPhraseLyrics = 
  #(define-music-function (parser location lyrics) (ly:music?)
     #{ \phraseLyrics \lyricmode {
      \override LyricText #'font-shape = #'italic
      \override LyricText #'font-size = #-0.5
           $lyrics } #})