\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 14.0)
#(ly:set-option 'point-and-click #f)
%nomobile

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
mtempo={\tempo 4 = 70 }
pfermata=\markup{"(" \musicglyph #"scripts.ufermata" ")"}
showMultiRests = { \set Staff.keepAliveInterfaces = #'( rhythmic-grob-interface multi-measure-rest-interface lyric-interface stanza-number-interface percent-repeat-interface) }
hideMultiRests = \unset Staff.keepAliveInterfaces
noados=\once \set Staff.aDueText = #""


htitle="BWV 147 - Wohl mir, daß ich Jesum habe"
hcomposer="Bach"

\header {
	title=\markup{\fontsize #3 "6. Wohl mir, daß ich Jesum habe"}
	subtitle="Cantata BWV 147"
        subsubtitle=\markup{\smaller \raise #.5 "Herz und Mund und Tat und Leben" \vspace #1 }
        composer="Johann Sebastian Bach (1685-1750)"
        pdfauthor=\composer
       %opus="(-)"
	%poet=\markup{"BWV 147"}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

%\markup{\score{{\voiceOne \stopStaff \small b'8. b'16 s2^\markup{"="} \tupletUp \times 2/3{b'4 b'8}} \layout{\context {\Score \override TimeSignature.stencil = ##f \override Clef.stencil = ##f  }} }}


global =  {\key g \major \skip 4*3*71 \bar "|."
\mark \markup{\smaller \musicglyph #"scripts.ufermata" }
}

cantus = {
	\set Score.skipBars = ##t
	R2.*8  |
	b'2 c''4 |
	d''2 d''4 |
	c''2 b'4 |
%5
	a' a' r |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	a'8( b'16 c'') b'4( a') |
%10
	g'2 r4 |
	R2.*6 |
	b'2 c''4 |
	d''2 d''4 |
	c''2 b'4 |
%15
	a' a' r |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	a'8( b'16 c'') b'4( a') |
%20
	g'2 r4 |
	R2.*7 |
	a'2 b'4 |
	c''2 c''4 |
	b'4.( c''16 d'') b'4 |
%25
	a' a' r |
	R2.*2 |
	c''2 d''4 |
	e''2 e''4 |
	d''4.( e''16 f'') d''4 |
%30
	c'' c'' r |
	R2.*2 |
	b'2 c''4 |
	d''2 d''4 |
	c'' b'2^\trill |
%35
	a' r4 |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	a'8( b'16 c'') a'2^\trill |
%40
	g'2. |
	R2.*11

}



altus = {
	R2.*8|
	g'2 g'4 |
	a'( g') fis' |
	g' d'2 |
%5
	d'4 d' r |
	R2. |
	g'2 g'4 |
	g'( d') e' |
	e' fis'8( e' fis'4) |
%10
	d'2 r4 |
	R2.*6|
	g'2 g'4 |
	a'( g') fis' |
	g' d'2 |
%15
	d'4 d' r |
	R2. |
	g'2 g'4 |
	g'( d') e' |
	e' fis'8( e' fis'4) |
%20
	d'2 r4 |
	R2.*7 |
	fis'2 gis'4 |
	a'2 a'4 |
	a'2 gis'4 |
%25
	a' a' r |
	R2.*2 |
	a'2 g'4 |
	g'( c'') g' |
	f'( a') g' |
%30
	g' g' r |
	R2.*2 |
	g'2 g'4 |
	g'2 g'4 |
	g'8 fis' g'2 |
%35
	fis' r4 |
	R2. |
	g'2 g'4 |
	g'( d') e' |
	e' fis'8( e' fis'4) |
%40
	d'2. |
	R2.*11
}



tenor = {
	R2.*8 |
	d'2 e'4 |
	a2 b4 |
	b( a) g |
%5
	fis a r |
	R2. |
	d'2 e'4 |
	d'( b) b |
	 c'8[ a]  d'[( b] c'4) |
%10
	b2 r4 |
	R2.*6 |
	d'2 e'4 |
	a2 b4 |
	b( a) g |
%15
	fis a r |
	R2. |
	d'2 e'4 |
	d'( b) b |
	 c'8[ a]  d'[( b] c'4) |
%20
	b2 r4 |
	R2.*7|
	d'2 d'4 |
	e'2 f'4 |
	f'( d') e' |
%25
	c' c' r |
	R2.*2 |
	e'2 d'4 |
	c'2 c'4 |
	a2 b4 |
%30
	e' e' r |
	R2.*2 |
	d'2 e'4 |
	d'( b) b |
	c'( d') e' |
%35
	a2 r4 |
	R2. |
	d'2 e'4 |
	d'( b) b |
	 c'8[ a]  d'[( b] c'4) |
%40
	b2. |
	R2.*11
}



bassus =  {
	R2.*8 |
	g4( fis) e |
	fis( e) d |
	e( fis) g |
%5
	d d r |
	R2. |
	g4( fis) e |
	b( b,) e |
	c( d) d |
%10
	g,2 r4 |
	R2.*6 |
	g4( fis) e |
	fis( e) d |
	e( fis) g |
%15
	d d r |
	R2. |
	g4( fis) e |
	b( b,) e |
	c( d) d |
%20
	g,2 r4 |
	R2.*7 |
	d4( c) b, |
	a,( a8[ g]) f[ e] |
	d4( b,) e |
%25
	a, a, r |
	R2.*2 |
	a2 b4 |
	c'( a) e |
	f( d) g |
%30
	c c r |
	R2.*2 |
	g2 e4 |
	b( e') e |
	a,( b,) c |
%35
	d2 r4 |
	R2. |
	g4( fis) e |
	b( b,) e |
	c d2 |
%40
	g,2. |
	R2.*11
}


textocantus=\lyricmode {
Wohl mir daß ich Je -- sum ha -- be
o wie fe -- ste halt' ich __ ihn
daß er mir mein Her -- ze la -- be
wenn ich krank und trau -- rig __ bin.
Je -- sum hab' ich der __ mich lie -- bet
und sich mir zu ei -- gen gi -- bet;
ach drum laß' ich Je -- sum nicht
wenn mir gleich mein Her -- ze bricht.
}


textoaltus=\lyricmode {
Wohl mir daß __ ich Je -- sum ha -- be
o wie fe -- ste halt' ich __ ihn
daß er mir __ mein Her -- ze la -- be
wenn ich krank __ und trau -- rig __ bin.
Je -- sum hab' ich der mich lie -- bet
und sich mir __ zu ei -- gen gi -- bet;
ach drum laß' ich Je -- _ sum nicht
wenn mir gleich __ mein Her -- ze __ bricht.
}


textotenor=\lyricmode {
Wohl mir daß ich Je -- sum ha -- be
o wie fe -- ste halt' _ ich __ ihn
daß er mir mein Her -- ze la -- be
wenn ich krank __ und trau -- _ rig __ bin.
Je -- sum hab' ich der __ mich lie -- bet
und sich mir zu ei -- gen gi -- bet;
ach drum laß' __ ich Je -- sum nicht
wenn mir gleich __ mein Her -- _ ze __ bricht.
}


textobassus=\lyricmode { 
Wohl __ mir daß __ ich Je -- sum ha -- be
o __ wie fe -- ste halt' __ ich ihn
daß __ er mir __ mein Her -- ze la -- be
wenn __ ich krank __ und trau -- rig bin.
Je -- sum hab' __ ich _ der __ mich lie -- bet
und sich mir __ zu ei -- gen gi -- bet;
ach drum laß' __ ich Je -- sum nicht
wenn __ mir gleich __ mein Her -- ze bricht.
}


tromba = {
	R2.*8  |
	b'2 c''4 |
	d''2 d''4 |
	c''2 b'4 |
%5
	a' a' r |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	a'8( b'16 c'') b'4 a'^\trill |
%10
	g'2 r4 |
	R2.*6 |
	b'2 c''4 |
	d''2 d''4 |
	c''2 b'4 |
%15
	a' a' r |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	a'8( b'16 c'') b'4 a'^\trill |
%20
	g'2 r4 |
	R2.*7 |
	a'2 b'4 |
	c''2 c''4 |
	b'4.( c''16 d'') b'4 |
%25
	a' a' r |
	R2.*2 |
	c''2 d''4 |
	e''2 e''4 |
	d''4.( e''16 f'') d''4 |
%30
	c'' c'' r |
	R2.*2 |
	b'2 c''4 |
	d''2 d''4 |
	c'' b'2^\trill |
%35
	a' r4 |
	R2. |
	b'2 c''4 |
	d''2 b'4 |
	\slurDashed
	a'8( b'16 c'') a'2^\trill |
%40
	g'2. |
	R2.*11

}

