Hi,

for study purpose only, you will find attached to this post the score script of this Prelude for Piano.

 

SB.

PreludeForNicolai.opmo

Pianists will love it 

Again as always, I learned a lot from this. Thank you so much for sharing.

 

Big hug,

 

Wim

Stephane,

 

I've been experimenting and analysing this marvellous prelude. I'm very curious if you could tell a bit more about the composing decisions behind the following material:

• how did you choose the transpositions: 
  ;; +6 -6 +4 +4 -9 +9 -6 -6 +5 +4 -6 +1 -1 -1 0 5 0 +5 -2

  (setf trsp2 '(-2 4 -2 2 8 -1 8 3 -3 2 6 0 1 0 -1 -1 4 4 9 7))

   

• Where do these wonderful voicings of Dim chords with an added major fourth come from? Did you use an algorithm to generate them? Hand written? What's the idea behind the transpositions?

  (setf closest-hpath2 '((g2cs3g3c4bb4e4) (g2cs3fs3cs4bb4e4fs5) (g2cs3g3c4bb4e4)
                         (gs2d3f3b3b4e4e5) (gs2d3f3b3bb4f4) (gs2cs3gs3b3cs5f4d3)
                         (gs2d3f3b3bb4f4) (fs2c3a3c4f4eb4f5) (fs2c3fs3b3a4eb4)
                         (gs2d3f3b3b4e4e5) (gs2c3fs3eb4a4eb4) (fs2d3a3c4a4eb4d5)
                         (g2cs3bb3bb3eb5e4) (fs2c3a3d4a4eb4d5) (gs2cs3gs3b3d5f4) 
                         (gs2cs3gs3b3cs5f4d3) (g2cs3fs3cs4bb4e4) (g2cs3fs3cs4bb4e4fs5)
                         (fs2c3fs3b3a4eb4) (g2cs3a3bb3a4e4e4)))

   

Dear Wim,

thank you for your kind words.

the transposition was chosen by hear.

 

About the harmonic path, it come from my original idea mat1:

(setf mat1
      '(#|1|# (ped e a2 p ds3 a3 d4 q c5 fs4 ped+tie)
        #|2|# (ped w fs4)
        #|3|# (ped e a2 ds3 a3 d4 q c5 fs4 ped)
        #|4|# (ped q d5 h. c5)
        #|5|# (ped e a2 ds3 a3 d4 q c5 fs4)
        #|6|# (w fs4 ped1)
        #|7|# (ped e a2 ds3 a3 d4 q d5 c5 ped)
        #|8|# (w fs4 ped)
        ))

;;; get the harmonic content from basic material mat1
(setf hmat1 (get-harmonic-path mat1 :chord t :unique t :time '(ww)))

 

After this extraction, i apply some transposition to this material (extended by gen-trim):

;;; Transpose list to apply to harmonic path
(setf trsp2 '(-2 4 -2 2 8 -1 8 3 -3 2 6 0 1 0 -1 -1 4 4 9 7))
(setf path2 (pitch-transpose trsp2 (gen-trim 20 (mclist hmat1))))

And finally, i use chord-closest-path function for the voice leading:

;; chord closest path generation to use as harmonic material for variation 3
;(setf closest-hpath2 (chord-closest-path (car path2) path2))

And i've added the output of this function directly in a variable because the computation time for chord-closest-path is a bit long and i like to be able to run my scripts very often when composing (for reading the score and hearing) and need fast evaluation:

(setf closest-hpath2 '((g2cs3g3c4bb4e4) (g2cs3fs3cs4bb4e4fs5) (g2cs3g3c4bb4e4)
                       (gs2d3f3b3b4e4e5) (gs2d3f3b3bb4f4) (gs2cs3gs3b3cs5f4d3)
                       (gs2d3f3b3bb4f4) (fs2c3a3c4f4eb4f5) (fs2c3fs3b3a4eb4)
                       (gs2d3f3b3b4e4e5) (gs2c3fs3eb4a4eb4) (fs2d3a3c4a4eb4d5)
                       (g2cs3bb3bb3eb5e4) (fs2c3a3d4a4eb4d5) (gs2cs3gs3b3d5f4) 
                       (gs2cs3gs3b3cs5f4d3) (g2cs3fs3cs4bb4e4) (g2cs3fs3cs4bb4e4fs5)
                       (fs2c3fs3b3a4eb4) (g2cs3a3bb3a4e4e4)))

SB.