3 texidoc = "This file demonstrates how to load different
4 (postscript) fonts. The file @file{font.scm} shows how to define
5 the scheme-function @code{make-century-schoolbook-tree}."
12 #(define text-font-defaults
13 '((font-encoding . latin1)
17 #(set! fonts (make-century-schoolbook-tree 1.0))
21 % do this here so we don't forget the connection with
23 #(system "afm2tfm `kpsewhich uncb8a.afm` uncb8a.tfm")
26 linewidth = 160 \mm - 2.0 * 9.0 \mm
36 cis''8. d''16 cis''8 e''4 e''8