From 215012a8d684889983ec2c0629e1c704e6853d9c Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 9 Jan 2006 23:38:21 +0000 Subject: trunk/Master/texmf-dist/fonts/source git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751 --- .../fonts/source/public/bookhands/pgoth7.mf | 90 ++++++++++++++++++++++ 1 file changed, 90 insertions(+) create mode 100644 Master/texmf-dist/fonts/source/public/bookhands/pgoth7.mf (limited to 'Master/texmf-dist/fonts/source/public/bookhands/pgoth7.mf') diff --git a/Master/texmf-dist/fonts/source/public/bookhands/pgoth7.mf b/Master/texmf-dist/fonts/source/public/bookhands/pgoth7.mf new file mode 100644 index 00000000000..09d07506ad6 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/bookhands/pgoth7.mf @@ -0,0 +1,90 @@ +%% +%% This is file `pgoth7.mf', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% pgothic.dtx (with options: `base7') +%% +%% Copyright 1999 Peter R. Wilson +%% +%% This program is provided under the terms of the +%% LaTeX Project Public License distributed from CTAN +%% archives in directory macros/latex/base/lppl.txt. +%% +%% Author: Peter Wilson (CUA) +%% now at: peter.r.wilson@boeing.com +%% +%%% PGOTH7.MF Gothic Textura Prescius at 7 point design size. +if unknown cmbase: input cmbase fi + +font_identifier:="PGOTH"; font_size 7pt#; + + jutstretch:=1.19; + stemstretch:=1.50; + caprat:=7/5; % ratio of capital height to minuscule height + cap_jutstretch:=1.3; + cap_stemstretch:=1.45; + bfudge:=1.0; + szfudge:=1.18; + hstretch:=szfudge*bfudge; + carol_height#:=108.5/36pt#; + vstretch:=1.3; + + x_height#:=vstretch*carol_height#; + u#:=15.5/36pt#; + width_adj#:=0pt#; % width adjustment for certain characters + serif_fit#:=0pt#; % extra sidebar near lowercase serifs + cap_serif_fit#:=3.5/36pt#; % extra sidebar near uppercase serifs + letter_fit#:=0pt#; % extra space added to all sidebars + sb#:=1/4u#; % unit for side bearings + + cap_sb#:=2sb#; % unit for uppercase side bearings + + cap_height#:=172.2/36pt#; % height of caps + thickfudge:=1/5; +thinfudge:=1/6; +thick#:=stemstretch*thickfudge*x_height#; % max pen breadth +thin#:=thinfudge*thick#; +pangle:=45; % pen angle +stem_width#:= thick#*(cosd pangle); +perpdec#:= 3thin#; +angdec#:= perpdec#/(cosd pangle); + ascratio:=5/4; + asc_height#:=ascratio*x_height#; + descratio:=2/4; + desc_depth#:=descratio*x_height#; + body_height#:=caprat*asc_height#; + body_depth#:=caprat*desc_depth#; + half_height#:=1/2x_height#; % half the height of x height letters + +side#:=x_height#; + rule_thickness#:=.34pt#; + +%%%jutfudge:= 3/4; +jutfudge:= 1/2; +jut#:=jutstretch*jutfudge*thick#; +srad:=0.8; % was 0.5 +trijut#:=0.75jutstretch*thick#; +clubjutfudge:=1/2; +clubjut#:=jutstretch*clubjutfudge*thick#; +wided:= 0.75; +widedmin := 1.05 - wided; +narrowd:= 0.5; +narrowdmin := 0.7 - narrowd; +diawd := 1.0; +diang := 30; + fig_height#:=(0.5[1,caprat])*x_height#; + fig_width#:=hstretch*(4+wided+widedmin)*stem_width#; + o#:=5/36pt#; + +slant:=0; % tilt ratio $(\Delta x/\Delta y)$ +%%%%%%slant:= sind 10/cosd 10; %% 10 degree slant + +monospace:=false; % should all characters have the same width? + +dot_size#:=5thin#; % size of dots +comma_width#:=5/4dot_size#; + +generate pgothtitle %% switch to the driver file + -- cgit v1.2.3