From 56675d1696ac72b03894140bc3231d85e2a0b018 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Tue, 9 Sep 1997 12:20:15 +0200 Subject: [PATCH] patch::: 0.1.12.jcn3: dienamiek pl 12.jcn3 - try at better dynamic font, copied from cmbxti10: mf/* --- NEWS | 3 + VERSION | 2 +- make/Toplevel.make.in | 2 +- mf/Makefile | 24 ++++++++ mf/dyn.tex | 58 ++++++++++++++++++ mf/dyn10.mf | 133 ++++++++++++++++++++++++++++++++++++++++++ mf/ital-f.mf | 37 ++++++++++++ mf/ital-m.mf | 35 +++++++++++ mf/ital-p.mf | 29 +++++++++ mf/ital-s.mf | 34 +++++++++++ mf/ital-z.mf | 29 +++++++++ tex/lilyponddefs.tex | 22 ++++--- tex/taupindefs.tex | 4 +- 13 files changed, 399 insertions(+), 13 deletions(-) create mode 100644 mf/Makefile create mode 100644 mf/dyn.tex create mode 100644 mf/dyn10.mf create mode 100644 mf/ital-f.mf create mode 100644 mf/ital-m.mf create mode 100644 mf/ital-p.mf create mode 100644 mf/ital-s.mf create mode 100644 mf/ital-z.mf diff --git a/NEWS b/NEWS index a40a867874..0fc763f6c2 100644 --- a/NEWS +++ b/NEWS @@ -1,3 +1,6 @@ +pl 12.jcn3 + - try at better dynamic font, copied from cmbxti10: mf/* + pl 12.jcn2 - typesetting abbreviation beams; abbreviation-* - some simple abbrev fixes + code cleanup (dank je, lieverd) diff --git a/VERSION b/VERSION index d02c76a40a..e82d4484f3 100644 --- a/VERSION +++ b/VERSION @@ -3,4 +3,4 @@ TOPLEVEL_MINOR_VERSION = 1 TOPLEVEL_PATCH_LEVEL = 12 # use to send patches, always empty for released version: -TOPLEVEL_MY_PATCH_LEVEL = .jcn2 +TOPLEVEL_MY_PATCH_LEVEL = .jcn3 diff --git a/make/Toplevel.make.in b/make/Toplevel.make.in index 7e971fcc72..aabc2e14d6 100644 --- a/make/Toplevel.make.in +++ b/make/Toplevel.make.in @@ -27,7 +27,7 @@ include ./$(depth)/make/Variables.make # descent order into subdirectories: # -SUBDIRS = flower lib lily mi2mu \ +SUBDIRS = flower lib lily mf mi2mu \ Documentation bin init input tex make # diff --git a/mf/Makefile b/mf/Makefile new file mode 100644 index 0000000000..c6fbecd8c1 --- /dev/null +++ b/mf/Makefile @@ -0,0 +1,24 @@ +# mf/Makefile + +# subdir level: +# +depth = .. +# +# +include ./$(depth)/make/Include.make +# + +# list of distribution files: +# +TEXFILES = $(wildcard *.tex) +MFFILES = $(wildcard *.mf) +DISTFILES = Makefile $(MFFILES) $(TEXFILES) +# + +localinstall: + $(INSTALL) -d $(MFDIR)/lilypond + $(INSTALL) -m 644 $(MFFILES) $(MFDIR)/lilypond/ + +localuninstall: + for i in $(MFFILES) ; do rm -f $(MFDIR)/lilypond/$$i; done + -rmdir $(MFDIR)/lilypond/ diff --git a/mf/dyn.tex b/mf/dyn.tex new file mode 100644 index 0000000000..d16f677e09 --- /dev/null +++ b/mf/dyn.tex @@ -0,0 +1,58 @@ +% dyn.tex +% A tex file to help view dynamic letters +% + +\font\dynfont=dyn10 +\def\thefont{\dynfont} + +\def\mb#1{{\thefont\char#1}} + +\def\doitem#1{ + #1% +% \vbox to12pt{\vfill\hbox to0pt{\qquad\kern-1pt\twvrul\hss}}% +% \hbox to50pt{\qquad\twhrul\mb{#1}\hss}% + \hbox to 30pt{\qquad\mb{#1}\hss} + \setbox0=\hbox{\mb{#1}} width \the\wd0\ depth \the\dp0 \ height \the\ht0} + +\newcount\n +\def\charn{\n=-1 + \loop\ifnum\n<4\advance\n by1 + \doitem{\number\n}\endgraf\repeat} + + \charn + +%from lilyponddefs +% dynamics take extra kerning +\def\dyn{\dynfont} +\def\kdynf{\dynfont \char0\kern-.2ex} +\def\kdynm{\dynfont \char1\kern-.18ex} +\def\kdynp{\dynfont \char2\kern-.08ex} +\def\kdyns{\dynfont \char3\kern-.22ex} +\def\kdynz{\dynfont \char4\kern-.2ex} + +\def\dynp{\kdynp} +\def\dynpp{\dynp\kdynp} +\def\dynppp{\dynpp\kdynp} +\def\dynmp{\kdynm\kdynp} +\def\dynmf{\kdynm\kdynf} +\def\dynf{\kdynf} +\def\dynff{\dynf\kdynf} +\def\dynfff{\dynff\kdynf} + +\def\dynfp{\kdynf\kern.35ex\kdynp} +\def\dynsf{\kdyns\kdynf} +\def\dynsfz{\dynsf\kern.3ex\kdynz} + +\hbox{\dynp} +\hbox{\dynpp} +\hbox{\dynppp} +\hbox{\dynmp} +\hbox{\dynmf} +\hbox{\dynff} +\hbox{\dynf} +\hbox{\dynfff} +\hbox{\dynfp} +\hbox{\dynsf} +\hbox{\dynsfz} + +\bye diff --git a/mf/dyn10.mf b/mf/dyn10.mf new file mode 100644 index 0000000000..3b49ec253d --- /dev/null +++ b/mf/dyn10.mf @@ -0,0 +1,133 @@ +% dyn10.mf +% from cmbxti10.mf + +% Computer Modern Bold Extended Text Italic 10 point +% if unknown cmbase: input cmbase fi + +% font_identifier:="CMBXTI"; font_size 10pt#; + +input cmbase; +font_identifier:="DYN"; font_size 10pt#; + +u#:=21.2/36pt#; % unit width +width_adj#:=11/36pt#; % width adjustment for certain characters +serif_fit#:=0pt#; % extra sidebar near lowercase serifs +cap_serif_fit#:=7/36pt#; % extra sidebar near uppercase serifs +letter_fit#:=11/36pt#; % extra space added to all sidebars + +body_height#:=270/36pt#; % height of tallest characters +asc_height#:=250/36pt#; % height of lowercase ascenders +cap_height#:=247/36pt#; % height of caps +fig_height#:=232/36pt#; % height of numerals +x_height#:=160/36pt#; % height of lowercase without ascenders +math_axis#:=90/36pt#; % axis of symmetry for math symbols +bar_height#:=85/36pt#; % height of crossbar in lowercase e +comma_depth#:=70/36pt#; % depth of comma below baseline +desc_depth#:=70/36pt#; % depth of lowercase descenders + +crisp#:=13/36pt#; % diameter of serif corners +tiny#:=13/36pt#; % diameter of rounded corners +fine#:=10/36pt#; % diameter of sharply rounded corners +thin_join#:=10/36pt#; % width of extrafine details +hair#:=20/36pt#; % lowercase hairline breadth +stem#:=38/36pt#; % lowercase stem breadth +curve#:=43/36pt#; % lowercase curve breadth +ess#:=35/36pt#; % breadth in middle of lowercase s +flare#:=42/36pt#; % diameter of bulbs or breadth of terminals +dot_size#:=53/36pt#; % diameter of dots +cap_hair#:=22/36pt#; % uppercase hairline breadth +cap_stem#:=49/36pt#; % uppercase stem breadth +cap_curve#:=52/36pt#; % uppercase curve breadth +cap_ess#:=50/36pt#; % breadth in middle of uppercase s +rule_thickness#:=.6pt#; % thickness of lines in math symbols + +dish#:=1/36pt#; % amount erased at top or bottom of serifs +bracket#:=10/36pt#; % vertical distance from serif base to tangent +jut#:=27/36pt#; % protrusion of lowercase serifs +cap_jut#:=39/36pt#; % protrusion of uppercase serifs +beak_jut#:=10/36pt#; % horizontal protrusion of beak serifs +beak#:=70/36pt#; % vertical protrusion of beak serifs +vair#:=13/36pt#; % vertical diameter of hairlines +notch_cut#:=10pt#; % maximum breadth above or below notches +bar#:=17/36pt#; % lowercase bar thickness +slab#:=17/36pt#; % serif and arm thickness +cap_bar#:=17/36pt#; % uppercase bar thickness +cap_band#:=17/36pt#; % uppercase thickness above/below lobes +cap_notch_cut#:=10pt#; % max breadth above/below uppercase notches +serif_drop#:=3/36pt#; % vertical drop of sloped serifs +stem_corr#:=2/36pt#; % for small refinements of stem breadth +vair_corr#:=1.5/36pt#; % for small refinements of hairline height +apex_corr#:=0pt#; % extra width at diagonal junctions + +o#:=6/36pt#; % amount of overshoot for curves +apex_o#:=6/36pt#; % amount of overshoot for diagonal junctions + +slant:=.25; % tilt ratio $(\Delta x/\Delta y)$ +fudge:=1; % factor applied to weights of heavy characters +math_spread:=.5; % extra openness of math symbols +superness:=8/11; % parameter for superellipses +superpull:=1/8; % extra openness inside bowls +beak_darkness:=.4; % fraction of triangle inside beak serifs +ligs:=2; % level of ligatures to be included + +square_dots:=false; % should dots be square? +hefty:=false; % should we try hard not to be overweight? +serifs:=true; % should serifs and bulbs be attached? +monospace:=false; % should all characters have the same width? +variant_g:=true; % should an italic-style g be used? +low_asterisk:=false; % should the asterisk be centered at the axis? +math_fitting:=false; % should math-mode spacing be used? + +% generate textit % switch to the driver file + +% mode_setup; font_setup; + +% "f" obviously has a _lot_ bigger slant than "p" (see wanske p239) +% however; perhaps we need two f symbols: +% - a super-slanted one used in "f" "mf" "sfz" "sf", and +% - a more normal-slanted in "ff" "fff" "fp" "fp" (see wanske p241) +% +% looking at professionally typeset music reveals that typesetters +% are somewhat unsure about slanting in "mf", "fp", "sfz" + +% "f" and "p" (in any combination) are a lot (factor two) fatter than +% "s", "m", and "z". sometimes the "m" and "z" are a bit fatter than +% "s". + +slant:=.62; % tilt ratio $(\Delta x/\Delta y)$ +crisp#:=19/36pt#; % diameter of serif corners +tiny#:=19/36pt#; % diameter of rounded corners +fine#:=20/36pt#; % diameter of sharply rounded corners +thin_join#:=20/36pt#; % width of extrafine details +stem#:=57/36pt#; % lowercase stem breadth +curve#:=64/36pt#; % lowercase curve breadth +flare#:=64/36pt#; % diameter of bulbs or breadth of terminals + +mode_setup; font_setup; +input ital-f; +slant:=.38; % tilt ratio $(\Delta x/\Delta y)$ +mode_setup; font_setup; +input ital-p; + +slant:=.28; % tilt ratio $(\Delta x/\Delta y)$ +stem#:=30/36pt#; % lowercase stem breadth +ess#:=28/36pt#; % breadth in middle of lowercase s + +crisp#:=13/36pt#; % diameter of serif corners +tiny#:=13/36pt#; % diameter of rounded corners +fine#:=10/36pt#; % diameter of sharply rounded corners +thin_join#:=10/36pt#; % width of extrafine details +hair#:=20/36pt#; % lowercase hairline breadth +% stem#:=38/36pt#; % lowercase stem breadth +% curve#:=43/36pt#; % lowercase curve breadth +flare#:=42/36pt#; % diameter of bulbs or breadth of terminals +% ess#:=35/36pt#; % breadth in middle of lowercase s + +mode_setup; font_setup; + +input ital-m; +input ital-s; +input ital-z; + +font_slant slant; font_x_height x_height#; +bye. diff --git a/mf/ital-f.mf b/mf/ital-f.mf new file mode 100644 index 0000000000..be97ed0263 --- /dev/null +++ b/mf/ital-f.mf @@ -0,0 +1,37 @@ +% ital-f.mf +% from itall.mf +% +% Computer Modern Italic lower case: +% This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, +% inspired by the Monotype faces used in {\sl The Art of Computer Programming}. +% The programs were revised for the new \MF\ conventions in 1985. + +% Character codes \0141 through \0172 are generated. +% not + +% cmchar "Italic letter f"; +% beginchar("f",max(1.5u#,stem#)+max(3.5u#,2flare#),asc_height#,desc_depth#); +\"Dynamic letter f"; +beginchar(0,max(1.5u#,stem#)+max(3.5u#,2flare#),asc_height#,desc_depth#); +italcorr asc_height#*slant+.75u#; +adjust_fit(if monospace:u#,u# else: 0,0 fi); pickup fine.nib; +numeric theta; z88=(.5w-.5u,h); z89=(.5w+.5u,-d); theta=angle(z88-z89); +pos0(flare,0); pos1(hair,0); pos2(vair,90); +pos3(.5[hair,stem],180); pos4(stem,theta+90); +pos5(stem,theta-90); pos6(.5[hair,stem],0); +pos7(vair,-90); pos8(hair,-180); pos9(flare,-180); +rt x1r=hround(w+.25u); lft x8r=hround-.35u; x2=.6[x1,x4]; x7=.6[x8,x5]; +y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo; +y4=.25[x_height,h]; y5=.5[-d,y4]; +z4=whatever[z88,z89]; z5=whatever[z88,z89]; +x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7]; +bulb(2,1,0); bulb(7,8,9); % bulbs +filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper arc +filldraw z4r--z5l--z5r--z4l--cycle; % stem +filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower arc +pickup crisp.nib; pos20(bar,90); pos21(bar,90); +top y20r=top y21r=x_height; +lft x20=lft x4r-.5stem-u; rt x21=rt x4l+.5stem+1.5u; +filldraw stroke z20e--z21e; % crossbar +math_fit(desc_depth#*slant+u#,x_height#*slant); +penlabels(0,1,2,3,4,5,6,7,8,9,20,21,88,89); endchar; diff --git a/mf/ital-m.mf b/mf/ital-m.mf new file mode 100644 index 0000000000..6f6828d2d2 --- /dev/null +++ b/mf/ital-m.mf @@ -0,0 +1,35 @@ +% ital-m.mf +% from itall.mf +% +% Computer Modern Italic lower case: +% This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, +% inspired by the Monotype faces used in {\sl The Art of Computer Programming}. +% The programs were revised for the new \MF\ conventions in 1985. + +% Character codes \0141 through \0172 are generated. +% not + +% cmchar "Italic letter m"; +% beginchar("m",15u#,x_height#,0); +\"Dynamic letter m"; +beginchar(1,15u#,x_height#,0); +italcorr 1/3x_height#*slant+.5hair#+.5u#; +adjust_fit(if monospace:-1.5u#,-2u# else: 0,0 fi); pickup fine.nib; +numeric shaved_stem; shaved_stem=mfudged.stem; +save stem; stem=shaved_stem; +pos2(stem,0); x1=x2; +if monospace: pos1(stem,0); lft x1l=hround(2.5u-.5stem); top y1=h; +else: x0=0; lft x2l=hround(2.5u-.5stem); + hook_in(0,a,1); fi % opening hook +y2-.5stem=-oo; filldraw circ_stroke z2e--z1e; % left stem +x4+.5stem=hround(.5w+.5stem); ital_arch(2,3,4); % left arch +pos5(stem,0); y5=y2; x5=x4; +filldraw circ_stroke z5e--z4e; % middle stem +x7+.5stem=hround(w-2.5u+.5stem); +x8=x7-.25u; ital_arch(5,6,7); % right arch +if monospace: pos9(vair,90); x9=good.x .5[x8,w]; bot y9l=0; y8=1/3h; + pos8(stem,0); filldraw stroke z8e{-u,-x_height}...{right}z9e; % terminal +else: x9=w; hook_out(8,b,9)(skewed); fi % closing hook +filldraw stroke z7e{down}..{-u,-x_height}z8e; % right stem +math_fit(-2/3x_height#*slant+.5hair#+.5u#,ic#); +penlabels(0,a,1,2,3,4,5,6,7,8,9); endchar; diff --git a/mf/ital-p.mf b/mf/ital-p.mf new file mode 100644 index 0000000000..3c853cc8f2 --- /dev/null +++ b/mf/ital-p.mf @@ -0,0 +1,29 @@ +% ital-p.mf +% from itall.mf +% +% Computer Modern Italic lower case: +% This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, +% inspired by the Monotype faces used in {\sl The Art of Computer Programming}. +% The programs were revised for the new \MF\ conventions in 1985. + +% Character codes \0141 through \0172 are generated. +% not + +% cmchar "Italic letter p"; +% beginchar("p",9u#,x_height#,desc_depth#); +\"Dynamic letter p"; +beginchar(2,9u#,x_height#,desc_depth#); +italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.5u# fi; +adjust_fit(0,0); pickup fine.nib; +x0=0; x2-.5stem=hround(2.5u-.5stem); hook_in(0,1,2); % opening hook +pos4(hair,-180); pos5(vair,-90); pos6(curve,0); pos7(vair,90); +x4=x2; rt x6r=hround(w-1.5u+.5curve); x5=x7=.5[x4,x6]; +bot y5r=-oo; top y7r=h+oo; y4=y6=.5[y5,y7]; +filldraw stroke super_arc.e(4,5) & pulled_arc.e(5,6) + & pulled_arc.e(6,7) & super_arc.e(7,4); % bowl +pickup tiny.nib; pos2'(stem,0); pos3(stem,0); +z2=z2'; x3=x2; bot y3=-d; filldraw stroke z2'e--z3e; % stem +dish_serif(3,2',a,1/3,.75jut,b,1/3,jut); % serif +math_fit(-min(2/3x_height#*slant-.5hair#-.5u#, + 2u#-.5stem#-desc_depth#*slant),ic#); +penlabels(0,1,2,3,4,5,6,7); endchar; diff --git a/mf/ital-s.mf b/mf/ital-s.mf new file mode 100644 index 0000000000..0599a312d8 --- /dev/null +++ b/mf/ital-s.mf @@ -0,0 +1,34 @@ +% ital-s.mf +% from itall.mf +% +% Computer Modern Italic lower case: +% This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, +% inspired by the Monotype faces used in {\sl The Art of Computer Programming}. +% The programs were revised for the new \MF\ conventions in 1985. + +% Character codes \0141 through \0172 are generated. +% not + +% cmchar "Italic letter s"; +% beginchar("s",5.25u#+max(1.75u#,flare#),x_height#,0); +\"Dynamic letter s"; +beginchar(3,5.25u#+max(1.75u#,flare#),x_height#,0); +italcorr x_height#*slant-.5u#; +adjust_fit(0,0); pickup fine.nib; +numeric theta; theta=90-angle(40u,h); slope:=-h/40u; % angle at middle +pos2(vair,-90); pos0(max(fine.breadth,ess),theta); pos7(vair,-90); +x2l=x0=x7=.5w; top y2l=h+oo; bot y7r=-oo; +y0-.5ess=y7l+.55(y2r-y7l-ess); +lft x3l=hround u-eps; rt x6r=hround(w-.5u)+eps; +x3r-x3l=x6r-x6l=hround .5[vair,ess]-fine; +ellipse_set(2l,3l,4l,0l); ellipse_set(2r,3r,4r,0r); y3=y3r; +ellipse_set(7l,6l,5l,0l); ellipse_set(7r,6r,5r,0r); y6=y6r; +interim superness:=more_super; +filldraw stroke super_arc.e(2,3) & z3e{down} + ..z4e---z5e..z6e{down} & super_arc.e(6,7); % main stroke +pos1(hair,0); pos10(hround .75[hair,flare],0); +pos2'(vair,90); z2'=z2; +pos8(hair,-180); pos9(flare,-180); +rt x10r=hround(w-u)+2eps; lft x9r=hround .5u-2eps; y10=.78h; y9=.25h; +bulb(2',1,10); bulb(7,8,9); % bulbs +math_fit(0,ic#); penlabels(0,1,2,3,4,5,6,7,8,9,10); endchar; diff --git a/mf/ital-z.mf b/mf/ital-z.mf new file mode 100644 index 0000000000..9e8992878e --- /dev/null +++ b/mf/ital-z.mf @@ -0,0 +1,29 @@ +% ital-z.mf +% from itall.mf +% +% Computer Modern Italic lower case: +% This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, +% inspired by the Monotype faces used in {\sl The Art of Computer Programming}. +% The programs were revised for the new \MF\ conventions in 1985. + +% Character codes \0141 through \0172 are generated. +%not + +% cmchar "Italic letter z"; +% beginchar("z",5.5u#+max(1.5u#,stem#),x_height#,0); +\"Dynamic letter z"; +beginchar(4,5.5u#+max(1.5u#,stem#),x_height#,0); +italcorr x_height#*slant+.5hair#; +adjust_fit(if monospace:.5u#,.5u# else: 0,0 fi); pickup fine.nib; +pos1(hair,0); pos2(stem,-90); pos3(vair,-90); pos4(hair,0); +lft x1l=hround(u-.5hair); x2=2.5u; x3=w-2u; rt x4r=hround(w-.5u); +top y1=.78h; top y2l=top y4=h+oo; y3=.825h; +pos5(hair,0); pos6(vair,-90); pos7(stem,-90); pos8(hair,0); +x5=x1; x6=2.5u; x7=w-2u; x8+.5hair=hround(w+.5hair-eps); +bot y5=bot y7r=-oo; y6=.175h; bot y8=.31h; +pair p; p=(z4-z5) yscaled 2; +filldraw stroke z1e{up}...z2e{right}..z3e{right}...{p}z4e; % upper bar +filldraw stroke z5e{p}...z6e{right}..{right}z7e...{up}z8e; % lower bar +filldraw stroke z5e{p}..{p}z4e; % diagonal +math_fit(0,1/3x_height#*slant+.5hair#+.5u#); +penlabels(1,2,3,4,5,6,7,8); endchar; diff --git a/tex/lilyponddefs.tex b/tex/lilyponddefs.tex index 189c512b48..834003d7b3 100644 --- a/tex/lilyponddefs.tex +++ b/tex/lilyponddefs.tex @@ -88,22 +88,26 @@ \divide\interstaffrule by 4 } -% dynamics take extra kerning -\def\dyn{\dynfont} -\def\kdynf{\dynfont f\kern-.1ex} -\def\kdynm{\dynfont m\kern-.15ex} -\def\kdynp{\dynfont p\kern-.15ex} +\def\dyn{\dynfont} +\def\kdynf{\dynfont \char0\kern-.2ex} +\def\kdynm{\dynfont \char1\kern-.18ex} +\def\kdynp{\dynfont \char2\kern-.08ex} +\def\kdyns{\dynfont \char3\kern-.22ex} +\def\kdynz{\dynfont \char4\kern-.2ex} -\def\dynp{\dynfont p} +\def\dynp{\kdynp} \def\dynpp{\dynp\kdynp} \def\dynppp{\dynpp\kdynp} -\def\dynmp{\dynfont m\kdynp} -\def\dynmf{\dynfont m\kdynf} -\def\dynf{\dynfont f} +\def\dynmp{\kdynm\kdynp} +\def\dynmf{\kdynm\kdynf} +\def\dynf{\kdynf} \def\dynff{\dynf\kdynf} \def\dynfff{\dynff\kdynf} +\def\dynfp{\kdynf\kern.35ex\kdynp} +\def\dynsf{\kdyns\kdynf} +\def\dynsfz{\dynsf\kern.3ex\kdynz} \input taupindefs diff --git a/tex/taupindefs.tex b/tex/taupindefs.tex index dd13f537c1..9e2c6c1c52 100644 --- a/tex/taupindefs.tex +++ b/tex/taupindefs.tex @@ -12,7 +12,7 @@ \font\musicfnt=musix20 \font\musicdraw=musixsps \font\italicfont=cmti10 - \font\dynfont=cmbxti10 scaled \magstep1 + \font\dynfont=dyn10 scaled \magstep2 \font\musicmathfont=cmsy10 } @@ -29,7 +29,7 @@ \font\hslurdfont=xslhd16 \font\hslurhfont=xslhz20 \font\musicfnt=musix16 - \font\dynfont=cmbxti10 + \font\dynfont=dyn10 scaled \magstep1 \font\musicdraw=musixsps \font\musicmathfont=cmsy8 } -- 2.39.5