~ubuntu-branches/ubuntu/edgy/tipa/edgy

« back to all changes in this revision

Viewing changes to sty/t3enc.def

  • Committer: Bazaar Package Importer
  • Author(s): Rafael Laboissiere
  • Date: 2003-12-11 10:50:58 UTC
  • Revision ID: james.westby@ubuntu.com-20031211105058-vq8ttydhah3hdzq1
Tags: upstream-1.2
ImportĀ upstreamĀ versionĀ 1.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
% t3enc.def --- version 1.1
 
2
% Copyright 2002 FUKUI Rei
 
3
%
 
4
% This program may be distributed and/or modified under the
 
5
% conditions of the LaTeX Project Public License, either version 1.2
 
6
% of this license or (at your option) any later version.
 
7
% The latest version of this license is in
 
8
%   http://www.latex-project.org/lppl.txt
 
9
% and version 1.2 or later is part of all distributions of LaTeX 
 
10
% version 1999/12/01 or later.
 
11
%
 
12
% This program consists of all files listed in Manifest.txt.
 
13
%
 
14
% 2001/10/12: The following bugs have been fixed:
 
15
%   \textsubgrave, \textsubacute, \textsubcircum corrected (Peter Zimmermann)
 
16
%   modified to be reloadable (Dominique Unruh)
 
17
%
 
18
% 2001/12/31: Encoding and font shapes modified:
 
19
%   \textlhti (\char'245), \textnrleg (\char'256) moved to tipx.
 
20
%   \textcrlambda (\char'253), \textlhtlongy (\char'266) added.
 
21
%   The above change affects the encoding for the characters with
 
22
%   code nos. '245--'266. Macro \textcrlambda deleted.
 
23
%   \textgravemacron added.
 
24
%   \textscq (\char'261), \textrectangle (\char'277) moved to tipx.
 
25
%   \texthtrtaild (\char'243), the tone letter stem (\char'277) added.
 
26
%
 
27
%   Symbol shapes changed for \textpipe, \textdoublepipe, \textdoublebarpipe
 
28
%   (changed to a descender; old versions moved to tipx), \textdownstep,
 
29
%   \textupstep (changed to a kind of superscript symbols; old versions
 
30
%   move to tipx with new names \textdownfullarrow, \textupfullarrows),
 
31
%   \textbullseye (updated; old version moved to tipx),
 
32
%   \texthtbardotlessj (updated; old version moved to tipx).
 
33
%
 
34
% 2002/08/05: The following four commands added:
 
35
%   \texthighrise, \textlowrise, \textrisefall, \textfallrise
 
36
%
 
37
% Fukui Rei
 
38
%
 
39
\ProvidesFile{t3enc.def}[2001/12/31 T3 encoding]
 
40
\DeclareFontEncoding{T3}{}{}
 
41
\DeclareFontSubstitution{T3}{cmr}{m}{n}
 
42
 
 
43
% Symbols assigned to the area of numerals.
 
44
 
 
45
\DeclareTextSymbol\textbaru{T3}{48}              % Barred U
 
46
\DeclareTextSymbol\textbari{T3}{49}              % Barred I
 
47
\DeclareTextSymbol\textturnv{T3}{50}             % Turned V
 
48
\DeclareTextSymbol\textrevepsilon{T3}{51}        % Reversed Epsilon
 
49
\DeclareTextSymbol\textturnh{T3}{52}             % Turned H
 
50
\DeclareTextSymbol\textturna{T3}{53}             % Turned A
 
51
\DeclareTextSymbol\textturnscripta{T3}{54}       % Turned Script A
 
52
\DeclareTextSymbol\textramshorns{T3}{55}         % Ram's Horns
 
53
\DeclareTextSymbol\textbaro{T3}{56}              % Barred O
 
54
\DeclareTextSymbol\textreve{T3}{57}              % Reversed E
 
