trunk/Master/texmf-dist/fonts/source

git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 77 insertions, 0 deletions

diff --git a/Master/texmf-dist/fonts/source/public/bookhands/imajb7.mf b/Master/texmf-dist/fonts/source/public/bookhands/imajb7.mf
new file mode 100644
index 00000000000..3f4d2f02889
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/bookhands/imajb7.mf
@@ -0,0 +1,77 @@
+%%
+%% This is file `imajb7.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% inslrmaj.dtx  (with options: `base7b')
+%% 
+%%  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
+%% 
+%%% IMAJB7.MF    Insular Majuscule Bold at 7 point design size.
+if unknown cmbase: input cmbase fi
+
+font_identifier:="IMAJB"; font_size 7pt#;
+
+ jutstretch:=1.19;
+ stemstretch:=1.50;
+ caprat:=1.5;          % ratio of capital height to minuscule height
+ cap_jutstretch:=1.3;
+ cap_stemstretch:=1.45;
+ bfudge:=1.2;
+ szfudge:=1.18;
+ hstretch:=szfudge*bfudge;
+ carol_height#:=108.5/36pt#;
+ vstretch:=1.4;
+
+ x_height#:=vstretch*carol_height#;
+ u#:=17.9/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/2u#;                   % unit for side bearings
+
+ cap_height#:=172.2/36pt#;        % height of caps
+ thickfudge:=1/4;
+thinfudge:=1/6;
+thick#:=stemstretch*thickfudge*x_height#;    % max pen breadth
+thin#:=thinfudge*thick#;
+pangle:=0;                  % pen angle
+  ascratio:=5/3;
+  asc_height#:=ascratio*x_height#;
+  descratio:=1.5/3;
+  desc_depth#:=descratio*x_height#;
+  fig_height#:=(0.5[1,caprat])*x_height#;
+  fig_width#:=hstretch*(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.5;
+trijut#:=0.75jutstretch*thick#;
+clubjut:=5/12;
+ o#:=5/36pt#;
+
+slant:=0;      % tilt ratio $(\Delta x/\Delta y)$
+
+monospace:=false;    % should all characters have the same width?
+
+dot_size#:=5thin#;   % size of dots
+comma_width#:=2.5dot_size#;
+
+generate imajtitle      %% switch to the driver file
+