You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
48 lines
2.1 KiB
48 lines
2.1 KiB
% ---------------------------------------------------------------------------
|
|
% This is POLMAT.MF ({\bif{}polski font matematyczny}, i.e., the Polish
|
|
% extension of Computer Modern Symbol fonts) in text format.
|
|
% The program is a modification of the MATHSY.MF file.
|
|
% ---------------------------------------------------------------------------
|
|
% PL VERSION 1.09, April 13th, 2001 -- released for BachoTeX 2001
|
|
% ---------------------------------------------------------------------------
|
|
% AUTHORS OF MODIFICATION: {\bif{}Bogus\l{}aw Jackowski \& Marek Ry\'cko}
|
|
% ---------------------------------------------------------------------------
|
|
% This file belongs to the public domain under conditions similar to
|
|
% those of D. E. Knuth specified for the Computer Modern family of fonts.
|
|
%
|
|
% For details see either the file MEXINFO.POL or MEXINFO.ENG.
|
|
% ---------------------------------------------------------------------------
|
|
|
|
|
|
% ---------------------------------------------------------------------------
|
|
font_coding_scheme:="TeX math symbols";
|
|
mode_setup; font_setup;
|
|
|
|
autorounding:=hair;
|
|
input calu; % upper case calligraphic alphabet
|
|
autorounding:=0;
|
|
|
|
font_slant slant; font_x_height x_height#;
|
|
font_quad 18u# if not monospace:+4letter_fit# fi;
|
|
% (The spacing is zero so that \TeX\ will always add the italic correction.)
|
|
% (The calling file should give the other math symbol font parameters.)
|
|
|
|
slant:=mono_charic#:=0; % the remaining characters will not be slanted
|
|
currenttransform:=identity yscaled aspect_ratio scaled granularity;
|
|
input symbol; % the symbols
|
|
xleq=172; xgeq=173; % codes similar to codes of French quotation marks
|
|
input pl_sym; % extra symbols used in Polish math typesetting
|
|
|
|
if not monospace:
|
|
skewchar=oct"060"; skew#=.5u#;
|
|
ligtable "I": "T": "V": skewchar kern skew#;
|
|
ligtable "K": skewchar kern 2skew#;
|
|
ligtable "D": "N": "P": "R": "U": "W": "Y": skewchar kern 3skew#;
|
|
ligtable "E": "F": "G": "H": "O": "Q": skewchar kern 4skew#;
|
|
ligtable "B": "C": "L": "M": "S": "X": "Z": skewchar kern 5skew#;
|
|
ligtable "J": skewchar kern 6skew#;
|
|
ligtable "A": skewchar kern 7skew#;
|
|
fi;
|
|
|
|
bye.
|
|
%%\end
|
|
|