55
 
 
56
% Symbol assigned to `@'
 
57
 
 
58
\DeclareTextSymbol\textschwa{T3}{64}             % Schwa
 
59
 
 
60
% Symbols assigned to the area of uppercase letters.
 
61
 
 
62
\DeclareTextSymbol\textscripta{T3}{65}           % Script A
 
63
\DeclareTextSymbol\textbeta{T3}{66}              % Beta
 
64
\DeclareTextSymbol\textctc{T3}{67}               % Curly-tail C
 
65
% Eth(68) is defined as \dh, not as \texteth.
 
66
\DeclareTextSymbol\textepsilon{T3}{69}           % Epsilon
 
67
\DeclareTextSymbol\textphi{T3}{70}               % Phi
 
68
\DeclareTextSymbol\textgamma{T3}{71}             % Gamma
 
69
\DeclareTextSymbol\texthth{T3}{72}               % Hooktop H
 
70
\DeclareTextSymbol\textsci{T3}{73}               % Small Capital I
 
71
\DeclareTextSymbol\textctj{T3}{74}               % Curly-tail J
 
72
\DeclareTextSymbol\textinvscr{T3}{75}            % Inverted Small Capital R
 
73
\DeclareTextSymbol\textturny{T3}{76}             % Turned Y
 
74
\DeclareTextSymbol\textltailm{T3}{77}            % Left-tail M (at right)
 
75
% Eng(78) is defined as \ng, not as \texteng.
 
76
\DeclareTextSymbol\textopeno{T3}{79}             % Open O
 
77
\DeclareTextSymbol\textglotstop{T3}{80}          % Glottal Stop
 
78
\DeclareTextSymbol\textrevglotstop{T3}{81}       % Reversed Glottal Stop
 
79
\DeclareTextSymbol\textfishhookr{T3}{82}         % Fish-hook R
 
80
\DeclareTextSymbol\textesh{T3}{83}               % Esh
 
81
\DeclareTextSymbol\texttheta{T3}{84}             % Theta
 
82
\DeclareTextSymbol\textupsilon{T3}{85}           % Upsilon
 
83
\DeclareTextSymbol\textscriptv{T3}{86}           % Script V
 
84
\DeclareTextSymbol\textturnm{T3}{87}             % Turned M
 
85
\DeclareTextSymbol\textchi{T3}{88}               % Chi
 
86
\DeclareTextSymbol\textscy{T3}{89}               % Small Capital Y
 
87
\DeclareTextSymbol\textyogh{T3}{90}              % Yogh
 
88
 
 
89
% Symbols assigned to the area of lowercase letters.
 
90
 
 
91
\DeclareTextSymbol\textscriptg{T3}{103}
 
92
 
 
93
% Symbol assigned to "
 
94
 
 
95
\DeclareTextSymbol\textprimstress{T3}{34}        % Vertical Stroke (Superior)
 
96
 
 
97
% Symbols assigned to : and ;
 
98
 
 
99
\DeclareTextSymbol\textlengthmark{T3}{58}        % Length Mark
 
100
\DeclareTextSymbol\texthalflength{T3}{59}        % Half-length Mark
 
101
 
 
102
% Symbol assigned to |
 
103
 
 
104
\DeclareTextSymbol\textpipe{T3}{124}             % Pipe
 
105
 
 
106
% Symbols assigned to 224 through 255 (octal '340 -- '377)
 
107
 
 
108
\DeclareTextSymbol\textscb{T3}{224}              % Small Capital B
 
109
\DeclareTextSymbol\texthtb{T3}{225}              % Hooktop B
 
110
\DeclareTextSymbol\texthtd{T3}{226}              % Hooktop D
 
111
\DeclareTextSymbol\textrtaild{T3}{227}           % Right-tail D
 
112
\DeclareTextSymbol\texthtg{T3}{228}              % Hooktop G
 
113
\DeclareTextSymbol\textscg{T3}{229}              % Small Capital G
 
114
\DeclareTextSymbol\textcrh{T3}{232}              % Crossed H
 
115
\DeclareTextSymbol\textbardotlessj{T3}{233}      % Barred Dotless J
 
116
\DeclareTextSymbol\texthtbardotlessj{T3}{234}    % Hooktop Barred Dotless J
 
117
\DeclareTextSymbol\textltilde{T3}{235}           % L with Tilde
 
118
\DeclareTextSymbol\textbeltl{T3}{236}            % Belted L
 
119
\DeclareTextSymbol\textrtaill{T3}{237}           % Right-tail L
 
120
\DeclareTextSymbol\textturnmrleg{T3}{238}        % Turned M, Right Leg
 
121
\DeclareTextSymbol\textrtailn{T3}{239}           % Right-tail N
 
122
\DeclareTextSymbol\textscn{T3}{240}              % Small Capital N
 
123
\DeclareTextSymbol\textltailn{T3}{241}           % Left-tail N (at left)
 
124
\DeclareTextSymbol\textbullseye{T3}{242}         % Bull's Eye
 
125
\DeclareTextSymbol\textrtailr{T3}{243}           % Right-tail R
 
126
\DeclareTextSymbol\textturnr{T3}{244}            % Turned R
 
127
\DeclareTextSymbol\textturnrrtail{T3}{245}       % Turned R, Right Tail
 
128
\DeclareTextSymbol\textscr{T3}{246}              % Small Capital R
 
129
\DeclareTextSymbol\textrtails{T3}{249}           % Right-tail S (at left)
 
130
\DeclareTextSymbol\textrtailt{T3}{250}           % Right-tail T
 
131
\DeclareTextSymbol\textturnw{T3}{251}            % Turned W
 
132
\DeclareTextSymbol\textrtailz{T3}{252}           % Right-tail Z
 
133
\DeclareTextSymbol\textctz{T3}{253}              % Curly-tail Z
 
134
\DeclareTextSymbol\textthorn{T3}{254}            % Thorn
 
135
\DeclareTextSymbol\texthvlig{T3}{255}            % H-V Ligature
 
136
 
 
137
% Symbols assigned to 192 through 223 (octal '300 -- '337)
 
138
 
 
139
\DeclareTextSymbol\textsca{T3}{192}              % Small Capital A
 
140
\DeclareTextSymbol\texthtc{T3}{193}              % Hooktop C
 
141
\DeclareTextSymbol\textstretchc{T3}{194}         % Stretched C
 
142
\DeclareTextSymbol\textdyoghlig{T3}{195}         % D-Yogh Ligature
 
143
\DeclareTextSymbol\textrhookschwa{T3}{196}       % Right-hook Schwa
 
144
\DeclareTextSymbol\textcloseepsilon{T3}{197}     % Closed Epsilon
 
145
\DeclareTextSymbol\textcloserevepsilon{T3}{198}  % Closed Reversed Epsilon
 
146
\DeclareTextSymbol\textrhookrevepsilon{T3}{199}  % Right-hook Reversed Epsilon
 
147
\DeclareTextSymbol\textbabygamma{T3}{200}        % Baby Gamma
 
148
\DeclareTextSymbol\texthtscg{T3}{201}            % Hooktop Small Capital G
 
149
\DeclareTextSymbol\texththeng{T3}{202}           % Hooktop Heng
 
150
\DeclareTextSymbol\textsch{T3}{203}              % Small Capital H
 
151
\DeclareTextSymbol\textiota{T3}{204}             % Iota
 
152
\DeclareTextSymbol\textObardotlessj{T3}{205}     % Old Barred Dotless J
 
153
\DeclareTextSymbol\texthtk{T3}{206}              % Hooktop K
 
154
\DeclareTextSymbol\textscl{T3}{207}              % Small Capital L
 
155
\DeclareTextSymbol\textlyoghlig{T3}{208}         % L-Yogh Ligature
 
156
\DeclareTextSymbol\textcloseomega{T3}{209}       % Closed Omega
 
157
\DeclareTextSymbol\texthtp{T3}{210}              % Hooktop P
 
158
\DeclareTextSymbol\texthtq{T3}{211}              % Hooktop Q
 
159
\DeclareTextSymbol\textlonglegr{T3}{212}         % Long-leg R
 
160
\DeclareTextSymbol\textturnlonglegr{T3}{213}     % Turned Long-leg R
 
161
\DeclareTextSymbol\texthtt{T3}{214}              % Hooktop T
 
162
\DeclareTextSymbol\textscoelig{T3}{215}          % Small Capital O-E Ligature
 
163
\DeclareTextSymbol\textturnt{T3}{216}            % Turned T
 
164
\DeclareTextSymbol\textteshlig{T3}{217}          % T-Esh Ligature
 
165
\DeclareTextSymbol\textscu{T3}{218}              % Small Capital U
 
166
\DeclareTextSymbol\textinvglotstop{T3}{219}      % Inverted Glottal Stop
 
167
\DeclareTextSymbol\textbarglotstop{T3}{220}      % Barred Glottal Stop
 
168
\DeclareTextSymbol\textbarrevglotstop{T3}{221}   % Barred Reversed Glottal Stop
 
169
\DeclareTextSymbol\textcommatailz{T3}{222}       % Comma-tail Z
 
170
\DeclareTextSymbol\textwynn{T3}{223}             % Wynn
 
171
 
 
172
% Symbols assigned to 160 through 191 (octal '240 -- '277)
 
173
 
 
174
\DeclareTextSymbol\textcrb{T3}{160}              % Crossed B
 
175
\DeclareTextSymbol\textcrd{T3}{161}              % Crossed D
 
176
\DeclareTextSymbol\textctd{T3}{162}              % Curly-tail D
 
177
\DeclareTextSymbol\texthtrtaild{T3}{163}         % Hooktop right-tail D
 
178
\DeclareTextSymbol\textsce{T3}{164}              % Small Capital E
 
179
\DeclareTextSymbol\textg{T3}{165}                % Text G
 
180
\DeclareTextSymbol\textlhtlongi{T3}{166}         % Left-hooktop Long I
 
181
\DeclareTextSymbol\textvibyi{T3}{167}            % Viby I
 
182
\DeclareTextSymbol\textscj{T3}{168}              % Small Capital J
 
183
\DeclareTextSymbol\textturnk{T3}{169}            % Turned K
 
184
\DeclareTextSymbol\textbarl{T3}{170}             % Barred L
 
185
\DeclareTextSymbol\textlambda{T3}{171}           % Lambda
 
186
\DeclareTextSymbol\textcrlambda{T3}{172}         % Crossed Lambda %%ADD
 
187
\DeclareTextSymbol\textOlyoghlig{T3}{173}        % Old L-Yogh Ligature
 
188
\DeclareTextSymbol\textctn{T3}{174}              % Curly-tail N
 
189
\DeclareTextSymbol\textturncelig{T3}{175}        % Turned C-E Ligature
 
190
\DeclareTextSymbol\textomega{T3}{176}            % Omega
 
191
\DeclareTextSymbol\textscomega{T3}{177}          % Small Capital Omega
 
192
\DeclareTextSymbol\textctesh{T3}{178}            % Curly-tail Esh
 
193
\DeclareTextSymbol\textlhookt{T3}{179}           % Left-hook T
 
194
\DeclareTextSymbol\textctt{T3}{180}              % Curly-tail T
 
195
\DeclareTextSymbol\texttslig{T3}{181}            % T-S Ligature
 
196
\DeclareTextSymbol\textlhtlongy{T3}{182}         % Left-hooktop Long Y %%ADD
 
197
\DeclareTextSymbol\textvibyy{T3}{183}            % Viby Y
 
198
\DeclareTextSymbol\textctyogh{T3}{184}           % Curly-tail Yogh
 
199
\DeclareTextSymbol\textrevyogh{T3}{185}          % Reversed Yogh
 
200
\DeclareTextSymbol\textsoftsign{T3}{186}         % Soft Sign
 
201
\DeclareTextSymbol\texthardsign{T3}{187}         % Hard Sign
 
202
\DeclareTextSymbol\textraiseglotstop{T3}{188}    % Raised Glottal Stop
 
203
\DeclareTextSymbol\textlptr{T3}{189}             % Left Pointer
 
204
\DeclareTextSymbol\textrptr{T3}{190}             % Right Pointer
 
205
\DeclareTextSymbol\texttoneletterstem{T3}{191}   % Tone letter stem
 
206
 
 
207
% Symbols assigned to 32, 35, 36, 37 (octal '040, '043, '044, '045)
 
208
 
 
209
\DeclareTextSymbol\textceltpal{T3}{32}           % Celtic Palatalization Mark
 
210
\DeclareTextSymbol\texthooktop{T3}{35}           % Hooktop
 
211
\DeclareTextSymbol\textrthook{T3}{36}            % Right Hook
 
212
\DeclareTextSymbol\textpalhook{T3}{37}           % Palatalization Hook
 
213
 
 
214
% Symbols assigned to 92, 94, 95 (octal '134, '136, '137)
 
215
 
 
216
\DeclareTextSymbol\textrevapostrophe{T3}{92}     % Reversed Apostrophe
 
217
\DeclareTextSymbol\textcorner{T3}{94}            % Corner
 
218
\DeclareTextSymbol\textopencorner{T3}{95}        % Open Corner
 
219
 
 
220
% Symbols assigned to 123, 125, 126, 127 (octal '173, '175, '176, '177)
 
221
 
 
222
\DeclareTextSymbol\textdoublepipe{T3}{123}       % Double Pipe
 
223
\DeclareTextSymbol\textdoublebarpipe{T3}{125}    % Double-barred Pipe
 
224
\DeclareTextSymbol\textrhoticity{T3}{126}        % Rhoticity
 
225
\DeclareTextSymbol\textsecstress{T3}{127}        % Vertical Stroke (Inferior)
 
226
 
 
227
% Symbols assigned to 146 through 151 (octal '222 -- '227)
 
228
 
 
229
\DeclareTextSymbol\textvertline{T3}{146}         % Vertical Line
 
230
\DeclareTextSymbol\textdoublevertline{T3}{147}   % Double Vertical Line
 
231
\DeclareTextSymbol\textdownstep{T3}{148}         % Down Arrow (Downstep)
 
232
\DeclareTextSymbol\textupstep{T3}{149}           % Up Arrow (Upstep)
 
233
\DeclareTextSymbol\textglobrise{T3}{150}         % Upward Diagonal Arrow
 
234
\DeclareTextSymbol\textglobfall{T3}{151}         % Downward Diagonal Arrow
 
235
 
 
236
% The following definitions are common to the T1 encoding.
 
237
 
 
238
\DeclareTextSymbol{\i}{T3}{25}
 
239
\DeclareTextSymbol{\j}{T3}{26}
 
240
\DeclareTextSymbol{\dh}{T3}{68}
 
241
\DeclareTextSymbol{\ng}{T3}{78}
 
242
\DeclareTextSymbol{\OE}{T3}{215}
 
243
\DeclareTextSymbol{\ae}{T3}{230}
 
244
\DeclareTextSymbol{\oe}{T3}{247}
 
245
\DeclareTextSymbol{\o}{T3}{248}
 
246
\DeclareTextSymbol{\th}{T3}{254}
 
247
 
 
248
% Accnets and diacritics
 
249
 
 
250
\providecommand{\tipaencoding}{\fontencoding{T3}\selectfont}
 
251
 
 
252
\@ifundefined{upperaccent}{%
 
253
% The following commands are same as the ones in `exaccent.sty'.
 
