\version "2.26.0"

#(define-markup-command (jcRaise layout props jcText) (markup?)
   (interpret-markup layout props
     (markup #:raise 1.5 #:smaller #:smaller #:smaller jcText)))

#(define-markup-command (jcSmall layout props jcText) (markup?)
   (interpret-markup layout props
     (markup #:smaller #:smaller #:smaller jcText)))

jcMinor = \markup{ \jcSmall{ "MI" } }
jcMinorSeventh = \markup{ \jcMinor \jcRaise{ "7" } }
jcThirteenth = \markup{ \jcRaise{ "13" } }

jazzChordsMusic =
{
	<c ees g>-\markup{ \jcMinor }
	<c ees g bes>-\markup{ \jcMinorSeventh }
	<c e g bes d' a'>-\markup{ \jcThirteenth }
}

jazzChordsAdd = #(append
	 (sequential-music-to-chord-exceptions jazzChordsMusic #t)
	 ignatzekExceptions)

allOfMe = \chordmode {
  c1:6 c1:6 e1:7 e1:7

  a1:7 a1:7 d1:m7 d1:m7
  \break
  e1:7 e1:7 a1:m7 a1:m7

  d1:13 d1:13 d1:m7 g1:7

  \break

  c1:6 c1:6 e1:7 e1:7

  a1:7 a1:7 d1:m7 d1:m7
  \break
  f1:6 f1:m6 e1:m7 a1:9

  d1:m7 g1:13 c1:6 d2:m7 g2:7
}

\layout
{
  indent = 0
  ragged-right = ##t
  \context
  {
    \Score
    chordNameExceptions = #jazzChordsAdd
  }
}

\score {
  \new ChordNames \allOfMe
}

\score {
  \new ChordGrid \allOfMe
}
