+;;;; (c) 2003--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
+
+(define-public (translate-stencil stencil coordinate-pair)
+ "Translate @code{stencil} by the distances specified in
+@code{coordinate-pair}."
+ (ly:stencil-translate-axis
+ (ly:stencil-translate-axis stencil (cdr coordinate-pair) Y)
+ (car coordinate-pair) X))