summaryrefslogtreecommitdiff
path: root/info/lmodern/lm-kerning.tex
blob: 540da6b85bd6ef76339b9cca2dd862dcff8544e9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
\documentclass[12pt,a4paper]{article}
\usepackage[T1]{fontenc}
\usepackage[latin1]{inputenc}
\usepackage{lmodern}
\usepackage[textwidth=190mm,textheight=270mm]{geometry}
\usepackage{graphicx}
\pagestyle{empty}

\newlength{\kernleft}
\newlength{\kernright}
\newlength{\pslength}
\setlength{\pslength}{0.00102130607em}

\newcommand\kerntest[9]{%
 \guillemotright #1\guillemotleft &
 \setlength{\kernleft}{#2\pslength}%
 \setlength{\kernright}{#3\pslength}%
 \guillemotright\kern\the\kernleft#1\kern\the\kernright\guillemotleft &
 \guillemotleft#1\guillemotright &
 \setlength{\kernleft}{#4\pslength}%
 \setlength{\kernright}{#5\pslength}%
 \guillemotleft\kern\the\kernleft#1\kern\the\kernright\guillemotright &
 \quotedblbase#1\textquotedblleft\ &
 \setlength{\kernleft}{#6\pslength}%
 \setlength{\kernright}{#7\pslength}%
 \quotedblbase\kern\the\kernleft#1\kern\the\kernright\textquotedblleft &
 \textquotedblleft#1\textquotedblright &
 \setlength{\kernleft}{#8\pslength}%
 \setlength{\kernright}{#9\pslength}%
 \textquotedblleft\kern\the\kernleft#1\kern\the\kernright\textquotedblright
 \\}

\newlength{\emasdf}
\begin{document}
\setlength{\emasdf}{1ex}
	\typeout{\the\emasdf}%

% >>A
\def\frqqA{-070}%
\def\frqqH{-050}%
\def\frqqO{-030}%
\def\frqqT{-070}%
\def\frqqV{-100}%
\def\frqqpunct{-050}%

% A<<
\def\Aflqq{-070}%
\def\Oflqq{-020}%
\def\Hflqq{-050}%
\def\Kflqq{-050}%
\def\Pflqq{-030}%
\def\Tflqq{-070}%
\def\Vflqq{-100}%
\def\punctflqq{-050}%

%<<A
\def\flqqV{-050}%
\def\flqqA{-030}%
\def\flqqU{-030}%

%A>>
\def\Vfrqq{-050}%
\def\Afrqq{-030}%
\def\Ufrqq{-030}%

%,,A
\def\glqqH{+050}%
\def\glqqO{-050}%
\def\glqqU{-050}%
\def\glqqV{-150}%
\def\glqqpunct{+100}%

%A``
\def\Agrqq{-200}
\def\Ogrqq{-100}%
\def\Hgrqq{-100}%
\def\Egrqq{-050}%
\def\punctgrqq{-050}%

%``A
\def\elqqA{-050}

%A''
\def\Aerqq{-050}


\begin{twocolumn}
\begin{tabular}{|*{4}{l@{~}l|}}
\rotatebox{90}{Guill.\ Ger.\ Orig.} &
\rotatebox{90}{Guill.\ Ger.\ Kern.} &
\rotatebox{90}{Guill.\ Fren.\ Orig.} &
\rotatebox{90}{Guill.\ Fren.\ Kern.} &
\rotatebox{90}{Quot.\ Ger.\ Orig.} &
\rotatebox{90}{Quot.\ Ger.\ Kern.} &
\rotatebox{90}{Quot.\ Engl.\ Orig.} &
\rotatebox{90}{Quot.\ Engl.\ Kern.} \\
\kerntest{A}{\frqqA}{\Aflqq}{\flqqA}{\Afrqq}{\glqqH}{\Agrqq}{\elqqA}{\Aerqq}
\kerntest{B}{\frqqH}{-000}{-000}{-000}{\glqqH}{\Ogrqq}{-000}{-000}
\kerntest{C}{\frqqO}{-000}{-000}{-000}{\glqqO}{\Egrqq}{-000}{-000}
\kerntest{D}{\frqqH}{\Oflqq}{-000}{-000}{\glqqH}{\Ogrqq}{-000}{-000}
\kerntest{E}{\frqqH}{-000}{-000}{-000}{\glqqH}{\Egrqq}{-000}{-000}
\kerntest{F}{\frqqH}{\Hflqq}{-000}{-000}{\glqqH}{\Egrqq}{-000}{-000}
\kerntest{G}{\frqqO}{-000}{-000}{-030}{\glqqO}{\Ogrqq}{-000}{-000}
\kerntest{H}{\frqqH}{\Hflqq}{-000}{-000}{\glqqH}{\Hgrqq}{-000}{-000}
\kerntest{I}{\frqqH}{\Hflqq}{-000}{-000}{\glqqH}{\Hgrqq}{-000}{-000}
\kerntest{J}{-030}{\Hflqq}{-000}{-000}{-000}{\Hgrqq}{-050}{-000}
\kerntest{K}{\frqqH}{\Aflqq}{-000}{-000}{\glqqH}{\Hgrqq}{-000}{-000}
\kerntest{L}{\frqqH}{-000}{-000}{-000}{\glqqH}{-100}{-000}{-000}
\kerntest{M}{\frqqH}{\Hflqq}{-000}{-000}{\glqqH}{\Hgrqq}{-000}{-000}
\kerntest{N}{\frqqH}{\Hflqq}{-000}{\Ufrqq}{\glqqH}{\Hgrqq}{-000}{-000}
\kerntest{O}{\frqqO}{\Oflqq}{-000}{-000}{\glqqO}{\Ogrqq}{-000}{-000}
\kerntest{P}{\frqqH}{\Pflqq}{-000}{-000}{\glqqH}{\Ogrqq}{-000}{-000}
\kerntest{Q}{\frqqO}{\Oflqq}{-000}{-000}{\glqqO}{\Ogrqq}{-000}{-000}
\kerntest{R}{\frqqH}{\Oflqq}{-000}{-000}{\glqqH}{-120}{-000}{-000}
\kerntest{S}{-000}{-000}{-000}{-000}{+050}{\Hgrqq}{-000}{-000}
\kerntest{T}{\frqqT}{\Tflqq}{\flqqU}{\Ufrqq}{\glqqU}{-050}{-000}{-000}
\kerntest{U}{\frqqH}{\Hflqq}{\flqqU}{\Ufrqq}{\glqqU}{\Hgrqq}{-000}{-000}
\kerntest{V}{\frqqV}{\Vflqq}{\flqqV}{\Vfrqq}{\glqqV}{\Hgrqq}{-000}{-000}
\kerntest{W}{\frqqV}{\Vflqq}{\flqqV}{\Vfrqq}{\glqqV}{\Hgrqq}{-000}{-000}
\kerntest{X}{\frqqH}{\Hflqq}{-000}{-000}{\glqqH}{-150}{-000}{-000}
\kerntest{Y}{\frqqV}{\Vflqq}{\flqqV}{\Vfrqq}{\glqqV}{\Hgrqq}{-000}{-000}
\kerntest{Z}{-030}{-000}{-000}{-000}{-000}{\Hgrqq}{-000}{-000}
\kerntest{Ä}{\frqqA}{\Aflqq}{\flqqA}{\Afrqq}{\glqqH}{\Agrqq}{\elqqA}{\Aerqq}
\kerntest{Ö}{\frqqO}{\Oflqq}{-000}{-000}{\glqqO}{\Ogrqq}{-000}{-000}
\kerntest{Ü}{\frqqH}{\Hflqq}{\flqqU}{\Ufrqq}{\glqqU}{\Hgrqq}{-000}{-000}
\kerntest{?}{-100}{-100}{-000}{-000}{+050}{-050}{-000}{-000}
\kerntest{!}{\frqqpunct}{\punctflqq}{-000}{-000}{\glqqpunct}{\punctgrqq}{-000}{-000}
\kerntest{.}{\frqqpunct}{\punctflqq}{-000}{-000}{\glqqpunct}{\punctgrqq}{-000}{-000}
\kerntest{,}{\frqqpunct}{\punctflqq}{-000}{-000}{+150}{\punctgrqq}{-000}{-000}
\kerntest{;}{\frqqpunct}{\punctflqq}{-000}{-000}{\glqqpunct}{\punctgrqq}{-000}{-000}
\kerntest{:}{\frqqpunct}{\punctflqq}{-000}{-000}{\glqqpunct}{\punctgrqq}{-000}{-000}
\kerntest{\quotesinglbase
           }{\frqqpunct}{\punctflqq}{-000}{-000}{+150}{\punctgrqq}{-000}{-000}
\kerntest{`}{\frqqpunct}{\punctflqq}{-000}{-000}{+050}{+000}{+100}{+100}
\kerntest{'}{\frqqpunct}{\punctflqq}{-000}{-000}{+050}{+000}{+100}{+100}
\kerntest{\guilsinglleft
           }{-000}{-000}{-000}{-000}{-050}{-100}{-000}{-000}
\kerntest{\guilsinglright
           }{-000}{-000}{-000}{-000}{-000}{-150}{-000}{-000}
\kerntest{\quotedblbase
           }{-150}{-000}{-100}{+050}{+100}{-000}{+050}{+150}
\kerntest{``%
           }{-150}{-000}{-100}{+050}{-000}{+100}{+050}{+150}
\kerntest{''%
           }{-000}{-150}{+050}{-100}{+100}{+000}{+150}{+050}
\kerntest{<<%
           }{-000}{-000}{-000}{-000}{-050}{-100}{-000}{-000}
\kerntest{>>%
           }{-000}{-000}{-000}{-000}{-000}{-150}{-000}{-000}
\end{tabular}




% >>A

% A<<

%<<A

%A>>

%,,A
\def\glqqo{+050}%
\def\glqqh{+050}%

%A``
\def\ogrqq{-050}%
\def\hgrqq{-100}%

%``A

%A''


\begin{tabular}{|*{4}{l@{~}l|}}
\rotatebox{90}{Guill.\ Ger.\ Orig.} &
\rotatebox{90}{Guill.\ Ger.\ Kern.} &
\rotatebox{90}{Guill.\ Fren.\ Orig.} &
\rotatebox{90}{Guill.\ Fren.\ Kern.} &
\rotatebox{90}{Quot.\ Ger.\ Orig.} &
\rotatebox{90}{Quot.\ Ger.\ Kern.} &
\rotatebox{90}{Quot.\ Engl.\ Orig.} &
\rotatebox{90}{Quot.\ Engl.\ Kern.} \\
\kerntest{a}{-000}{-000}{-000}{-000}{\glqqo}{-100}{-000}{-000}
\kerntest{b}{-050}{-000}{-000}{-000}{-000}{\hgrqq}{+050}{-000}
\kerntest{c}{-000}{-000}{-000}{-000}{\glqqo}{\ogrqq}{-000}{-000}
\kerntest{d}{-000}{-000}{-000}{-000}{\glqqo}{-050}{-000}{-000}
\kerntest{e}{-000}{-000}{-000}{-000}{\glqqo}{\ogrqq}{-000}{-000}
\kerntest{f}{-000}{-000}{-000}{-000}{\glqqh}{+030}{-000}{+100}
\kerntest{g}{-000}{-000}{-000}{-000}{+050}{-050}{-000}{+050}
\kerntest{h}{-050}{-000}{-000}{-000}{\glqqh}{\hgrqq}{+050}{-000}
\kerntest{i}{-000}{-000}{-000}{-000}{\glqqh}{-050}{+050}{-000}
\kerntest{j}{-000}{-000}{-000}{-000}{+100}{-050}{+050}{-000}
\kerntest{k}{-000}{-000}{-000}{-000}{\glqqh}{-050}{+050}{+050}
\kerntest{l}{-000}{-000}{-000}{-000}{\glqqh}{-070}{+050}{-000}
\kerntest{m}{-000}{-000}{-000}{-000}{\glqqh}{\hgrqq}{+050}{-000}
\kerntest{n}{-000}{-000}{-000}{-000}{\glqqh}{\hgrqq}{+050}{-000}
\kerntest{o}{-000}{-000}{-000}{-000}{\glqqo}{\ogrqq}{-000}{-000}
\kerntest{p}{-000}{-000}{-000}{-000}{+050}{\ogrqq}{+050}{-000}
\kerntest{q}{-000}{-000}{-000}{-000}{\glqqo}{-050}{-000}{-000}
\kerntest{r}{-000}{-000}{-000}{-000}{\glqqh}{-050}{+050}{+050}
\kerntest{s}{-000}{-000}{-000}{-000}{+050}{-050}{-000}{+030}
\kerntest{t}{-000}{-000}{-000}{-000}{-000}{-050}{+050}{-000}
\kerntest{u}{-000}{-000}{-000}{-000}{-000}{-100}{+050}{-000}
\kerntest{v}{-000}{-000}{-000}{-000}{-050}{-000}{+050}{+050}
\kerntest{w}{-000}{-000}{-000}{-000}{-050}{-000}{+050}{+050}
\kerntest{x}{-000}{-000}{-000}{-000}{\glqqh}{-000}{+050}{+050}
\kerntest{y}{-000}{-000}{-000}{-000}{+050}{-000}{+050}{+050}
\kerntest{z}{-000}{-000}{-000}{-000}{\glqqh}{-050}{-000}{-000}
\kerntest{ä}{-000}{-000}{-000}{-000}{\glqqo}{-100}{-000}{-000}
\kerntest{ö}{-000}{-000}{-000}{-000}{\glqqo}{\ogrqq}{-000}{-000}
\kerntest{ü}{-000}{-000}{-000}{-000}{-000}{-100}{+050}{-000}
\kerntest{ß}{-000}{+050}{-000}{-000}{\glqqh}{-050}{+050}{+050}
\end{tabular}
\end{twocolumn}

\bigskip
Description:
\medskip

\small
\begin{tabular}{@{}ll}
\hline
Guill.\ Ger. & Guillemets as used in German texts \\
Guill.\ Fren. & Guillemets as used in French texts \\
Quot.\ Ger. & Quotations as used in German texts \\
Quot.\ Engl. & Quotations as used in English texts \\
\hline
Orig.& Original spacing by Latin Modern font \\
Kern.& Newly kerned by me \\
\hline
\end{tabular}

\end{document}

%%% Local Variables: 
%%% mode: latex
%%% TeX-master: t
%%% End: