1 %!PS-Adobe-2.0: lilyponddefs.ps
3 % * junk all magic, start-line/stop-line just: placebox @ x.y
5 % Functions for direct PostScript output
7 % /setgray { 1 add } bind def
9 % To let gs load fonts from builddir, do:
10 % export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
13 /set-ps-scale-to-lily-scale {
14 lily-output-units output-scale mul
15 lily-output-units output-scale mul scale
21 clippath pathbbox newpath
22 /paper-height exch def
23 /paper-width exch def pop pop pop
26 paper-width line-width sub 2 div /left-margin exch def
30 /init-lilypond-parameters {
31 staff-line-thickness setlinewidth
32 staff-height init-paper