\include "header"
\paper{paper-height=7\cm
}

TrackAVoiceAMusic = #(define-music-function (parser location inTab) (boolean?)
#{
   \clef #(if $inTab "tab" "treble_8")
   \key c \major
   \time 3/4
   \oneVoice
   \times 2/3 {<e''\1>16 <b'\2>16 <g'\3>16 <e''\1>16 <b'\2>16 <g'\3>16 <e''\1>16 <b'\2>16 <g'\3>16 <e''\1>16 <b'\2>16 <g'\3>16 <e''\1>16 <b'\2>16 <g'\3>16 <e''\1>16 <b'\2>16 <g'\3>16 } 
   \times 2/3 {<d''\1>16 <b'\2>16 <fis'\3>16 <d''\1>16 <b'\2>16 <fis'\3>16 <d''\1>16 <b'\2>16 <fis'\3>16 <d''\1>16 <b'\2>16 <fis'\3>16 <d''\1>16 <b'\2>16 <fis'\3>16 <d''\1>16 <b'\2>16 <fis'\3>16 } 
   \times 2/3 {<c''\1>16 <a'\2>16 <e'\3>16 <c''\1>16 <a'\2>16 <e'\3>16 <c''\1>16 <a'\2>16 <e'\3>16 <c''\1>16 <a'\2>16 <e'\3>16 <c''\1>16 <a'\2>16 <e'\3>16 <c''\1>16 <a'\2>16 <e'\3>16 }  
   \times 2/3 {<b'\1>16 <fis'\2>16 <d'\3>16 <b'\1>16 <fis'\2>16 <d'\3>16 <b'\1>16 <fis'\2>16 <d'\3>16 <b'\1>16 <fis'\2>16 <d'\3>16 <b'\1 fis'\2 d'\3 >8 <c''\1 a'\2 e'\3 >8 <d''\1 b'\2 fis'\3 >8 }  \bar "|."
#})

TrackATabStaff = \new TabStaff \with { stringTunings = #'( 9 4 0 -5 ) } <<
   \context TabVoice = "TrackAVoiceAMusic" {
      \removeWithTag #'chords
      \removeWithTag #'texts
      \TrackAVoiceAMusic ##t
   }
>>

\score {
   \TrackATabStaff
}