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}.
7 This file should be run with the TeX and extra options should be
8 passed to LaTeX and dvips to help it find the uncb font."
15 #(define text-font-defaults
16 '((font-encoding . latin1)
20 #(set! fonts (make-century-schoolbook-tree 1.0))
24 % do this here so we don't forget the connection with
26 #(system "afm2tfm `kpsewhich uncb8a.afm` uncb8a.tfm")
29 line-width = 160 \mm - 2.0 * 9.0 \mm
41 %% uncomment to test postscript fonts.
46 d''16 cis''8 e''4 e''8