-\version "2.11.33"
+%% Do not edit this file; it is auto-generated from input/new
+\version "2.11.35"
+\header {
+ doctitle = "Transposing music with minimum accidentals"
+ lsrtags = "pitches"
+ texidoc = "There is a way to enforce enharmonic modifications for
+notes in order to have the minimum number of accidentals. In that
+case, ``Double accidentals should be removed, as well as E-sharp
+(-> F), bC (-> B), bF (-> E), B-sharp (-> C).'', as proposed by a
+request for a new feature. In this manner, the most natural
+enharmonic notes are chosen in this example. "
+}
+% begin verbatim
#(define (naturalise-pitch p)
(let* ((o (ly:pitch-octave p))
(a (* 4 (ly:pitch-alteration p)))
\version "2.11.33"
+\header {
+ doctitle = "Transposing music with minimum accidentals"
+ lsrtags = "pitches"
+ texidoc = "There is a way to enforce enharmonic modifications for
+notes in order to have the minimum number of accidentals. In that
+case, ``Double accidentals should be removed, as well as E-sharp
+(-> F), bC (-> B), bF (-> E), B-sharp (-> C).'', as proposed by a
+request for a new feature. In this manner, the most natural
+enharmonic notes are chosen in this example. "
+}
+
#(define (naturalise-pitch p)
(let* ((o (ly:pitch-octave p))
(a (* 4 (ly:pitch-alteration p)))