Add pad-y markup command

orchestrallily.ily

@@ -1238,6 +1238,14 @@ addArticulation = #(define-music-function (parser location type music)
                 (add-articulation music type))
 
 
+#(define-markup-command (pad-y layout props amount arg)
+  (number? markup?)
+  #:category align
+  (let* ((m (interpret-markup layout props arg))
+         (x (ly:stencil-extent m X))
+         (y (ly:stencil-extent m Y)))
+    (ly:make-stencil (ly:stencil-expr m) x 
+		     (interval-widen y amount))))
 
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%