violinuno = \relative c'' {
  r8*2/3 g a b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  c( d e) d( c b) a( b g)
  fis( g a) d,( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g b d g d b g b d
  g4 r r
  R1*3/4*2
  r8*2/3 d, e fis a g a c b
  c a fis d fis a c b a
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g( b a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  c( d e) d( c b) a( b g)
  fis( g a) d,( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g4 r r % sol pequeño
  R1*3/4*2
  r8*2/3 d e fis a g a c b
  c a fis d fis a c b a
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g( b a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  c( d e) d( c b) a( b g)
  fis( g a) d,( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g( b d) g( d b) g( b cis)
  d( d, e) fis( a gis) gis( b a)
  a( c b) c( a e) c( d e)
  f( d' c) d( b gis) e( fis gis!)
  a( c b) c( e d) d( f e)
  e( a gis) a( e c) a( b c)
  f( e d) c( b a) e( a gis)
  a c e a r r r4.*2/3
  r8*2/3 c, d e( g f) g( bes a)
  a( c b!) c( a f) d( e f)
  e( g f) g( e c) g( a bes)
  a( c b!) c( a f) d( e f!)
  e( c d) e( g fis!) g( b a)
  b( g a) b( d c) c( e d) 
  d( g fis) g( d b) g( a b)
  c( d e) d( c b) a( b g)
  fis( d e) fis( a g) a( c b)
  c( a fis) d( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g( b d) g( d b) g( b d)
  f( d b) g( b d) e( c a)
  fis!( a c) d( b g) e( g b)
  c( a fis) d( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  c( d e) d( c b) a( b g)
  fis( g a) d,( fis a) c( b a)
  b( g a) b( d c) c( e d)
  d( g fis) g( d b) g( a b)
  e,( d' c) b( a g) d( g fis)
  g2.
}

violindos=\relative c''{
  r4 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. d16
  e8. fis16 g8. d16 e8. b16
  a8. d16 a'8. g16 a8. fis16
  d8. fis16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. g16 
  a8. fis16 g8. e16 a,8. c16
  b8. g'16 b8. d16 g8. d16
  b4 r r
  R1*3/4*2
  r4 d,8. e16 fis8. g16
  a8. c16 a8. fis16 d8. fis16
  g8. d16 g8. fis16 g8. a16
  b8. a16 g8. fis16 e8. g16
  a8. g16 fis8. g16 a8. c,16
  b8. d16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. d16
  e8. fis16 g8. d16 e8. b16
  a8. d16 a'8. g16 a8. fis16
  d8. fis16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. g16
  a8. fis16 g8. e16 a,8. c16
  b4 r r % nota pequeña
  R1*3/4*2
  r4 d8. e16 fis8. g16
  a8. c16 a8. fis16 d8. fis16
  g8. d16 g8. fis16 g8. a16
  b8. a16 g8. fis16 e8. g16
  a8. g16 fis8. g16 a8. c,16
  b8. d16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. d16
  e8. fis16 g8. d16 e8. b16
  a8. d16 a'8. g16 a8. fis16
  d8. fis16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. g16
  a8. fis16 g8. e16 a,8. c16
  b8. g'16 b8. d16 g8. g,16
  a8. g16 a8. d16 d,8. c16
  c8. d16 e8. c16 a8. c16
  d8. e16 f8. d16 b8. d16
  c8. e16 a8. gis16 a8. b16
  c8. b16 c8. a16 f8. a16
  a8. gis16 a8. fis!16 b,8. d16
  c4 r r
  r c'8. d16 e8. c16
  f,8. g16 a8. d16 b8. d16
  c8. g16 c8. g16 e8. d16
  c8. e16 f8. a16 b8. d16
  c8. g16 c8. a16 d8. fis,!16
  g8. d16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. d16
  e8. fis16 g8. d16 e8. b16
  a8. cis16 d8. e16 fis8. g16
  a8. c16 a8. fis16 d8. fis16
  g8. d16 g8. fis16 g8. a16
  b8. a16 g8. fis16 e8. g16
  a8. g16 fis8. g16 a8. c,16
  b8. g'16 b8. d16 g8. d16
  b8. g16 d'8. b16 c4 ~
  c8. a16 b4 ~ b8. g16
  a4 ~ a8. fis16 d8. fis16
  g8. d16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. d16
  e8. fis16 g8. d16 e8. b16
  a8. d16 a'8. g16 a8. fis16
  d8. fis16 g8. fis16 g8. a16
  b8. a16 b8. g16 e8. g16
  a8. fis16 g8. e16 a,8. c16
  b2.
}

viola=\relative c'{
  r4 d e
  g e b
  a d c ~
  c a fis'
  g g, e'
  g e b
  c e d
  d r8 r16 d b8. g'16
  d4 r r
  R1*3/4*2
  r4 a8. a16 d8. d16
  fis8. a16 fis8. d16 a8. d16
  d4 d e
  g d b
  c8 a d b c a
  b4 d e
  g4 e b
  a d c ~
  c a fis'
  g g, e'
  g e b
  c e d
  d4 r r
  R1*3/4*2
  r4 a8. a16 d8. d16
  fis8. a16 fis8. d16 a8. d16
  d4 d e
  g d b
  c8 a d b c a
  b4 d e
  g e b
  a d c ~
  c a fis'
  g g, e'
  g e b
  c e d
  d r8 r16 g d8. e16
  fis4 d d
  e a, a' ~
  a a gis
  e a, f'
  a f c
  d fis! e
  e r r
  r a g
  d f g
  g e g
  f a g
  g r8 r16 d d8. d16
  d4 d e
  g e b
  a d c ~
  c a8. a16 d8. d16
  fis8. a16 fis8. d16 a8. d16
  d4 d e
  g d b
  c8( a) d( b) c( a)
  b4 r8 r16 g' d8. g16
  d4 r8 r16 g e8. c16
  a4 r8 r16 d b8. e16
  e,8. a16 fis8. a'16 fis8. d16
  d4 d e
  g4 e b
  a d c ~
  c a fis'
  g g, e'
  g e b
  c e d
  d2.
}

cello=\relative c{
  g4 g' e b e e,
  a b c
  d fis d 
  g e c
  b e d
  c cis d
  g, r8 r16 g' d8. b16
  g4 fis' e
  fis e d
  e fis g
  d4 r8 r16 d d8. d16
  d,4 r8 r16 d' d8. d16
  g4 fis e
  b' b, e
  c d d,
  g g' e
  b e e,
  a b c
  d fis d
  g e c
  b e d
  c cis d
  g, fis' e
  fis e d
  e fis g
  d r8 r16 d d8. d16
  d,4 r8 r16 d' d8. d16
  g4 fis e
  b' b, e
  c d d,
  g g' e
  b e e,
  a b c
  d fis d
  g e c
  b e d
  c cis d
  g, r8 r16 g' fis8. e16
  d4 c b
  a a'8 g f e
  d4 b e
  a, f' d
  c f e
  d dis e
  a, a' b
  c a e
  f d g
  c, e c
  f d g
  c, r8 r16 c b8. d16
  g,4 g' e
  b e e,
  a4 b c
  d4 r8 r16 d d8. d16
  d,4 r8 r16 d' d8. d16
  g4 fis e
  b' b, e 
  c d d,
  g2. ~
  g ~
  g ~
  g ~
  g4 g' e
  b e e,
  a b c
  d fis d
  g e c
  b e d
  c cis d
  g,2.
}

cifrado=\figuremode{
s1*3/4*13
s2 <6>4
s1*3/4*14
s2 <6>4
s1*3/4*14
s2 <6 4 2!>4
s1*3/4
s2 <6>4
s1*3/4
<6 5>4 s s
s1*3/4*3
s2 <6>4
s1*3/4*19
}
guia=\relative c''{
  \set autoBeaming = ##t

}




\score {\transpose c' c'{
<<

\new StaffGroup << 
  \set StaffGroup.systemStartDelimiterHierarchy
    = #'(SystemStartBracket a (SystemStartBrace c d ))

  
       \new Staff  \with{ 
      \remove Ambitus_engraver
      fontSize = #-1
      \override StaffSymbol #'staff-space = #(magstep -1)
      }<<\global
	\new Voice="f2" {
	        \time 3/4
		\set Staff.instrumentName=\markup{"Tromba"}
		\clef "treble"
		\tromba }
	>> 
  
        \new Staff <<\global
	\new Voice="vi1" {
		\time 9/8
		\set Staff.timeSignatureFraction=9/8
                \set Staff.instrumentName=\markup{\center-column{"Violino I" \smaller \raise #.8 "Oboi"}}
		\clef "treble"
		\violinuno }
	>> 
	\new Staff <<\global
	\new Voice="vi2" {
		\time 3/4
		\set Staff.instrumentName=\markup{"Violino II"}
		\clef "treble"
		\violindos }
	>>     
    
        \new Staff <<\global
	\new Voice="vi3" {
		\time 3/4
		\set Staff.instrumentName=\markup{"Viola"}
		\clef "alto"
		\viola }
	>> 
>>

\new ChoirStaff<<

        \new Staff <<\global
        \new Voice="v1" {
                \time 3/4
		\set Staff.instrumentName="Soprano"
                \set Staff.shortInstrumentName="S"
                \clef "treble"
                \cantus }
        \new Lyrics \lyricsto "v1" {\textocantus }
        >>

        \new Staff <<\global
        \new Voice="v2" {
                \time 3/4
		\set Staff.instrumentName="Alto"
                \set Staff.shortInstrumentName="A"
                \clef "treble"
                \altus }
        \new Lyrics \lyricsto "v2" {\textoaltus }
        >>
        
        \new Staff <<\global
        \new Voice="v3" {
                \time 3/4
		\set Staff.instrumentName="Tenore"
                \set Staff.shortInstrumentName="T"
                \clef "G_8"
                \tenor }
        \new Lyrics \lyricsto "v3" {\textotenor }
        >>

        \new Staff <<\global
        \new Voice="v4" {
                \time 3/4
		\set Staff.instrumentName="Basso"
                \set Staff.shortInstrumentName="B"
                \clef "bass"
                \bassus }
        \new Lyrics \lyricsto "v4" {\textobassus }
        >>        
>>
        \new Staff <<\global
	\new Voice="cont" {
		\time 3/4
		\set Staff.instrumentName=\markup{\smaller "Continuo "}
		\clef "bass"
		\cello }
	\new FiguredBass {\cifrado }
	>> 

%{
	\new Staff \with{ 
      \remove Ambitus_engraver
      fontSize = #-3
      \override StaffSymbol #'staff-space = #(magstep -4)
      }<<\global
	\new Voice="v6" {
		\time 3/4
		\clef "treble"
		\guia }
	>>
%}

>>

	} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.2
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		%autoBeaming = ##f
	}

        \context {\ChoirStaff 
                  \override StaffGrouper.staffgroup-staff-spacing =
                        #'((basic-distance . 15) (minimum-distance . 0) (padding . 1))
                  \override StaffGrouper.staff-staff-spacing =
                        #'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
        }

        \context {\StaffGroup
                  \override StaffGrouper.staffgroup-staff-spacing =
                        #'((basic-distance . 15) (minimum-distance . 0) (padding . 1))
                  \override StaffGrouper.staff-staff-spacing =
                        #'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
        }

	\context {\Staff 
                \RemoveEmptyStaves %notablet
                %\override VerticalAxisGroup.remove-first = ##t
%		\override VerticalAxisGroup.staff-staff-spacing =
%			#'((basic-distance . 10) (minimum-distance . 0) (padding . 1))
		%\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=20
	%page-count = 16
	ragged-last-bottom = ##f
	indent=1.5\cm
	system-system-spacing =
	#'((basic-distance . 22) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 12) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 15) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}