254
{\slshape\xdef\@slshapename{\f@shape}}
 
255
{\itshape\xdef\@itshapename{\f@shape}}
 
256
 
 
257
\providecommand\upperaccent{\@ifnextchar[{\upper@accent a\empty}%
 
258
  {\upper@accent a\empty[\z@]}}
 
259
\providecommand\Upperaccent{\@ifnextchar[{\upper@accent b\empty}%
 
260
  {\upper@accent b\empty[\z@]}}
 
261
\providecommand\loweraccent{\@ifnextchar[{\lower@accent a\empty}%
 
262
  {\lower@accent a\empty[\z@]}}
 
263
\providecommand\Loweraccent{\@ifnextchar[{\lower@accent b\empty}%
 
264
  {\lower@accent b\empty[\z@]}}
 
265
 
 
266
\def\upper@accent#1#2[#3]#4#5{{\leavevmode
 
267
  \setbox\z@\hbox{#5}\setbox\@ne\hbox{#2%
 
268
    \if a#1\char#4\else#4\fi}%
 
269
  \ifx\empty#5\empty\box\@ne\else
 
270
  \@getaccshift \let\c@lcshift\@pshift
 
271
  \dimen\z@\ht\@ne
 
272
  \ifdim\ht\@ne>1ex \advance\dimen\z@ -1ex \else
 
273
  \ifdim\ht\@ne=\z@ \dimen\z@\dp\@ne \fi\fi
 
274
  \vbox{\hsize\wd\z@\offinterlineskip
 
275
    \hb@xt@\z@{\@accshift{#3}\hb@xt@\wd\z@{%
 
276
     \hss\vbox to \dimen\z@{\hbox{\box\@ne}\vss}\hss}\hss}
 
277
    \kern#3
 
278
    \hbox{#5}}\fi}}
 
279
 
 
280
\def\lower@accent#1#2[#3]#4#5{{\leavevmode
 
281
  \setbox\z@\hbox{#5}\setbox\@ne\hbox{#2%
 
282
    \if a#1\char#4\else#4\fi}%
 
283
  \ifx\empty#5\empty\box\@ne\else
 
284
  \@getaccshift \let\c@lcshift\s@bshift
 
285
  \dimen\z@\ht\@ne
 
286
  \ifdim\ht\@ne>1ex \advance\dimen\z@ -1.1ex \else
 
287
  \ifdim\ht\@ne=\z@ \dimen\z@\dp\@ne \fi\fi
 
288
  \vtop{\hsize\wd\z@\offinterlineskip
 
289
    \hbox{#5}
 
290
    \kern#3
 
291
    \hbox{\@accshift{#3}\hb@xt@\wd\z@{%
 
292
      \hss\vbox to \dimen\z@{\hbox{\box\@ne}\vss}\hss}}}\fi}}
 
293
 
 
294
\providecommand\@getaccshift{\def\@accshift##1{}%
 
295
  \ifx\f@shape\@slshapename\let\@accshift\@accshiftsl\fi
 
296
  \ifx\f@shape\@itshapename\let\@accshift\@accshiftsl\fi}
 
297
 
 
298
\providecommand\@accshiftsl[1]{\c@lcshift{#1}\kern-.16667\dimen\@ne}
 
299
 
 
300
\providecommand\@pshift[1]{%
 
301
  \dimen\@ne-\ht\z@          % get height of the box to be accented
 
302
  \advance\dimen\@ne -#1%    % add margin between the letter and accent
 
303
  \ifdim\ht\@ne>1ex
 
304
    \advance\dimen\@ne 1ex\else
 
305
  \ifdim\ht\@ne=\z@
 
306
    \advance\dimen\@ne -\dp\@ne\fi\fi}
 
307
    
 
308
\providecommand\s@bshift[1]{%
 
309
  \dimen\@ne\dp\z@                % get depth of the box to be accented
 
310
  \ifdim\ht\@ne>\z@
 
311
    \advance\dimen\@ne \ht\@ne\fi % add ht of the accent
 
312
  \ifdim\ht\@ne>1ex
 
313
    \advance\dimen\@ne #1\fi}     % add margin between the letter and accent
 
314
}{}
 
315
 
 
316
\providecommand\tipaupperaccent{\@ifnextchar[{\upper@accent a\tipaencoding}%
 
317
  {\upper@accent a\tipaencoding[\z@]}}
 
318
\providecommand\tipaUpperaccent{\@ifnextchar[{\upper@accent b\tipaencoding}%
 
319
  {\upper@accent b\tipaencoding[\z@]}}
 
320
\providecommand\tipaloweraccent{\@ifnextchar[{\lower@accent a\tipaencoding}%
 
321
  {\lower@accent a\tipaencoding[\z@]}}
 
322
\providecommand\tipaLoweraccent{\@ifnextchar[{\lower@accent b\tipaencoding}%
 
323
  {\lower@accent b\tipaencoding[\z@]}}
 
324
 
 
325
%
 
326
% Macros for combining glyphs
 
327
%
 
328
\providecommand\ipaclap[2]{{\setbox\z@\hbox{#1}\dimen\z@\wd\z@
 
329
  \setbox\z@\hbox{#2}\ifdim\wd\z@>\dimen\z@ \dimen\z@\wd\z@ \fi
 
330
  \leavevmode \hb@xt@\dimen\z@{%
 
331
    \hb@xt@\dimen\z@{\hss#1\hss}\hss\hb@xt@\dimen\z@{\hss#2\hss}}}}
 
332
 
 
333
%
 
334
%  \ipabar
 
335
%  #1 character to be barred
 
336
%  #2 height of bar position (dimen)
 
337
%  #3 bar width (scaling factor to the width of #1)
 
338
%  #4 left kern added to the bar (scaling factor to the width of #1)
 
339
%  #5 right kern added to the bar (scaling factor to the width of #1)
 
340
%
 
341
\providecommand\ipabar[5]{{\setbox\z@\hbox{#1}%
 
342
  \@getaccshift \let\c@lcshift\b@rshift
 
343
  \ifx\f@series\@bfseriesname\let\@halfbar\@bfhalfbar\else
 
344
  \ifx\f@family\@sffamilyname\let\@halfbar\@sfhalfbar\fi\fi
 
345
  \ooalign{\hidewidth#1\hidewidth\crcr
 
346
    \raise#2\hbox{%
 
347
      \@accshift{-#2}%
 
348
      \kern\@sidegap
 
349
      \ifx\empty#4\empty\else\kern#4\wd\z@\fi
 
350
      \vrule \@height\@halfbar \@depth\@halfbar \@width #3\wd\z@
 
351
      \ifx\empty#5\empty\else\kern#5\wd\z@\fi
 
352
      \kern\@sidegap}}}}
 
353
 
 
354
{\bfseries\xdef\@bfseriesname{\f@series}}
 
355
{\sffamily\xdef\@sffamilyname{\f@family}}
 
356
 
 
357
\providecommand\b@rshift[1]{\dimen\@ne#1}
 
358
\providecommand\@halfbar{.0355ex}     % 1/2 bar breadth (1/2bar# of cmr10)
 
359
\providecommand\@bfhalfbar{.053125ex} % 1/2 bar breadth (1/2bar# of cmbx10)
 
360
\providecommand\@sfhalfbar{.065625ex} % 1/2 bar breadth (1/2bar# of cmss10)
 
361
\providecommand\@sidegap{.027778em}
 
362
 
 
363
%
 
364
% Accents and diacritics
 
365
%
 
366
\DeclareTextCommand\textpolhook{T3}[1]%
 
367
  {\tipaloweraccent{12}{#1}}                     % Polish Hook
 
368
\DeclareTextCommand\textdoublegrave{T3}[1]%
 
369
  {\tipaupperaccent{13}{#1}}                     % Double Grave Accent
 
370
\DeclareTextCommand\textroundcap{T3}[1]%
 
371
  {\tipaupperaccent{16}{#1}}                     % Round Cap
 
372
\DeclareTextCommand\textvbaraccent{T3}[1]%
 
373
  {\tipaupperaccent{156}{#1}}                    % Vertical Bar Accent
 
374
\DeclareTextCommand\textdoublevbaraccent{T3}[1]%
 
375
  {\tipaupperaccent{157}{#1}}                    % Double Vertical Bar Accent
 
376
 
 
377
\DeclareTextCommand\textsubgrave{T3}[1]%
 
378
  {\loweraccent[.2ex]{14}{#1}}                   % Subscript Grave Accent
 
379
\DeclareTextCommand\textsubacute{T3}[1]%
 
380
  {\loweraccent[.2ex]{15}{#1}}                   % Subscript Acute Accent
 
381
\DeclareTextCommand\textsubcircum{T3}[1]%
 
382
  {\loweraccent[.2ex]{2}{#1}}                    % Subscript Circumflex
 
383
\DeclareTextCommand\textsubtilde{T3}[1]%
 
384
  {\loweraccent[.3ex]{3}{#1}}                    % Subscript Tilde
 
385
\DeclareTextCommand\textsubumlaut{T3}[1]%
 
386
  {\loweraccent[.3ex]{4}{#1}}                    % Subscript Umlaut
 
387
\DeclareTextCommand\textsubring{T3}[1]%
 
388
  {\loweraccent[.3ex]{6}{#1}}                    % Subscript Ring
 
389
\DeclareTextCommand\textsubwedge{T3}[1]%
 
390
  {\loweraccent[.3ex]{7}{#1}}                    % Subscript Wedge
 
391
\DeclareTextCommand\textsubbar{T3}[1]%
 
392
  {\loweraccent[.3ex]{9}{#1}}                    % Subscript Bar
 
393
\DeclareTextCommand\textsubdot{T3}[1]%
 
394
  {\loweraccent[.3ex]{10}{#1}}                   % Subscript Dot
 
395
 
 
396
\DeclareTextCommand\textsubbridge{T3}[1]%
 
397
  {\tipaloweraccent{17}{#1}}                     % Subscript Bridge
 
398
\DeclareTextCommand\textinvsubbridge{T3}[1]%
 
399
  {\tipaloweraccent{18}{#1}}                     % Inverted Subscript Bridge
 
400
\DeclareTextCommand\textsubsquare{T3}[1]%
 
401
  {\tipaloweraccent{19}{#1}}                     % Subscript Square
 
402
\DeclareTextCommand\textsubrhalfring{T3}[1]%
 
403
  {\tipaloweraccent[.2ex]{20}{#1}}               % Subscript Right Half-ring
 
404
\DeclareTextCommand\textsublhalfring{T3}[1]%
 
405
  {\tipaloweraccent[.2ex]{21}{#1}}               % Subscript Left Half-ring
 
406
\DeclareTextCommand\textsubw{T3}[1]%
 
407
  {\tipaloweraccent{22}{#1}}                     % Subscript W
 
408
\DeclareTextCommand\textoverw{T3}[1]%
 
409
  {\tipaupperaccent[.2ex]{22}{#1}}               % Over-W
 
410
\DeclareTextCommand\textseagull{T3}[1]%
 
411
  {\tipaloweraccent{23}{#1}}                     % Seagull
 
412
\DeclareTextCommand\textovercross{T3}[1]%
 
413
  {\tipaupperaccent{24}{#1}}                     % Over-cross
 
414
\DeclareTextCommand\textsubplus{T3}[1]%
 
415
  {\tipaloweraccent[.2ex]{27}{#1}}               % Subscript Plus
 
416
\DeclareTextCommand\textraising{T3}[1]%
 
417
  {\tipaloweraccent[.2ex]{28}{#1}}               % Raising Sign
 
418
\DeclareTextCommand\textlowering{T3}[1]%
 
419
  {\tipaloweraccent[.25ex]{29}{#1}}              % Lowering Sign
 
420
\DeclareTextCommand\textadvancing{T3}[1]%
 
421
  {\tipaloweraccent[.2ex]{30}{#1}}               % Advancing Sign
 
422
\DeclareTextCommand\textretracting{T3}[1]%
 
423
  {\tipaloweraccent[.2ex]{31}{#1}}               % Retracting Sign
 
424
 
 
425
\DeclareTextCommand\textsubarch{T3}[1]%
 
426
  {\tipaloweraccent[.2ex]{16}{#1}}               % Subscript Arch
 
427
\DeclareTextCommand\textsyllabic{T3}[1]%
 
428
  {\tipaloweraccent[.15ex]{34}{#1}}              % Syllabicity Mark
 
429
\DeclareTextCommand\textsuperimposetilde{T3}[1]%
 
430
  {\ipaclap{#1}{\lower1ex\hbox{\tipaencoding\char38}}} % Superimposed Tilde
 
431
 
 
432
\DeclareTextCommand\textmidacute{T3}[1]%
 
433
  {\tipaupperaccent{152}{#1}}                    % Macron-Acute Ligature
 
434
\DeclareTextCommand\textgravemid{T3}[1]%
 
435
  {\tipaupperaccent{153}{#1}}                    % Grave-Macron Ligature
 
436
\DeclareTextCommand\textgravecircum{T3}[1]%
 
437
  {\tipaupperaccent{154}{#1}}                    % Grave-Wedge Ligature
 
438
\DeclareTextCommand\textcircumacute{T3}[1]%
 
439
  {\tipaupperaccent{155}{#1}}                    % Circumflex-Acute Ligature
 
440
 
 
441
\DeclareTextCommand\textbottomtiebar{T3}[1]%
 
442
  {\loweraccent[.3ex]{60}{#1}}                   % Bottom Tie Bar
 
443
\DeclareTextCommand\texttoptiebar{T3}[1]%
 
444
  {\upperaccent[-.1ex]{62}{#1}}                  % Top Tie Bar
 
445
 
 
446
\DeclareTextCommand\textgravedot{T3}[1]%
 
447
  {\tipaupperaccent{158}{#1}}                    % Grave Dot Accent
 
448
\DeclareTextCommand\textdotacute{T3}[1]%
 
449
  {\tipaupperaccent{159}{#1}}                    % Dot Acute Accent
 
450
\DeclareTextCommand\textdotbreve{T3}[1]%
 
451
  {\tipaupperaccent[-.3ex]{10}%
 
452
    {\tipaupperaccent[-.03ex]{8}{#1}}}           % Dot Breve Accent
 
453
\DeclareTextCommand\textacutemacron{T3}[1]%
 
454
  {\tipaupperaccent[-.15ex]{1}%
 
455
    {\tipaupperaccent[-.03ex]{9}{#1}}}           % Acute Macron Accent
 
456
\DeclareTextCommand\textgravemacron{T3}[1]%
 
457
  {\tipaupperaccent[-.15ex]{0}%
 
458
    {\tipaupperaccent[-.03ex]{9}{#1}}}           % Grave Macron Accent
 
459
\DeclareTextCommand\textacutewedge{T3}[1]%
 
460
  {\tipaupperaccent[-.2ex]{1}%
 
461
    {\tipaupperaccent[-.03ex]{7}{#1}}}           % Acute Wedge Accent
 
462
\DeclareTextCommand\textcircumdot{T3}[1]%
 
463
  {\tipaupperaccent[-.2ex]{2}%
 
464
    {\tipaupperaccent[-.1ex]{10}{#1}}}           % Circnumflex Dot Accent
 
465
\DeclareTextCommand\texttildedot{T3}[1]%
 
466
  {\tipaupperaccent[-.15ex]{3}%
 
467
    {\tipaupperaccent[-.1ex]{10}{#1}}}           % Tilde Dot Accent
 
468
\DeclareTextCommand\textringmacron{T3}[1]%
 
469
  {\tipaupperaccent[-.05ex]{6}%
 
470
    {\tipaupperaccent[-.03ex]{9}{#1}}}           % Ring Macron Accent
 
471
\DeclareTextCommand\textbrevemacron{T3}[1]%
 
472
  {\tipaupperaccent[-.05ex]{8}%
 
473
    {\tipaupperaccent[-.03ex]{9}{#1}}}           % Breve Macron Accent
 
474
\DeclareTextCommand\textdotbreve{T3}[1]%
 
475
  {\tipaupperaccent[-.3ex]{10}%
 
476
    {\tipaupperaccent[-.03ex]{8}{#1}}}           % Dot Breve Accent
 
477
 
 
478
%
 
479
% Added on 2002/08/05 (the following four commands)
 
480
%
 
481
\DeclareTextCommand\texthighrise{T3}[1]{\tipaupperaccent{'230}{#1}}
 
482
\DeclareTextCommand\textlowrise{T3}[1]{\tipaupperaccent{'231}{#1}}
 
483
\DeclareTextCommand\textrisefall{T3}[1]{\tipaupperaccent{'232}{#1}}
 
484
\DeclareTextCommand\textfallrise{T3}[1]{\tipaupperaccent{'233}{#1}}
 
485
 
 
486
\providecommand{\@ifacute}[1]{\@ifnextchar'{\@firstoftwo#1}}
 
487
\providecommand{\@ifmacron}[1]{\@ifnextchar={\@firstoftwo#1}}
 
488
\providecommand{\@ifdot}[1]{\@ifnextchar.{\@firstoftwo#1}}
 
489
 
 
490
\DeclareTextCommand{\`}{T3}[0]{\@ifstar{\tipaloweraccent[.2ex]{14}}%
 
491
  {\@ifdot{\textgravedot}{\tipaupperaccent{0}}}}
 
492
\DeclareTextCommand{\'}{T3}[0]{\@ifstar{\tipaloweraccent[.2ex]{15}}%
 
493
  {\@ifmacron{\textacutemacron}{\tipaupperaccent{1}}}}
 
494
\DeclareTextCommand{\^}{T3}[0]{\@ifstar{\tipaloweraccent[.2ex]{2}}%
 
495
  {\@ifdot{\textcircumdot}{\tipaupperaccent{2}}}}
 
496
\DeclareTextCommand{\~}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{3}}%
 
497
  {\@ifdot{\texttildedot}{\tipaupperaccent{3}}}}
 
498
\DeclareTextCommand{\"}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{4}}%
 
499
  {\tipaupperaccent{4}}}
 
500
\DeclareTextCommand{\H}{T3}[0]{\@ifstar{\textdoublegrave}%
 
501
  {\tipaupperaccent{5}}}
 
502
\DeclareTextCommand{\r}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{6}}%
 
503
  {\@ifmacron{\textringmacron}{\tipaupperaccent{6}}}}
 
504
\DeclareTextCommand{\v}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{7}}%
 
505
  {\@ifacute{\textacutewedge}{\tipaupperaccent{7}}}}
 
506
\DeclareTextCommand{\u}{T3}[0]{\@ifstar{\tipaloweraccent[.2ex]{16}}%
 
507
  {\@ifmacron{\textbrevemacron}{\tipaupperaccent{8}}}}
 
508
\DeclareTextCommand{\=}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{9}}%
 
509
  {\tipaupperaccent{9}}}
 
510
\DeclareTextCommand{\.}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{10}}%
 
511
  {\@ifacute{\textdotacute}{\tipaupperaccent{10}}}}
 
512
\DeclareTextCommand{\b}{T3}[0]{\tipaloweraccent[.3ex]{9}}
 
513
\DeclareTextCommand{\c}{T3}[1]{\tipaloweraccent{11}{#1}}
 
514
\DeclareTextCommand{\d}{T3}[0]{\tipaloweraccent[.3ex]{10}}
 
515
\DeclareTextCommand{\t}{T3}[0]{\@ifstar{\tipaloweraccent[.3ex]{60}}%
 
516
  {\tipaupperaccent[-.1ex]{62}}}
 
517
\DeclareTextCommand{\k}{T3}[0]{\textpolhook}
 
518
 
 
519
\DeclareTextComposite{\c}{T3}{c}{231}
 
520
 
 
521
%
 
522
% Symbols made up by TeX macro
 
523
%
 
524
\DeclareTextCommand\textbarb{T3}[0]{%
 
525
  \ipabar{{\tipaencoding b}}{.5ex}{1.1}{}{}}       % Barred B
 
526
\DeclareTextCommand\textbarc{T3}[0]{%
 
527
  \ipabar{{\tipaencoding c}}{.5ex}{.55}{}{.55}}    % Barred C
 
528
\DeclareTextCommand\textbard{T3}[0]{%
 
529
  \ipabar{{\tipaencoding d}}{.5ex}{1.1}{}{.05}}    % Barred D
 
530
\DeclareTextCommand\textbarg{T3}[0]{%
 
531
  \ipabar{{\tipaencoding g}}{.5ex}{1.1}{}{}}       % Barred G
 
532
\DeclareTextCommand\textcrg{T3}[0]{%
 
533
  \ipabar{{\tipaencoding g}}{-.2ex}{.6}{.4}{}}     % Crossed G
 
534
\DeclareTextCommand\textdoublebaresh{T3}[0]{%
 
535
  {\setbox\z@\hbox{\textesh}%
 
536
  \ipabar{\hb@xt@ \wd\z@{\hss\ipabar{{\textesh}}%
 
537
    {.3ex}{1.1}{}{}\hss}}{.75ex}{1.1}{}{}}}        % Double-barred Esh
 
538
\DeclareTextCommand\textcrtwo{T3}[0]{%
 
539
  {\fontencoding{\encodingdefault}\selectfont
 
540
  \ipabar{2}{.6ex}{1.1}{}{}}}                      % Crossed Two
 
541
\DeclareTextCommand\textcrinvglotstop{T3}[0]{%
 
542
  \ipabar{\textinvglotstop}{1.2ex}{.6}{.2}{.3}}    % Crossed Inv. Glottal Stop 
 
543
\DeclareTextCommand\textdoublebarslash{T3}[0]{%
 
544
  {\tipaencoding\ipaclap{=}{/}}}                   % Double-barred Slash
 
545
\DeclareTextCommand\textraisevibyi{T3}[0]{%
 
546
  {\leavevmode
 
547
  \setbox\z@\hbox{\textvibyi}\raise\dp\z@\box\z@}} % Raised Viby I
 
548
 
 
549
%
 
550
% Ligatures made by two symbols combined with an appropriate kerning
 
551
%
 
552
\DeclareTextCommand\textdzlig{T3}[0]{{%
 
553
  \tipaencoding d\kern-.19em z}}             % D-Z Ligature
 
554
\DeclareTextCommand\textdctzlig{T3}[0]{{%
 
555
  \tipaencoding d\kern-.19em\textctz}}       % D-Curly-tail Z Ligature
 
556
\DeclareTextCommand\textctdctzlig{T3}[0]{{%
 
557
  \tipaencoding\textctd\kern-.14em\textctz}} % Curly-tail D-Curly-tail Z Lig.
 
558
\DeclareTextCommand\texttctclig{T3}[0]{{%
 
559
  \tipaencoding t\kern-.17em\textctc}}       % T-Curly-tail C Ligature
 
560
\DeclareTextCommand\textcttctclig{T3}[0]{{%
 
561
  \tipaencoding\textctt\kern-.16em\textctc}} % Curly-tail T-Curly-tail C Lig.
 
562
 
 
563
\endinput