summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf90
1 files changed, 90 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf b/Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf
new file mode 100644
index 00000000000..9c4b47891d1
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/bookhands/tgothr7.mf
@@ -0,0 +1,90 @@
+%%
+%% This is file `tgothr7.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% tgothic.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
+%%
+%%% TGOTH7.MF Gothic Textura Quadrata at 7 point design size.
+if unknown cmbase: input cmbase fi
+
+font_identifier:="TGOTH"; 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 tgothtitle %% switch to the driver file
+