annotate ieicej.cls @ 2:35b71ac6ce17 default tip

update tags
author convert-repo
date Mon, 10 Nov 2008 05:00:42 +0000
parents 685b35adf419
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
685b35adf419 Initial revision
kono
parents:
diff changeset
1 %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
2 %% ieicej.cls (pLaTeX2e)
685b35adf419 Initial revision
kono
parents:
diff changeset
3 %% for the Transactions of the Institute of Electronics, Information
685b35adf419 Initial revision
kono
parents:
diff changeset
4 %% and Communication Engineers
685b35adf419 Initial revision
kono
parents:
diff changeset
5 %% by ULS and Company (former name SATO KOBO), 1999-2003.
685b35adf419 Initial revision
kono
parents:
diff changeset
6 %% E-mail: ieice-div@uls.co.jp, teppei@uls.co.jp
685b35adf419 Initial revision
kono
parents:
diff changeset
7 \NeedsTeXFormat{pLaTeX2e}
685b35adf419 Initial revision
kono
parents:
diff changeset
8 \ProvidesClass{ieicej}
685b35adf419 Initial revision
kono
parents:
diff changeset
9 %%[1999/04/28 v1.0 for Transactions of IEICE]
685b35adf419 Initial revision
kono
parents:
diff changeset
10 %%[1999/07/12 v1.0 new release for Transactions of IEICE]
685b35adf419 Initial revision
kono
parents:
diff changeset
11 %%[2000/11/02 v1.1 for Transactions of IEICE]
685b35adf419 Initial revision
kono
parents:
diff changeset
12 %%[2002/02/12 v1.2 for Transactions of IEICE]
685b35adf419 Initial revision
kono
parents:
diff changeset
13 [2003/10/31 v1.3 for Transactions of IEICE]
685b35adf419 Initial revision
kono
parents:
diff changeset
14
685b35adf419 Initial revision
kono
parents:
diff changeset
15 \newif\if@paper \@papertrue
685b35adf419 Initial revision
kono
parents:
diff changeset
16 \newif\if@letterpaper \@letterpaperfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
17 \newif\if@letter \@letterfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
18 \newif\if@tecrep \@tecrepfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
19
685b35adf419 Initial revision
kono
parents:
diff changeset
20 \DeclareOption{paper}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
21 \gdef\hd@type{論文}\gdef\tl@type{論\hskip1zw 文}\gdef\@type{P}}
685b35adf419 Initial revision
kono
parents:
diff changeset
22 \DeclareOption{invited}{\@papertrue
685b35adf419 Initial revision
kono
parents:
diff changeset
23 \gdef\hd@type{招待論文}\gdef\tl@type{招待論文}\gdef\@type{P}}
685b35adf419 Initial revision
kono
parents:
diff changeset
24 \DeclareOption{comment}{\@papertrue
685b35adf419 Initial revision
kono
parents:
diff changeset
25 \gdef\hd@type{解説論文}\gdef\tl@type{解説論文}\gdef\@type{P}}
685b35adf419 Initial revision
kono
parents:
diff changeset
26 \DeclareOption{survey}{\@papertrue
685b35adf419 Initial revision
kono
parents:
diff changeset
27 \gdef\hd@type{サーベイ論文}\gdef\tl@type{サーベイ論文}\gdef\@type{P}}
685b35adf419 Initial revision
kono
parents:
diff changeset
28 \DeclareOption{letter}{\@lettertrue\@paperfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
29 \gdef\hd@type{レター}\gdef\tl@type{\@typeofletter}\gdef\@type{L}}
685b35adf419 Initial revision
kono
parents:
diff changeset
30 \DeclareOption{letterpaper}{\@letterpapertrue\@paperfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
31 \gdef\hd@type{レター}\gdef\tl@type{レター}\gdef\@type{LP}}
685b35adf419 Initial revision
kono
parents:
diff changeset
32 \DeclareOption{technicalreport}{\@tecreptrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
33
685b35adf419 Initial revision
kono
parents:
diff changeset
34 \def\tl@type{論\hskip1zw 文}
685b35adf419 Initial revision
kono
parents:
diff changeset
35 \def\hd@type{論文}
685b35adf419 Initial revision
kono
parents:
diff changeset
36 \def\@type{P}% paper
685b35adf419 Initial revision
kono
parents:
diff changeset
37
685b35adf419 Initial revision
kono
parents:
diff changeset
38 %\def\ieicejline@warning{\ClassWarning{ieicej}}
685b35adf419 Initial revision
kono
parents:
diff changeset
39 \def\ieicej@warning{\ClassWarningNoLine{ieicej}}
685b35adf419 Initial revision
kono
parents:
diff changeset
40
685b35adf419 Initial revision
kono
parents:
diff changeset
41 \newif\if@usejistfm \@usejistfmfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
42 \DeclareOption{usejistfm}{\@usejistfmtrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
43
685b35adf419 Initial revision
kono
parents:
diff changeset
44 \newif\if@Proof \@Prooffalse
685b35adf419 Initial revision
kono
parents:
diff changeset
45 \DeclareOption{Proof}{\@Prooftrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
46 \newif\if@cameraready \@camerareadyfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
47 \DeclareOption{cameraready}{\@camerareadytrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
48
685b35adf419 Initial revision
kono
parents:
diff changeset
49 %% for 2.1.4 and non pLaTeX2e compatibility
685b35adf419 Initial revision
kono
parents:
diff changeset
50 \@ifundefined{hour}{}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
51 \hour\time \divide\hour by 60\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
52 \@tempcnta\hour \multiply\@tempcnta 60\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
53 \minute\time \advance\minute-\@tempcnta
685b35adf419 Initial revision
kono
parents:
diff changeset
54 }
685b35adf419 Initial revision
kono
parents:
diff changeset
55
685b35adf419 Initial revision
kono
parents:
diff changeset
56 \newif\if@NTT
685b35adf419 Initial revision
kono
parents:
diff changeset
57 \@ifundefined{kanjiskip}{\@NTTtrue
685b35adf419 Initial revision
kono
parents:
diff changeset
58 \let\kanjiskip\jintercharskip
685b35adf419 Initial revision
kono
parents:
diff changeset
59 \let\xkanjiskip\jasciikanjiskip
685b35adf419 Initial revision
kono
parents:
diff changeset
60 }{\@NTTfalse\let\jmathkanjiskip\xkanjiskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
61 \@ifundefined{iftdir}{\newif\iftdir\tdirfalse}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
62 \@ifundefined{burasage}{}{\burasage`,=1\burasage`.=1}
685b35adf419 Initial revision
kono
parents:
diff changeset
63
685b35adf419 Initial revision
kono
parents:
diff changeset
64 \newdimen\@JQ
685b35adf419 Initial revision
kono
parents:
diff changeset
65 \@JQ=0.7392507pt
685b35adf419 Initial revision
kono
parents:
diff changeset
66 \newdimen\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
67 \@Q=0.71144pt
685b35adf419 Initial revision
kono
parents:
diff changeset
68 \newdimen\@EM
685b35adf419 Initial revision
kono
parents:
diff changeset
69 \@EM=.03125em
685b35adf419 Initial revision
kono
parents:
diff changeset
70
685b35adf419 Initial revision
kono
parents:
diff changeset
71 \newcounter{@paper}
685b35adf419 Initial revision
kono
parents:
diff changeset
72 \newcommand{\@ptsize}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
73 \newif\if@restonecol
685b35adf419 Initial revision
kono
parents:
diff changeset
74 \hour\time \divide\hour by 60\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
75 \@tempcnta\hour \multiply\@tempcnta 60\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
76 \minute\time \advance\minute-\@tempcnta
685b35adf419 Initial revision
kono
parents:
diff changeset
77 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
78 \newif\if@enablejfam \@enablejfamtrue
685b35adf419 Initial revision
kono
parents:
diff changeset
79 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
80 \DeclareOption{a4paper}{\setcounter{@paper}{1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
81 \setlength\paperheight {297mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
82 \setlength\paperwidth {210mm}}
685b35adf419 Initial revision
kono
parents:
diff changeset
83 \DeclareOption{b5paper}{\setcounter{@paper}{4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
84 \setlength\paperheight {257mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
85 \setlength\paperwidth {182mm}}
685b35adf419 Initial revision
kono
parents:
diff changeset
86 \DeclareOption{10pt}{\renewcommand{\@ptsize}{0}}
685b35adf419 Initial revision
kono
parents:
diff changeset
87 \DeclareOption{11pt}{\renewcommand{\@ptsize}{1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
88 \DeclareOption{12pt}{\renewcommand{\@ptsize}{2}}
685b35adf419 Initial revision
kono
parents:
diff changeset
89 \DeclareOption{tombow}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
90 \tombowtrue \tombowdatetrue
685b35adf419 Initial revision
kono
parents:
diff changeset
91 \setlength{\@tombowwidth}{.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
92 \@bannertoken{%
685b35adf419 Initial revision
kono
parents:
diff changeset
93 \jobname\space:\space\number\year/\number\month/\number\day
685b35adf419 Initial revision
kono
parents:
diff changeset
94 (\number\hour:\number\minute)}
685b35adf419 Initial revision
kono
parents:
diff changeset
95 \maketombowbox}
685b35adf419 Initial revision
kono
parents:
diff changeset
96 \DeclareOption{tombo}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
97 \tombowtrue \tombowdatefalse
685b35adf419 Initial revision
kono
parents:
diff changeset
98 \setlength{\@tombowwidth}{.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
99 \maketombowbox}
685b35adf419 Initial revision
kono
parents:
diff changeset
100 \DeclareOption{mentuke}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
101 \tombowtrue \tombowdatefalse
685b35adf419 Initial revision
kono
parents:
diff changeset
102 \setlength{\@tombowwidth}{\z@}%
685b35adf419 Initial revision
kono
parents:
diff changeset
103 \maketombowbox}
685b35adf419 Initial revision
kono
parents:
diff changeset
104 \DeclareOption{tate}{\AtBeginDocument{\tate\message{《縦組モード》}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
105 \DeclareOption{oneside}{\@twosidefalse}
685b35adf419 Initial revision
kono
parents:
diff changeset
106 \DeclareOption{twoside}{\@twosidetrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
107 \DeclareOption{onecolumn}{\@twocolumnfalse}
685b35adf419 Initial revision
kono
parents:
diff changeset
108 \DeclareOption{twocolumn}{\@twocolumntrue}
685b35adf419 Initial revision
kono
parents:
diff changeset
109 %%\DeclareOption{leqno}{\input{leqno.clo}}
685b35adf419 Initial revision
kono
parents:
diff changeset
110 \DeclareOption{fleqn}{%\input{fleqn.clo}
685b35adf419 Initial revision
kono
parents:
diff changeset
111 \ieicej@warning{fleqn is loaded by this class file}}
685b35adf419 Initial revision
kono
parents:
diff changeset
112 \DeclareOption{openbib}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
113 \AtEndOfPackage{%
685b35adf419 Initial revision
kono
parents:
diff changeset
114 \renewcommand\@openbib@code{%
685b35adf419 Initial revision
kono
parents:
diff changeset
115 \advance\leftmargin\bibindent
685b35adf419 Initial revision
kono
parents:
diff changeset
116 \itemindent -\bibindent
685b35adf419 Initial revision
kono
parents:
diff changeset
117 \listparindent \itemindent
685b35adf419 Initial revision
kono
parents:
diff changeset
118 \parsep \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
119 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
120 \renewcommand\newblock{\par}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
121
685b35adf419 Initial revision
kono
parents:
diff changeset
122 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
123 \DeclareOption{disablejfam}{\@enablejfamfalse}
685b35adf419 Initial revision
kono
parents:
diff changeset
124 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
125 \DeclareOption{draft}{\setlength\overfullrule{5pt}}
685b35adf419 Initial revision
kono
parents:
diff changeset
126 \DeclareOption{final}{\setlength\overfullrule{0pt}}
685b35adf419 Initial revision
kono
parents:
diff changeset
127 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
128 \ExecuteOptions{a4paper,twoside,twocolumn,final}
685b35adf419 Initial revision
kono
parents:
diff changeset
129 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
130 \ExecuteOptions{b5paper,10pt,twoside,twocolumn,final}
685b35adf419 Initial revision
kono
parents:
diff changeset
131 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
132 \ProcessOptions\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
133
685b35adf419 Initial revision
kono
parents:
diff changeset
134 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
135 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
136 \if@usejistfm
685b35adf419 Initial revision
kono
parents:
diff changeset
137 \DeclareFontShape{JY1}{mc}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
138 <5> <6> <7> <8> <9> <10> %sgen*min
685b35adf419 Initial revision
kono
parents:
diff changeset
139 <10.95><12><14.4><17.28><20.74><24.88> jis
685b35adf419 Initial revision
kono
parents:
diff changeset
140 <-> jis
685b35adf419 Initial revision
kono
parents:
diff changeset
141 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
142 \DeclareFontShape{JY1}{mc}{bx}{n}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
143 \DeclareFontShape{JY1}{gt}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
144 <5> <6> <7> <8> <9> <10> %sgen*goth
685b35adf419 Initial revision
kono
parents:
diff changeset
145 <10.95><12><14.4><17.28><20.74><24.88> jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
146 <-> jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
147 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
148 \DeclareFontShape{JY1}{gt}{bx}{n}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
149 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
150 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
151 \if@usejistfm
685b35adf419 Initial revision
kono
parents:
diff changeset
152 \DeclareFontShape{JY1}{mc}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
153 <5> sfixed * [5.1748] jis % 7Q
685b35adf419 Initial revision
kono
parents:
diff changeset
154 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi jis % 8Q or 9Q
685b35adf419 Initial revision
kono
parents:
diff changeset
155 <7> sfixed * [7.3926] jis % 10Q
685b35adf419 Initial revision
kono
parents:
diff changeset
156 <8> sfixed * [8.1318] jis % 11Q
685b35adf419 Initial revision
kono
parents:
diff changeset
157 <9> sfixed * [8.8711] jis % 12Q
685b35adf419 Initial revision
kono
parents:
diff changeset
158 <10> sfixed * [9.6104] jis % 13Q
685b35adf419 Initial revision
kono
parents:
diff changeset
159 <10.95> sfixed * [11.089] jis % 15Q
685b35adf419 Initial revision
kono
parents:
diff changeset
160 <12> sfixed * [13.307] jis % 18Q
685b35adf419 Initial revision
kono
parents:
diff changeset
161 <14.4> sfixed * [14.785] jis % 20Q
685b35adf419 Initial revision
kono
parents:
diff changeset
162 <17.28> sfixed * [17.742] jis % 24Q
685b35adf419 Initial revision
kono
parents:
diff changeset
163 <20.74> sfixed * [20.699] jis % 28Q
685b35adf419 Initial revision
kono
parents:
diff changeset
164 <24.88> sfixed * [23.656] jis % 32Q
685b35adf419 Initial revision
kono
parents:
diff changeset
165 <-> jis %
685b35adf419 Initial revision
kono
parents:
diff changeset
166 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
167 \DeclareFontShape{JY1}{mc}{bx}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
168 <5> sfixed * [5.1748] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
169 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
170 <7> sfixed * [7.3926] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
171 <8> sfixed * [8.1318] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
172 <9> sfixed * [8.8711] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
173 <10> sfixed * [9.6104] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
174 <10.95> sfixed * [11.089] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
175 <12> sfixed * [13.307] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
176 <14.4> sfixed * [14.785] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
177 <17.28> sfixed * [17.742] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
178 <20.74> sfixed * [20.699] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
179 <24.88> sfixed * [23.656] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
180 <-> jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
181 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
182 \DeclareFontShape{JY1}{gt}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
183 <5> sfixed * [5.1748] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
184 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
185 <7> sfixed * [7.3926] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
186 <8> sfixed * [8.1318] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
187 <9> sfixed * [8.8711] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
188 <10> sfixed * [9.6104] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
189 <10.95> sfixed * [11.089] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
190 <12> sfixed * [13.307] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
191 <14.4> sfixed * [14.785] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
192 <17.28> sfixed * [17.742] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
193 <20.74> sfixed * [20.699] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
194 <24.88> sfixed * [23.656] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
195 <-> jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
196 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
197 \DeclareFontShape{JY1}{gt}{bx}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
198 <5> sfixed * [5.1748] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
199 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
200 <7> sfixed * [7.3926] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
201 <8> sfixed * [8.1318] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
202 <9> sfixed * [8.8711] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
203 <10> sfixed * [9.6104] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
204 <10.95> sfixed * [11.089] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
205 <12> sfixed * [13.307] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
206 <14.4> sfixed * [14.785] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
207 <17.28> sfixed * [17.742] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
208 <20.74> sfixed * [20.699] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
209 <24.88> sfixed * [23.656] jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
210 <-> jisg
685b35adf419 Initial revision
kono
parents:
diff changeset
211 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
212 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
213 \DeclareFontShape{JY1}{mc}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
214 <5> sfixed * [5.1748] min5 % 7Q
685b35adf419 Initial revision
kono
parents:
diff changeset
215 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi min6 % 8Q or 9Q
685b35adf419 Initial revision
kono
parents:
diff changeset
216 <7> sfixed * [7.3926] min7 % 10Q
685b35adf419 Initial revision
kono
parents:
diff changeset
217 <8> sfixed * [8.1318] min8 % 11Q
685b35adf419 Initial revision
kono
parents:
diff changeset
218 <9> sfixed * [8.8711] min9 % 12Q
685b35adf419 Initial revision
kono
parents:
diff changeset
219 <10> sfixed * [9.6104] min10 % 13Q
685b35adf419 Initial revision
kono
parents:
diff changeset
220 <10.95> sfixed * [11.089] min10 % 15Q
685b35adf419 Initial revision
kono
parents:
diff changeset
221 <12> sfixed * [13.307] min10 % 18Q
685b35adf419 Initial revision
kono
parents:
diff changeset
222 <14.4> sfixed * [14.785] min10 % 20Q
685b35adf419 Initial revision
kono
parents:
diff changeset
223 <17.28> sfixed * [17.742] min10 % 24Q
685b35adf419 Initial revision
kono
parents:
diff changeset
224 <20.74> sfixed * [20.699] min10 % 28Q
685b35adf419 Initial revision
kono
parents:
diff changeset
225 <24.88> sfixed * [23.656] min10 % 32Q
685b35adf419 Initial revision
kono
parents:
diff changeset
226 <-> min10 %
685b35adf419 Initial revision
kono
parents:
diff changeset
227 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
228 \DeclareFontShape{JY1}{mc}{bx}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
229 <5> sfixed * [5.1748] goth5
685b35adf419 Initial revision
kono
parents:
diff changeset
230 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi goth6
685b35adf419 Initial revision
kono
parents:
diff changeset
231 <7> sfixed * [7.3926] goth7
685b35adf419 Initial revision
kono
parents:
diff changeset
232 <8> sfixed * [8.1318] goth8
685b35adf419 Initial revision
kono
parents:
diff changeset
233 <9> sfixed * [8.8711] goth9
685b35adf419 Initial revision
kono
parents:
diff changeset
234 <10> sfixed * [9.6104] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
235 <10.95> sfixed * [11.089] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
236 <12> sfixed * [13.307] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
237 <14.4> sfixed * [14.785] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
238 <17.28> sfixed * [17.742] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
239 <20.74> sfixed * [20.699] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
240 <24.88> sfixed * [23.656] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
241 <-> goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
242 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
243 \DeclareFontShape{JY1}{gt}{m}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
244 <5> sfixed * [5.1748] goth5
685b35adf419 Initial revision
kono
parents:
diff changeset
245 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi goth6
685b35adf419 Initial revision
kono
parents:
diff changeset
246 <7> sfixed * [7.3926] goth7
685b35adf419 Initial revision
kono
parents:
diff changeset
247 <8> sfixed * [8.1318] goth8
685b35adf419 Initial revision
kono
parents:
diff changeset
248 <9> sfixed * [8.8711] goth9
685b35adf419 Initial revision
kono
parents:
diff changeset
249 <10> sfixed * [9.6104] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
250 <10.95> sfixed * [11.089] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
251 <12> sfixed * [13.307] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
252 <14.4> sfixed * [14.785] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
253 <17.28> sfixed * [17.742] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
254 <20.74> sfixed * [20.699] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
255 <24.88> sfixed * [23.656] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
256 <-> goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
257 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
258 \DeclareFontShape{JY1}{gt}{bx}{n}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
259 <5> sfixed * [5.1748] goth5
685b35adf419 Initial revision
kono
parents:
diff changeset
260 <6> sfixed * \if@letter [5.9141]\else [6.6533]\fi goth6
685b35adf419 Initial revision
kono
parents:
diff changeset
261 <7> sfixed * [7.3926] goth7
685b35adf419 Initial revision
kono
parents:
diff changeset
262 <8> sfixed * [8.1318] goth8
685b35adf419 Initial revision
kono
parents:
diff changeset
263 <9> sfixed * [8.8711] goth9
685b35adf419 Initial revision
kono
parents:
diff changeset
264 <10> sfixed * [9.6104] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
265 <10.95> sfixed * [11.089] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
266 <12> sfixed * [13.307] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
267 <14.4> sfixed * [14.785] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
268 <17.28> sfixed * [17.742] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
269 <20.74> sfixed * [20.699] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
270 <24.88> sfixed * [23.656] goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
271 <-> goth10
685b35adf419 Initial revision
kono
parents:
diff changeset
272 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
273 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
274 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
275
685b35adf419 Initial revision
kono
parents:
diff changeset
276 %% JY1 it
685b35adf419 Initial revision
kono
parents:
diff changeset
277 \DeclareFontShape{JY1}{mc}{m}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
278 \DeclareFontShape{JY1}{mc}{bx}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
279 \DeclareFontShape{JY1}{gt}{m}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
280 \DeclareFontShape{JY1}{gt}{bx}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
281 %%
685b35adf419 Initial revision
kono
parents:
diff changeset
282 \DeclareFontShape{JY1}{mc}{b}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
283 \DeclareFontShape{JY1}{mc}{eb}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
284 \DeclareFontShape{JY1}{gt}{b}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
285 \DeclareFontShape{JY1}{gt}{eb}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
286 \DeclareFontShape{JY1}{gt}{ub}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
287 %% JT1 it
685b35adf419 Initial revision
kono
parents:
diff changeset
288 \DeclareFontShape{JT1}{mc}{m}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
289 \DeclareFontShape{JT1}{mc}{bx}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
290 \DeclareFontShape{JT1}{gt}{m}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
291 \DeclareFontShape{JT1}{gt}{bx}{it}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
292 %%
685b35adf419 Initial revision
kono
parents:
diff changeset
293 \DeclareFontShape{JT1}{mc}{b}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
294 \DeclareFontShape{JT1}{mc}{eb}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
295 \DeclareFontShape{JT1}{gt}{b}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
296 \DeclareFontShape{JT1}{gt}{eb}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
297 \DeclareFontShape{JT1}{gt}{ub}{it}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
298 %% sc
685b35adf419 Initial revision
kono
parents:
diff changeset
299 \DeclareFontShape{JY1}{mc}{m}{sc}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
300 \DeclareFontShape{JT1}{mc}{m}{sc}{<->ssub*mc/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
301 %% n
685b35adf419 Initial revision
kono
parents:
diff changeset
302 \DeclareFontShape{JY1}{gt}{b}{n}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
303 \DeclareFontShape{JT1}{gt}{b}{n}{<->ssub*gt/m/n}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
304 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
305
685b35adf419 Initial revision
kono
parents:
diff changeset
306 %% from /usr/local/teTeX/share/texmf/tex/latex/base/ot1cmr.fd
685b35adf419 Initial revision
kono
parents:
diff changeset
307 \DeclareFontShape{OT1}{cmr}{m}{n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
308 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
309 <-6>cmr5%
685b35adf419 Initial revision
kono
parents:
diff changeset
310 <6-7>cmr6%
685b35adf419 Initial revision
kono
parents:
diff changeset
311 <7-8>cmr7%
685b35adf419 Initial revision
kono
parents:
diff changeset
312 <8-9>cmr8%
685b35adf419 Initial revision
kono
parents:
diff changeset
313 <9-10>cmr9%
685b35adf419 Initial revision
kono
parents:
diff changeset
314 <10-12>cmr10%
685b35adf419 Initial revision
kono
parents:
diff changeset
315 <12-17>cmr12%
685b35adf419 Initial revision
kono
parents:
diff changeset
316 <17->cmr17%
685b35adf419 Initial revision
kono
parents:
diff changeset
317 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
318 \DeclareFontShape{OT1}{cmr}{m}{sl}%
685b35adf419 Initial revision
kono
parents:
diff changeset
319 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
320 <-9>cmsl8%
685b35adf419 Initial revision
kono
parents:
diff changeset
321 <9-10>cmsl9%
685b35adf419 Initial revision
kono
parents:
diff changeset
322 <10-12>cmsl10%
685b35adf419 Initial revision
kono
parents:
diff changeset
323 <12->cmsl12%
685b35adf419 Initial revision
kono
parents:
diff changeset
324 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
325 \DeclareFontShape{OT1}{cmr}{m}{it}%
685b35adf419 Initial revision
kono
parents:
diff changeset
326 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
327 <-8>cmti7%
685b35adf419 Initial revision
kono
parents:
diff changeset
328 <8-9>cmti8%
685b35adf419 Initial revision
kono
parents:
diff changeset
329 <9-10>cmti9%
685b35adf419 Initial revision
kono
parents:
diff changeset
330 <10-12>cmti10%
685b35adf419 Initial revision
kono
parents:
diff changeset
331 <12->cmti12%
685b35adf419 Initial revision
kono
parents:
diff changeset
332 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
333 \DeclareFontShape{OT1}{cmr}{m}{sc}%
685b35adf419 Initial revision
kono
parents:
diff changeset
334 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
335 <->cmcsc10%
685b35adf419 Initial revision
kono
parents:
diff changeset
336 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
337 \DeclareFontShape{OT1}{cmr}{m}{ui}
685b35adf419 Initial revision
kono
parents:
diff changeset
338 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
339 <->cmu10%
685b35adf419 Initial revision
kono
parents:
diff changeset
340 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
341 \DeclareFontShape{OT1}{cmr}{b}{n}
685b35adf419 Initial revision
kono
parents:
diff changeset
342 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
343 <->cmb10%
685b35adf419 Initial revision
kono
parents:
diff changeset
344 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
345 \DeclareFontShape{OT1}{cmr}{bx}{n}
685b35adf419 Initial revision
kono
parents:
diff changeset
346 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
347 <-6>cmbx5%
685b35adf419 Initial revision
kono
parents:
diff changeset
348 <6-7>cmbx6%
685b35adf419 Initial revision
kono
parents:
diff changeset
349 <7-8>cmbx7%
685b35adf419 Initial revision
kono
parents:
diff changeset
350 <8-9>cmbx8%
685b35adf419 Initial revision
kono
parents:
diff changeset
351 <9-10>cmbx9%
685b35adf419 Initial revision
kono
parents:
diff changeset
352 <10-12>cmbx10%
685b35adf419 Initial revision
kono
parents:
diff changeset
353 <12->cmbx12%
685b35adf419 Initial revision
kono
parents:
diff changeset
354 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
355 \DeclareFontShape{OT1}{cmr}{bx}{sl}
685b35adf419 Initial revision
kono
parents:
diff changeset
356 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
357 <->cmbxsl10%
685b35adf419 Initial revision
kono
parents:
diff changeset
358 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
359 \DeclareFontShape{OT1}{cmr}{bx}{it}
685b35adf419 Initial revision
kono
parents:
diff changeset
360 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
361 <->cmbxti10%
685b35adf419 Initial revision
kono
parents:
diff changeset
362 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
363 \DeclareFontShape{OT1}{cmr}{bx}{ui}
685b35adf419 Initial revision
kono
parents:
diff changeset
364 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
365 <->sub*cmr/m/ui
685b35adf419 Initial revision
kono
parents:
diff changeset
366 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
367
685b35adf419 Initial revision
kono
parents:
diff changeset
368 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
369 \renewcommand{\normalsize}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
370 \@setfontsize\normalsize\@ixpt{20.5\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
371 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
372 \abovedisplayskip 9\p@ \@plus 3\p@ \@minus 4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
373 \abovedisplayshortskip \z@ \@plus 2.5\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
374 \belowdisplayshortskip 5\p@ \@plus 2\p@ \@minus 2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
375 \belowdisplayskip \abovedisplayskip
685b35adf419 Initial revision
kono
parents:
diff changeset
376 \let\@listi\@listI}
685b35adf419 Initial revision
kono
parents:
diff changeset
377 \normalsize
685b35adf419 Initial revision
kono
parents:
diff changeset
378 \setbox0\hbox{\char\euc"A1A1}% "
685b35adf419 Initial revision
kono
parents:
diff changeset
379 \setlength\Cht{\ht0}
685b35adf419 Initial revision
kono
parents:
diff changeset
380 \setlength\Cdp{\dp0}
685b35adf419 Initial revision
kono
parents:
diff changeset
381 \setlength\Cwd{\wd0}
685b35adf419 Initial revision
kono
parents:
diff changeset
382 \setlength\Cvs{\baselineskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
383 \setlength\Chs{\wd0}
685b35adf419 Initial revision
kono
parents:
diff changeset
384
685b35adf419 Initial revision
kono
parents:
diff changeset
385 \newcommand{\small}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
386 \@setfontsize\small\@viiipt{18\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
387 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
388 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
389 \abovedisplayshortskip \z@ \@plus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
390 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
391 \def\@listi{\leftmargin\leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
392 \topsep 3\p@ \@plus \p@ \@minus \p@
685b35adf419 Initial revision
kono
parents:
diff changeset
393 \parsep 1\p@ \@plus \p@ \@minus \p@
685b35adf419 Initial revision
kono
parents:
diff changeset
394 \itemsep \parsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
395 \belowdisplayskip \abovedisplayskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
396
685b35adf419 Initial revision
kono
parents:
diff changeset
397 \newcommand{\footnotesize}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
398 \@setfontsize\footnotesize\@viipt{16\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
399 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
400 \abovedisplayskip 5\p@ \@plus 1.5\p@ \@minus 3\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
401 \abovedisplayshortskip \z@ \@plus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
402 \belowdisplayshortskip 2.5\p@ \@plus \p@ \@minus 1.5\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
403 \def\@listi{\leftmargin\leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
404 \topsep 2\p@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
405 \parsep 1\p@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
406 \itemsep \parsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
407 \belowdisplayskip \abovedisplayskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
408
685b35adf419 Initial revision
kono
parents:
diff changeset
409 \newcommand{\scriptsize}{\@setfontsize\scriptsize\@vipt\@viiipt}
685b35adf419 Initial revision
kono
parents:
diff changeset
410 \newcommand{\tiny}{\@setfontsize\tiny\@vpt\@vipt}
685b35adf419 Initial revision
kono
parents:
diff changeset
411 \newcommand{\large}{\@setfontsize\large\@xpt{22\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
412 \newcommand{\Large}{\@setfontsize\Large\@xipt{27\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
413 \newcommand{\LARGE}{\@setfontsize\LARGE\@xiipt{33\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
414 \newcommand{\huge}{\@setfontsize\huge\@xivpt{25}}
685b35adf419 Initial revision
kono
parents:
diff changeset
415 \newcommand{\Huge}{\@setfontsize\Huge\@xviipt{30}}
685b35adf419 Initial revision
kono
parents:
diff changeset
416
685b35adf419 Initial revision
kono
parents:
diff changeset
417 \headheight \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
418 \headsep \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
419 \topskip 1\Cht
685b35adf419 Initial revision
kono
parents:
diff changeset
420 \footskip 9.5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
421 \maxdepth .5\topskip
685b35adf419 Initial revision
kono
parents:
diff changeset
422 \textwidth 58\Cwd
685b35adf419 Initial revision
kono
parents:
diff changeset
423 \@settopoint\textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
424 \textheight 49\Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
425 \advance \textheight \topskip
685b35adf419 Initial revision
kono
parents:
diff changeset
426 \advance \textheight .15mm
685b35adf419 Initial revision
kono
parents:
diff changeset
427 \@settopoint\textheight
685b35adf419 Initial revision
kono
parents:
diff changeset
428 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
429 \renewcommand{\normalsize}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
430 \@setfontsize\normalsize\@ixpt{19\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
431 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
432 \abovedisplayskip 9\p@ \@plus 3\p@ \@minus 4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
433 \abovedisplayshortskip \z@ \@plus 2.5\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
434 \belowdisplayshortskip 5\p@ \@plus 2\p@ \@minus 2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
435 \belowdisplayskip \abovedisplayskip
685b35adf419 Initial revision
kono
parents:
diff changeset
436 \let\@listi\@listI}
685b35adf419 Initial revision
kono
parents:
diff changeset
437 \normalsize
685b35adf419 Initial revision
kono
parents:
diff changeset
438 \setbox0\hbox{\char\euc"A1A1}% "
685b35adf419 Initial revision
kono
parents:
diff changeset
439 \setlength\Cht{\ht0}
685b35adf419 Initial revision
kono
parents:
diff changeset
440 \setlength\Cdp{\dp0}
685b35adf419 Initial revision
kono
parents:
diff changeset
441 \setlength\Cwd{\wd0}
685b35adf419 Initial revision
kono
parents:
diff changeset
442 \setlength\Cvs{\baselineskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
443 \setlength\Chs{\wd0}
685b35adf419 Initial revision
kono
parents:
diff changeset
444
685b35adf419 Initial revision
kono
parents:
diff changeset
445 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
446 \newcommand{\Small}{\@setfontsize\Small\@viiipt{18\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
447 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
448 }
685b35adf419 Initial revision
kono
parents:
diff changeset
449 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
450 \newcommand{\Small}{\@setfontsize\Small\@viiipt{16\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
451 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
452 }
685b35adf419 Initial revision
kono
parents:
diff changeset
453 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
454
685b35adf419 Initial revision
kono
parents:
diff changeset
455 \newcommand{\small}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
456 \@setfontsize\small\@viipt{13\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
457 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
458 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
459 \abovedisplayshortskip \z@ \@plus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
460 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
461 \def\@listi{\leftmargin\leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
462 \topsep 3\p@ \@plus \p@ \@minus \p@
685b35adf419 Initial revision
kono
parents:
diff changeset
463 \parsep 1\p@ \@plus \p@ \@minus \p@
685b35adf419 Initial revision
kono
parents:
diff changeset
464 \itemsep \parsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
465 \belowdisplayskip \abovedisplayskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
466 \newcommand{\footnotesize}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
467 \@setfontsize\footnotesize\@vipt{13\@Q}%
685b35adf419 Initial revision
kono
parents:
diff changeset
468 \kanjiskip\z@ \@plus .1zw \@minus .05zw
685b35adf419 Initial revision
kono
parents:
diff changeset
469 \abovedisplayskip 5\p@ \@plus 1.5\p@ \@minus 3\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
470 \abovedisplayshortskip \z@ \@plus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
471 \belowdisplayshortskip 2.5\p@ \@plus \p@ \@minus 1.5\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
472 \def\@listi{\leftmargin\leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
473 \topsep 2\p@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
474 \parsep 1\p@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
475 \itemsep \parsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
476 \belowdisplayskip \abovedisplayskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
477
685b35adf419 Initial revision
kono
parents:
diff changeset
478 %%\newcommand{\scriptsize}{\@setfontsize\scriptsize\@viipt\@viiipt}
685b35adf419 Initial revision
kono
parents:
diff changeset
479 \let\scriptsize\footnotesize
685b35adf419 Initial revision
kono
parents:
diff changeset
480 \newcommand{\tiny}{\@setfontsize\tiny\@vpt\@vipt}
685b35adf419 Initial revision
kono
parents:
diff changeset
481 \newcommand{\large}{\@setfontsize\large\@xpt{19\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
482 \newcommand{\Large}{\@setfontsize\Large\@xipt{27\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
483 \newcommand{\LARGE}{\@setfontsize\LARGE\@xiipt{33\@Q}}
685b35adf419 Initial revision
kono
parents:
diff changeset
484 \newcommand{\huge}{\@setfontsize\huge\@xivpt{25}}
685b35adf419 Initial revision
kono
parents:
diff changeset
485 \newcommand{\Huge}{\@setfontsize\Huge\@xviipt{30}}
685b35adf419 Initial revision
kono
parents:
diff changeset
486
685b35adf419 Initial revision
kono
parents:
diff changeset
487 \headheight 12\@Q %% 11H
685b35adf419 Initial revision
kono
parents:
diff changeset
488 \headsep 6.25mm
685b35adf419 Initial revision
kono
parents:
diff changeset
489 \topskip 1\Cht
685b35adf419 Initial revision
kono
parents:
diff changeset
490 \footskip 7.5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
491 \maxdepth .5\topskip
685b35adf419 Initial revision
kono
parents:
diff changeset
492 \textwidth 151.5mm %% 24w x 2 + 30H
685b35adf419 Initial revision
kono
parents:
diff changeset
493 \@settopoint\textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
494 \textheight 43\Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
495 \advance \textheight \topskip
685b35adf419 Initial revision
kono
parents:
diff changeset
496 \advance \textheight .4mm %% limit .31mm
685b35adf419 Initial revision
kono
parents:
diff changeset
497 \@settopoint\textheight
685b35adf419 Initial revision
kono
parents:
diff changeset
498 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
499
685b35adf419 Initial revision
kono
parents:
diff changeset
500 \if@twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
501 \setlength\marginparsep{5mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
502 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
503 \setlength\marginparsep{5mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
504 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
505 \setlength\marginparpush{5pt}
685b35adf419 Initial revision
kono
parents:
diff changeset
506
685b35adf419 Initial revision
kono
parents:
diff changeset
507 \iftombow
685b35adf419 Initial revision
kono
parents:
diff changeset
508 % \hoffset\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
509 % \voffset\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
510 \topmargin\paperheight
685b35adf419 Initial revision
kono
parents:
diff changeset
511 \advance \topmargin -\textheight
685b35adf419 Initial revision
kono
parents:
diff changeset
512 \advance \topmargin -\headheight
685b35adf419 Initial revision
kono
parents:
diff changeset
513 \advance \topmargin -\headsep
685b35adf419 Initial revision
kono
parents:
diff changeset
514 \advance \topmargin -\footskip
685b35adf419 Initial revision
kono
parents:
diff changeset
515 \divide \topmargin \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
516 \advance \topmargin -1.25mm
685b35adf419 Initial revision
kono
parents:
diff changeset
517 \advance \topmargin -1in
685b35adf419 Initial revision
kono
parents:
diff changeset
518 \@settopoint\topmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
519 \oddsidemargin\paperwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
520 \advance \oddsidemargin -\textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
521 \divide \oddsidemargin \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
522 \advance \oddsidemargin -1in
685b35adf419 Initial revision
kono
parents:
diff changeset
523 \@settopoint\oddsidemargin
685b35adf419 Initial revision
kono
parents:
diff changeset
524 \evensidemargin\oddsidemargin
685b35adf419 Initial revision
kono
parents:
diff changeset
525 \@settopoint\evensidemargin
685b35adf419 Initial revision
kono
parents:
diff changeset
526 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
527 \topmargin \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
528 \@settopoint\topmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
529 \oddsidemargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
530 \@settopoint\oddsidemargin
685b35adf419 Initial revision
kono
parents:
diff changeset
531 \evensidemargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
532 \@settopoint\evensidemargin
685b35adf419 Initial revision
kono
parents:
diff changeset
533 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
534
685b35adf419 Initial revision
kono
parents:
diff changeset
535 \marginparwidth 20mm
685b35adf419 Initial revision
kono
parents:
diff changeset
536 \@settopoint\marginparwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
537
685b35adf419 Initial revision
kono
parents:
diff changeset
538 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
539 \setlength\footnotesep{2.8mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
540 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
541 \setlength\footnotesep{2.275mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
542 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
543 \setlength{\skip\footins}{1\Cvs plus .9\Cvs \@minus .3\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
544 \setlength\intextsep {1\Cvs \@plus .75\Cvs \@minus .25\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
545 \setlength\floatsep {1\Cvs \@plus .75\Cvs \@minus .25\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
546 \setlength\dblfloatsep {1\Cvs \@plus .75\Cvs \@minus .25\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
547 \setlength\textfloatsep{1.5\Cvs \@plus .75\Cvs \@minus .25\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
548 \setlength\dbltextfloatsep{1.5\Cvs \@plus .75\Cvs \@minus .25\Cvs}
685b35adf419 Initial revision
kono
parents:
diff changeset
549
685b35adf419 Initial revision
kono
parents:
diff changeset
550 \setlength\@fptop{0\p@ \@plus 1fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
551 \setlength\@fpsep{8\p@ \@plus 2fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
552 \setlength\@fpbot{0\p@ \@plus 1fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
553 \setlength\@dblfptop{0\p@ \@plus 1fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
554 \setlength\@dblfpsep{8\p@ \@plus 2fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
555 \setlength\@dblfpbot{0\p@ \@plus 1fil}
685b35adf419 Initial revision
kono
parents:
diff changeset
556 \setlength\partopsep{2\p@ \@plus 1\p@ \@minus 1\p@}
685b35adf419 Initial revision
kono
parents:
diff changeset
557
685b35adf419 Initial revision
kono
parents:
diff changeset
558 \def\@listi{\leftmargin\leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
559 \parsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
560 \topsep 8\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
561 \itemsep 4\p@ \@plus2\p@ \@minus\p@}
685b35adf419 Initial revision
kono
parents:
diff changeset
562 \let\@listI\@listi
685b35adf419 Initial revision
kono
parents:
diff changeset
563 \@listi
685b35adf419 Initial revision
kono
parents:
diff changeset
564 \def\@listii{\leftmargin\leftmarginii
685b35adf419 Initial revision
kono
parents:
diff changeset
565 \labelwidth\leftmarginii \advance\labelwidth-\labelsep
685b35adf419 Initial revision
kono
parents:
diff changeset
566 \topsep\z@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
567 \parsep\z@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
568 \itemsep\parsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
569 \def\@listiii{\leftmargin\leftmarginiii
685b35adf419 Initial revision
kono
parents:
diff changeset
570 \labelwidth\leftmarginiii \advance\labelwidth-\labelsep
685b35adf419 Initial revision
kono
parents:
diff changeset
571 \topsep\z@ \@plus\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
572 \parsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
573 \partopsep\z@ \@plus\z@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
574 \itemsep\topsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
575 \def\@listiv {\leftmargin\leftmarginiv
685b35adf419 Initial revision
kono
parents:
diff changeset
576 \labelwidth\leftmarginiv
685b35adf419 Initial revision
kono
parents:
diff changeset
577 \advance\labelwidth-\labelsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
578 \def\@listv {\leftmargin\leftmarginv
685b35adf419 Initial revision
kono
parents:
diff changeset
579 \labelwidth\leftmarginv
685b35adf419 Initial revision
kono
parents:
diff changeset
580 \advance\labelwidth-\labelsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
581 \def\@listvi {\leftmargin\leftmarginvi
685b35adf419 Initial revision
kono
parents:
diff changeset
582 \labelwidth\leftmarginvi
685b35adf419 Initial revision
kono
parents:
diff changeset
583 \advance\labelwidth-\labelsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
584
685b35adf419 Initial revision
kono
parents:
diff changeset
585 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
586 \columnsep 2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
587 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
588 \columnsep 30\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
589 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
590 \columnseprule 0\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
591 \lineskip 2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
592 \normallineskip 2\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
593 \renewcommand{\baselinestretch}{}
685b35adf419 Initial revision
kono
parents:
diff changeset
594 \parskip\z@ %% 0\p@ \@plus \p@
685b35adf419 Initial revision
kono
parents:
diff changeset
595 \parindent 1zw %% 1\Cwd
685b35adf419 Initial revision
kono
parents:
diff changeset
596
685b35adf419 Initial revision
kono
parents:
diff changeset
597 \@lowpenalty 51
685b35adf419 Initial revision
kono
parents:
diff changeset
598 \@medpenalty 151
685b35adf419 Initial revision
kono
parents:
diff changeset
599 \@highpenalty 301
685b35adf419 Initial revision
kono
parents:
diff changeset
600 \setcounter{topnumber}{6}
685b35adf419 Initial revision
kono
parents:
diff changeset
601 \setcounter{bottomnumber}{5}
685b35adf419 Initial revision
kono
parents:
diff changeset
602 \setcounter{totalnumber}{11}
685b35adf419 Initial revision
kono
parents:
diff changeset
603 \setcounter{dbltopnumber}{5}
685b35adf419 Initial revision
kono
parents:
diff changeset
604 \renewcommand{\topfraction}{.95}
685b35adf419 Initial revision
kono
parents:
diff changeset
605 \renewcommand{\bottomfraction}{.95}
685b35adf419 Initial revision
kono
parents:
diff changeset
606 \renewcommand{\textfraction}{.05}
685b35adf419 Initial revision
kono
parents:
diff changeset
607 \renewcommand{\floatpagefraction}{.05}
685b35adf419 Initial revision
kono
parents:
diff changeset
608 \renewcommand{\dbltopfraction}{.95}
685b35adf419 Initial revision
kono
parents:
diff changeset
609 \renewcommand{\dblfloatpagefraction}{.05}
685b35adf419 Initial revision
kono
parents:
diff changeset
610
685b35adf419 Initial revision
kono
parents:
diff changeset
611 \if@Proof
685b35adf419 Initial revision
kono
parents:
diff changeset
612 \def\@Rtop{\rlap{\smash{\rule[-\headsep]{0.05mm}{10mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
613 \rule[-\headsep]{10mm}{0.05mm}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
614 \def\@Ltop{\llap{\smash{\rule[-\headsep]{10mm}{0.05mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
615 \rule[-\headsep]{0.05mm}{10mm}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
616 \def\@Rbot{\rlap{\smash{\raisebox{1\footskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
617 {\rule[-10mm]{0.05mm}{10mm}\rule{10mm}{0.05mm}}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
618 \def\@Lbot{\llap{\smash{\raisebox{1\footskip}
685b35adf419 Initial revision
kono
parents:
diff changeset
619 {\rule{10mm}{0.05mm}\rule[-10mm]{0.05mm}{10mm}}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
620 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
621 \let\@Rtop\relax\let\@Ltop\relax\let\@Rbot\relax\let\@Lbot\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
622 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
623
685b35adf419 Initial revision
kono
parents:
diff changeset
624 \def\field#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
625 \if@tecrep\else
685b35adf419 Initial revision
kono
parents:
diff changeset
626 \def\@tempa{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
627 \def\f@A{A}\def\f@B{B}\def\f@C{C}\def\f@D{D}%
685b35adf419 Initial revision
kono
parents:
diff changeset
628 \def\f@DI{DI}\def\f@DII{DII}%
685b35adf419 Initial revision
kono
parents:
diff changeset
629 \ifx \@tempa\f@A \gdef\@field{A}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
630 \ifx \@tempa\f@B \gdef\@field{B}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
631 \ifx \@tempa\f@C \gdef\@field{C}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
632 \ifx \@tempa\f@D \gdef\@field{D}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
633 \ifx \@tempa\f@DI \gdef\@field{D--{\bfseries I}}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
634 \ifx \@tempa\f@DII \gdef\@field{D--{\bfseries II}}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
635 \gdef\@field{X}%
685b35adf419 Initial revision
kono
parents:
diff changeset
636 \fi\fi\fi\fi\fi\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
637 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
638 }
685b35adf419 Initial revision
kono
parents:
diff changeset
639
685b35adf419 Initial revision
kono
parents:
diff changeset
640 \def\vol#1{% Vol.J86 = Year 2003
685b35adf419 Initial revision
kono
parents:
diff changeset
641 \def\@tempa{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
642 \ifx\@tempa\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
643 \gdef\@vol{Jxx--\@field}\gdef\ft@year{xxxx}\gdef\hd@year{xxxx}%
685b35adf419 Initial revision
kono
parents:
diff changeset
644 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
645 \def\@tempa{x}%
685b35adf419 Initial revision
kono
parents:
diff changeset
646 \if\@tempa #1\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
647 \gdef\@vol{Jxx--\@field}%
685b35adf419 Initial revision
kono
parents:
diff changeset
648 \gdef\ft@year{xxxx}%
685b35adf419 Initial revision
kono
parents:
diff changeset
649 \gdef\hd@year{xxxx}%
685b35adf419 Initial revision
kono
parents:
diff changeset
650 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
651 \gdef\@vol{J#1--\@field}%
685b35adf419 Initial revision
kono
parents:
diff changeset
652 \@tempcnta=#1\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
653 \advance \@tempcnta 1917\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
654 \xdef\ft@year{\the\@tempcnta}%
685b35adf419 Initial revision
kono
parents:
diff changeset
655 \xdef\hd@year{\the\@tempcnta}%
685b35adf419 Initial revision
kono
parents:
diff changeset
656 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
657 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
658 }
685b35adf419 Initial revision
kono
parents:
diff changeset
659
685b35adf419 Initial revision
kono
parents:
diff changeset
660 \def\no#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
661 \def\@tempa{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
662 \ifx\@tempa\empty \gdef\@no{xx}\else \gdef\@no{#1}\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
663 }
685b35adf419 Initial revision
kono
parents:
diff changeset
664
685b35adf419 Initial revision
kono
parents:
diff changeset
665 \def\@field{}
685b35adf419 Initial revision
kono
parents:
diff changeset
666 \def\@vol{}
685b35adf419 Initial revision
kono
parents:
diff changeset
667 \def\hd@year{}
685b35adf419 Initial revision
kono
parents:
diff changeset
668 \def\ft@year{}
685b35adf419 Initial revision
kono
parents:
diff changeset
669 \def\@no{}
685b35adf419 Initial revision
kono
parents:
diff changeset
670
685b35adf419 Initial revision
kono
parents:
diff changeset
671 \def\typeofletter#1{\gdef\@typeofletter{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
672 \def\@typeofletter{}
685b35adf419 Initial revision
kono
parents:
diff changeset
673 \def\Sissue#1{\gdef\@Sissue{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
674 \def\@Sissue{}
685b35adf419 Initial revision
kono
parents:
diff changeset
675
685b35adf419 Initial revision
kono
parents:
diff changeset
676 \if@letter\typeofletter{研究速報}\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
677 \field{X}
685b35adf419 Initial revision
kono
parents:
diff changeset
678 \no{xx}
685b35adf419 Initial revision
kono
parents:
diff changeset
679 \vol{x}
685b35adf419 Initial revision
kono
parents:
diff changeset
680
685b35adf419 Initial revision
kono
parents:
diff changeset
681 \let\head@font\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
682 \DeclareFixedFont{\KFfoot}{JY1}{gt}{m}{n}{10\@JQ}
685b35adf419 Initial revision
kono
parents:
diff changeset
683 \def\foot@font{\Small\sffamily\KFfoot}
685b35adf419 Initial revision
kono
parents:
diff changeset
684 \def\nombre@font{\Small\sffamily}
685b35adf419 Initial revision
kono
parents:
diff changeset
685 %% P (paper)
685b35adf419 Initial revision
kono
parents:
diff changeset
686 \def\t@typefont@P{%
685b35adf419 Initial revision
kono
parents:
diff changeset
687 \Huge\baselineskip\z@ %% 24\@JQ
685b35adf419 Initial revision
kono
parents:
diff changeset
688 }
685b35adf419 Initial revision
kono
parents:
diff changeset
689 %% LP (letterpaper)
685b35adf419 Initial revision
kono
parents:
diff changeset
690 \def\t@typefont@LP{%
685b35adf419 Initial revision
kono
parents:
diff changeset
691 \LARGE\baselineskip\z@ %% 18\@JQ
685b35adf419 Initial revision
kono
parents:
diff changeset
692 }
685b35adf419 Initial revision
kono
parents:
diff changeset
693 %% L (letter)
685b35adf419 Initial revision
kono
parents:
diff changeset
694 \let\t@typefont@L\huge
685b35adf419 Initial revision
kono
parents:
diff changeset
695 \def\head@type#1{%% 20\@JQ 平2
685b35adf419 Initial revision
kono
parents:
diff changeset
696 \if@cameraready
685b35adf419 Initial revision
kono
parents:
diff changeset
697 \@ifundefined{PSTricksLoaded}{\scalebox{1}[0.8]{\t@typefont@L #1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
698 {\def\tmp@scalebox##1{\pst@makebox{\@scalebox{##1}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
699 \ifx\tmp@scalebox\scalebox
685b35adf419 Initial revision
kono
parents:
diff changeset
700 \scalebox{1 0.8}{\t@typefont@L #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
701 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
702 \scalebox{1}[0.8]{\t@typefont@L #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
703 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
704 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
705 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
706 {\t@typefont@L #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
707 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
708 }
685b35adf419 Initial revision
kono
parents:
diff changeset
709
685b35adf419 Initial revision
kono
parents:
diff changeset
710 \if@cameraready
685b35adf419 Initial revision
kono
parents:
diff changeset
711 \def\hd@typeofletter{%
685b35adf419 Initial revision
kono
parents:
diff changeset
712 \def\@tempx{ショートノート}%
685b35adf419 Initial revision
kono
parents:
diff changeset
713 \ifx\@typeofletter\@tempx
685b35adf419 Initial revision
kono
parents:
diff changeset
714 シ\kern-.25zw ョ\kern-.25zw ー\kern-.25zw ト\kern-.35zw
685b35adf419 Initial revision
kono
parents:
diff changeset
715 ノ\kern-.25zw ー\kern-.25zw ト%
685b35adf419 Initial revision
kono
parents:
diff changeset
716 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
717 {\kanjiskip=-.075zw \@typeofletter}\hskip1mm
685b35adf419 Initial revision
kono
parents:
diff changeset
718 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
719 }
685b35adf419 Initial revision
kono
parents:
diff changeset
720 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
721 \def\hd@typeofletter{\@typeofletter}
685b35adf419 Initial revision
kono
parents:
diff changeset
722 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
723
685b35adf419 Initial revision
kono
parents:
diff changeset
724 \def\ps@ieicej{\let\@mkboth\@gobbletwo
685b35adf419 Initial revision
kono
parents:
diff changeset
725 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
726 \def\hrulefill{\leaders\hrule height-1.35mm depth1.85mm\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
727 \def\@oddhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
728 \smash{\hbox to \textwidth{%
685b35adf419 Initial revision
kono
parents:
diff changeset
729 \raisebox{-3mm}{\head@type{\hd@typeofletter}}\hrulefill
685b35adf419 Initial revision
kono
parents:
diff changeset
730 \llap{\normalsize\bfseries\mathversion{bold}\@Sissue}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
731 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
732 \def\@evenhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
733 \rlap{\smash{\hbox to \textwidth{%
685b35adf419 Initial revision
kono
parents:
diff changeset
734 \raisebox{-3mm}{\head@type{\hd@typeofletter}}\hrulefill
685b35adf419 Initial revision
kono
parents:
diff changeset
735 }}}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
736 \ifx\@Sissue\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
737 {\Small\head@font 電子情報通信学会論文誌\ \hd@year
685b35adf419 Initial revision
kono
parents:
diff changeset
738 /\@no\ Vol.\ \@vol\ No.\,\@no}%
685b35adf419 Initial revision
kono
parents:
diff changeset
739 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
740 {\normalsize\bfseries\mathversion{bold}\@Sissue}%
685b35adf419 Initial revision
kono
parents:
diff changeset
741 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
742 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
743 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
744 \def\hrulefill{\leaders\hrule height-1.5mm depth1.75mm\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
745 \if@letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
746 \def\@oddhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
747 \smash{\hbox to \textwidth{%
685b35adf419 Initial revision
kono
parents:
diff changeset
748 \raisebox{-3mm}{\csname t@typefont@\@type\endcsname\tl@type}\hrulefill
685b35adf419 Initial revision
kono
parents:
diff changeset
749 \llap{\normalsize\bfseries\mathversion{bold}\@Sissue}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
750 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
751 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
752 \def\@oddhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
753 \smash{\hbox to \textwidth{%
685b35adf419 Initial revision
kono
parents:
diff changeset
754 \rule[-1.75mm]{14mm}{0.25mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
755 \raisebox{-3mm}{\csname t@typefont@\@type\endcsname\tl@type}\hrulefill
685b35adf419 Initial revision
kono
parents:
diff changeset
756 \llap{\normalsize\bfseries\mathversion{bold}\@Sissue}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
757 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
758 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
759 \let\@evenhead\@oddhead
685b35adf419 Initial revision
kono
parents:
diff changeset
760 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
761 \def\@oddfoot{\@Lbot\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
762 {\foot@font 電子情報通信学会論文誌\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
763 \@field\hskip1zw Vol.\ \@vol\hskip1zw No.\,\@no\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
764 pp.\,\thepage --\pageref{ieicej@lastpage}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
765 \ft@year 年\@no 月}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
766 \llap{{\nombre@font\thepage\hskip3mm}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
767 \@Rbot}%
685b35adf419 Initial revision
kono
parents:
diff changeset
768 \def\@evenfoot{\@Lbot
685b35adf419 Initial revision
kono
parents:
diff changeset
769 \rlap{\hskip3mm{\nombre@font\thepage}}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
770 {\foot@font 電子情報通信学会論文誌\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
771 \@field\hskip1zw Vol.\ \@vol\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
772 No.\,\@no\hskip1zw pp.\,\thepage --\pageref{ieicej@lastpage}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
773 \ft@year 年\@no 月}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
774 \@Rbot}%
685b35adf419 Initial revision
kono
parents:
diff changeset
775 }
685b35adf419 Initial revision
kono
parents:
diff changeset
776
685b35adf419 Initial revision
kono
parents:
diff changeset
777 \def\ps@IEICEJ{\let\@mkboth\@gobbletwo
685b35adf419 Initial revision
kono
parents:
diff changeset
778 \def\@oddfoot{\@Lbot\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
779 {\nombre@font \thepage}\hskip3mm
685b35adf419 Initial revision
kono
parents:
diff changeset
780 \@Rbot}%
685b35adf419 Initial revision
kono
parents:
diff changeset
781 \def\@evenfoot{\@Lbot
685b35adf419 Initial revision
kono
parents:
diff changeset
782 \hskip3mm{\nombre@font \thepage}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
783 \@Rbot}
685b35adf419 Initial revision
kono
parents:
diff changeset
784 \def\@oddhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
785 \rlap{\hbox to \textwidth{\smash{\rule[-1.75mm]{\textwidth}{0.25mm}}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
786 \odd@header\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
787 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
788 \def\@evenhead{\@Ltop
685b35adf419 Initial revision
kono
parents:
diff changeset
789 \rlap{\hbox to \textwidth{\smash{\rule[-1.75mm]{\textwidth}{0.25mm}}}}\hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
790 {\Small\head@font 電子情報通信学会論文誌\
685b35adf419 Initial revision
kono
parents:
diff changeset
791 \hd@year /\@no\ Vol.\ {\let\bfseries\relax \@vol}\ No.\,\@no}%
685b35adf419 Initial revision
kono
parents:
diff changeset
792 \@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
793 }
685b35adf419 Initial revision
kono
parents:
diff changeset
794
685b35adf419 Initial revision
kono
parents:
diff changeset
795 \def\odd@header{%
685b35adf419 Initial revision
kono
parents:
diff changeset
796 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
797 {\Small\head@font レ\hskip1zw タ\hskip1zw ー}%
685b35adf419 Initial revision
kono
parents:
diff changeset
798 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
799 \if@letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
800 {\Small\head@font レ\hskip1zw タ\hskip1zw ー}%
685b35adf419 Initial revision
kono
parents:
diff changeset
801 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
802 \setbox\@tempboxb\hbox{\Small\head@font\def\\{\unskip\ignorespaces}%
685b35adf419 Initial revision
kono
parents:
diff changeset
803 \hd@type /\kern\z@\hd@title}%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
804 \ifdim \wd\@tempboxb > \textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
805 \ieicej@warning{header is too long. make it shorter.
685b35adf419 Initial revision
kono
parents:
diff changeset
806 ^^J\@spaces For example, \string\title[header title]{title}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
807 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
808 \box\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
809 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
810 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
811 }
685b35adf419 Initial revision
kono
parents:
diff changeset
812
685b35adf419 Initial revision
kono
parents:
diff changeset
813 \def\ps@empty{%
685b35adf419 Initial revision
kono
parents:
diff changeset
814 \def\@oddhead{\@Ltop\hfil\@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
815 \let\@evenhead\@oddhead
685b35adf419 Initial revision
kono
parents:
diff changeset
816 \def\@oddfoot{\@Lbot\hfil\@Rbot}%
685b35adf419 Initial revision
kono
parents:
diff changeset
817 \let\@evenfoot\@oddfoot
685b35adf419 Initial revision
kono
parents:
diff changeset
818 \let\@mkboth\@gobbletwo
685b35adf419 Initial revision
kono
parents:
diff changeset
819 }
685b35adf419 Initial revision
kono
parents:
diff changeset
820
685b35adf419 Initial revision
kono
parents:
diff changeset
821 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
822 \def\ps@plain{\let\@mkboth\@gobbletwo
685b35adf419 Initial revision
kono
parents:
diff changeset
823 \let\ps@jpl@in\ps@plain
685b35adf419 Initial revision
kono
parents:
diff changeset
824 \def\@oddhead{\@Ltop\hfil\@Rtop}%
685b35adf419 Initial revision
kono
parents:
diff changeset
825 \def\@oddfoot{\@Lbot\reset@font\hfil ---\ \thepage\ ---\@Rbot}% \hfil
685b35adf419 Initial revision
kono
parents:
diff changeset
826 \let\@evenhead\@oddhead
685b35adf419 Initial revision
kono
parents:
diff changeset
827 \let\@evenfoot\@oddfoot}
685b35adf419 Initial revision
kono
parents:
diff changeset
828 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
829
685b35adf419 Initial revision
kono
parents:
diff changeset
830 \def\jtitle{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
831 {\d@jtitle}{\s@jtitle}}
685b35adf419 Initial revision
kono
parents:
diff changeset
832 \def\d@jtitle[#1]#2{\gdef\hd@title{#1}\gdef\@jtitle{#2}}
685b35adf419 Initial revision
kono
parents:
diff changeset
833 \def\s@jtitle#1{\gdef\hd@title{#1}\gdef\@jtitle{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
834 \def\@jtitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
835 \def\hd@title{}
685b35adf419 Initial revision
kono
parents:
diff changeset
836
685b35adf419 Initial revision
kono
parents:
diff changeset
837 \def\etitle#1{\gdef\@etitle{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
838 \def\@etitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
839
685b35adf419 Initial revision
kono
parents:
diff changeset
840 \def\@fnsymbol#1{\ifcase#1 \or % \ensuremath{
685b35adf419 Initial revision
kono
parents:
diff changeset
841 \dagger\or
685b35adf419 Initial revision
kono
parents:
diff changeset
842 {\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
843 {\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
844 {\dagger}{\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
845 {\dagger}{\dagger}{\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
846 {\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
847 {\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
848 {\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
849 {\dagger}{\dagger}{\dagger}{\dagger}{\dagger}{\dagger}%
685b35adf419 Initial revision
kono
parents:
diff changeset
850 {\dagger}{\dagger}{\dagger}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
851 *\or {*}{*}\or {*}{*}{*}\or {*}{*}{*}{*}\or
685b35adf419 Initial revision
kono
parents:
diff changeset
852 {*}{*}{*}{*}{*}\or {*}{*}{*}{*}{*}{*}\or %% ((((((((((((((((((((
685b35adf419 Initial revision
kono
parents:
diff changeset
853 a)\or b)\or c)\or d)\or e)\or f)\or g)\or h)\or i)\or j)\or
685b35adf419 Initial revision
kono
parents:
diff changeset
854 k)\or l)\or m)\or n)\or o)\or p)\or q)\or r)\or s)\or t)\else
685b35adf419 Initial revision
kono
parents:
diff changeset
855 \@ctrerr\fi}% }
685b35adf419 Initial revision
kono
parents:
diff changeset
856 %% mathTimePlus redefines \@fnsymbol.
685b35adf419 Initial revision
kono
parents:
diff changeset
857 \let\ieicej@fnsymbol\@fnsymbol
685b35adf419 Initial revision
kono
parents:
diff changeset
858
685b35adf419 Initial revision
kono
parents:
diff changeset
859 \newtoks\@authorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
860 \newcount\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
861 \newcount\@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
862 \newcount\p@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
863 \p@alcnt=9\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
864 \newcount\@totalnumber
685b35adf419 Initial revision
kono
parents:
diff changeset
865 \newdimen\authornamesep
685b35adf419 Initial revision
kono
parents:
diff changeset
866 \authornamesep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
867 %% \authornamesep1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
868
685b35adf419 Initial revision
kono
parents:
diff changeset
869 \def\authorlist#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
870 \if@paper
685b35adf419 Initial revision
kono
parents:
diff changeset
871 \@authorlist={#1}\the\@authorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
872 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
873 \let\authorentry\Lauthorentry
685b35adf419 Initial revision
kono
parents:
diff changeset
874 \@authorlist={#1}\@chkmbrship
685b35adf419 Initial revision
kono
parents:
diff changeset
875 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
876 }
685b35adf419 Initial revision
kono
parents:
diff changeset
877
685b35adf419 Initial revision
kono
parents:
diff changeset
878 \def\Lauthorentry{\@ifnextchar[%% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
879 {\TRL@ae}{\NL@ae}}
685b35adf419 Initial revision
kono
parents:
diff changeset
880
685b35adf419 Initial revision
kono
parents:
diff changeset
881 \def\NL@ae#1#2#3#4{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
882 {\L@aeP{#1}{#2}{#3}{#4}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
883 {\L@ae{#1}{#2}{#3}{#4}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
884
685b35adf419 Initial revision
kono
parents:
diff changeset
885 \def\TRL@ae[#1]#2#3#4#5{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
886 {\TRL@aeP[#1]{#2}{#3}{#4}{#5}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
887 {\TRL@aeNP[#1]{#2}{#3}{#4}{#5}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
888
685b35adf419 Initial revision
kono
parents:
diff changeset
889 \def\L@ae#1#2#3#4{%
685b35adf419 Initial revision
kono
parents:
diff changeset
890 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
891 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
892 \get@al{#4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
893 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
894 \expandafter\xdef
685b35adf419 Initial revision
kono
parents:
diff changeset
895 \csname @jauthormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
896 \csname #3J@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
897 \fmt@Jan{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
898 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
899 \@authorname\kern\z@\plural@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
900 \csname @jauthormembership\number\@authorcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
901 \fmt@Ean{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
902 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
903 \@authorname\nobreak\plural@affi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
904 \expandafter\xdef\csname @authormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
905 \csname #3@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
906 \expandafter\xdef\csname @authormembership\number\@authorcnt*\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
907 \csname #3@members\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
908 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
909 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
910 }
685b35adf419 Initial revision
kono
parents:
diff changeset
911
685b35adf419 Initial revision
kono
parents:
diff changeset
912 \def\L@aeP#1#2#3#4[#5]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
913 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
914 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
915 \get@al{#4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
916 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
917 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
918 \get@p@al{#5}%
685b35adf419 Initial revision
kono
parents:
diff changeset
919 \expandafter\xdef\csname @jauthormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
920 \csname #3J@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
921 \fmt@Jan{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
922 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
923 \@authorname\kern\z@\plural@affi\plural@p@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
924 \csname @jauthormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
925 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
926 \fmt@Ean{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
927 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
928 \@authorname\nobreak\plural@affi\nobreak\plural@p@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
929 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
930 \expandafter\xdef\csname @authormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
931 \csname #3@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
932 \expandafter\xdef\csname @authormembership\number\@authorcnt*\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
933 \csname #3@members\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
934 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
935 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
936 \def\plural@p@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
937 }
685b35adf419 Initial revision
kono
parents:
diff changeset
938
685b35adf419 Initial revision
kono
parents:
diff changeset
939 \def\TRL@aeNP[#1]#2#3#4#5{%
685b35adf419 Initial revision
kono
parents:
diff changeset
940 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
941 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
942 \GetEma{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
943 \get@al{#5}%
685b35adf419 Initial revision
kono
parents:
diff changeset
944 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
945 \expandafter\xdef\csname @jauthormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
946 \csname #4J@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
947 \fmt@Jan{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
948 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
949 \@authorname\kern\z@\plural@affi\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
950 \csname @jauthormembership\number\@authorcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
951 \fmt@Ean{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
952 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
953 \@authorname\nobreak\plural@affi\email@affi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
954 \expandafter\xdef\csname @authormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
955 \csname #4@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
956 \expandafter\xdef\csname @authormembership\number\@authorcnt*\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
957 \csname #4@members\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
958 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
959 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
960 }
685b35adf419 Initial revision
kono
parents:
diff changeset
961
685b35adf419 Initial revision
kono
parents:
diff changeset
962 \def\TRL@aeP[#1]#2#3#4#5[#6]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
963 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
964 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
965 \GetEma{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
966 \get@al{#5}%
685b35adf419 Initial revision
kono
parents:
diff changeset
967 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
968 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
969 \get@p@al{#6}%
685b35adf419 Initial revision
kono
parents:
diff changeset
970 \expandafter\xdef\csname @jauthormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
971 \csname #4J@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
972 \fmt@Jan{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
973 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
974 \@authorname\kern\z@\plural@affi\plural@p@affi\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
975 \csname @jauthormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
976 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
977 \fmt@Ean{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
978 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
979 \@authorname\nobreak\plural@affi\nobreak\plural@p@affi\nobreak\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
980 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
981 \expandafter\xdef\csname @authormembership\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
982 \csname #4@member\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
983 \expandafter\xdef\csname @authormembership\number\@authorcnt*\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
984 \csname #4@members\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
985 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
986 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
987 \def\plural@p@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
988 }
685b35adf419 Initial revision
kono
parents:
diff changeset
989
685b35adf419 Initial revision
kono
parents:
diff changeset
990 \def\rJ@member{\hskip-.25zw (正員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
991 \def\mJ@member{\hskip-.25zw (正員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
992 \def\aJ@member{\hskip-.25zw (准員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
993 %%\def\nJ@member{(非会員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
994 \def\nJ@member{}
685b35adf419 Initial revision
kono
parents:
diff changeset
995 \def\sJ@member{\hskip-.25zw (学生員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
996 \def\hJ@member{\hskip-.25zw (名誉員)}
685b35adf419 Initial revision
kono
parents:
diff changeset
997 \def\fJ@member{\hskip-.25zw (正員:フェロー)}
685b35adf419 Initial revision
kono
parents:
diff changeset
998
685b35adf419 Initial revision
kono
parents:
diff changeset
999 \def\authorentry{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
1000 {\TR@ae}{\N@ae}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1001
685b35adf419 Initial revision
kono
parents:
diff changeset
1002 \def\N@ae#1#2#3{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
1003 {\@aeP{#1}{#2}{#3}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1004 {\@ae{#1}{#2}{#3}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1005
685b35adf419 Initial revision
kono
parents:
diff changeset
1006 \def\TR@ae[#1]#2#3#4{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
1007 {\TR@aeP[#1]{#2}{#3}{#4}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1008 {\TR@aeNP[#1]{#2}{#3}{#4}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1009
685b35adf419 Initial revision
kono
parents:
diff changeset
1010 \def\fmt@Jan#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1011 \setbox\@tempboxb\hbox{\spaceskip=100mm #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1012 \ifdim \wd\@tempboxb < 100mm %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1013 \ieicej@warning{Author's name "#1" doesn't have a space}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1014 \def\@tempname{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1015 \def\@tempb##1\@nil{##1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1016 \edef\@authorname{\expandafter\@tempb\@tempname \@nil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1017 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1018 \setbox\@tempboxb\hbox{#1}%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
1019 \ifdim \wd\@tempboxb > 5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1020 \def\@tempb##1 ##2\@nil{##1\hskip\authornamesep ##2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1021 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1022 \def\@tempb##1 ##2\@nil{\leavevmode\hbox to 5zw{##1\hfil ##2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1023 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1024 \def\@tempname{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1025 \edef\@authorname{\expandafter\@tempb\@tempname \@nil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1026 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1027 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1028
685b35adf419 Initial revision
kono
parents:
diff changeset
1029 \def\fmt@Ean#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1030 \@temptokena{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1031 \setbox\@tempboxa\hbox{\spaceskip=100mm #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1032 \ifdim \wd\@tempboxa < 100mm %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1033 \ieicej@warning{a space should be added between 1st and 2nd name: "#1"}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1034 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1035 \def\name@form##1 ##2\@nil{\gdef\@tempan{##1 \uppercase{##2}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1036 \expandafter\name@form\the\@temptokena\@nil
685b35adf419 Initial revision
kono
parents:
diff changeset
1037 \expandafter\@temptokena\expandafter{\@tempan}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1038 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1039 \def\@authorname{\the\@temptokena}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1040 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1041
685b35adf419 Initial revision
kono
parents:
diff changeset
1042 \newif\if@affinone \@affinonefalse
685b35adf419 Initial revision
kono
parents:
diff changeset
1043 \def\get@al#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1044 \def\@noaffi{none}\def\@tempaffi{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1045 \ifx\@noaffi\@tempaffi
685b35adf419 Initial revision
kono
parents:
diff changeset
1046 \global\@affinonetrue
685b35adf419 Initial revision
kono
parents:
diff changeset
1047 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1048 \@for\get@label:=#1\do{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1049 \@ifundefined{al@\get@label}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1050 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
1051 \global\advance \@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1052 \expandafter\xdef\csname al@\get@label\endcsname{\the\@alcnt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1053 \global\advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1054 \protected@xdef\plural@affi{\plural@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1055 \ifnum\@tempcnta=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1056 $^{\ieicej@fnsymbol{\csname al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1057 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1058 $^{,\ieicej@fnsymbol{\csname al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1059 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1060 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1061 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1062 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
1063 \global\advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1064 \protected@xdef\plural@affi{\plural@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1065 \ifnum\@tempcnta=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1066 $^{\ieicej@fnsymbol{\csname al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1067 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1068 $^{,\ieicej@fnsymbol{\csname al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1069 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1070 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1071 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1072 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1073 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1074 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1075 \def\plural@affi{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1076
685b35adf419 Initial revision
kono
parents:
diff changeset
1077 \def\get@p@al#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1078 \@for\get@label:=#1\do{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1079 \@ifundefined{p@al@\get@label}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1080 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
1081 \global\advance \p@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1082 \expandafter\xdef\csname p@al@\get@label\endcsname{\the\p@alcnt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1083 \global\advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1084 \protected@xdef\plural@p@affi{\plural@p@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1085 \ifnum\@tempcnta=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1086 $^{\ieicej@fnsymbol{\csname p@al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1087 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1088 $^{,\ieicej@fnsymbol{\csname p@al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1089 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1090 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1091 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1092 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
1093 \global\advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1094 \protected@xdef\plural@p@affi{\plural@p@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1095 \ifnum\@tempcnta=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1096 $^{\ieicej@fnsymbol{\csname p@al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1097 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1098 $^{,\ieicej@fnsymbol{\csname p@al@\get@label\endcsname}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1099 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1100 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1101 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1102 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1103 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1104 \def\plural@p@affi{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1105
685b35adf419 Initial revision
kono
parents:
diff changeset
1106 \def\@ae#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1107 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1108 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1109 \get@al{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1110 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1111 \fmt@Jan{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1112 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1113 \@authorname\kern\z@\rlap{\plural@affi}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1114 \fmt@Ean{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1115 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1116 \@authorname\nobreak\plural@affi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1117 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1118 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1119 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1120
685b35adf419 Initial revision
kono
parents:
diff changeset
1121 \def\@aeP#1#2#3[#4]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1122 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1123 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1124 \get@al{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1125 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1126 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1127 \get@p@al{#4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1128 \fmt@Jan{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1129 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1130 \@authorname\kern\z@\rlap{\plural@affi\plural@p@affi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1131 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1132 \fmt@Ean{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1133 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1134 \@authorname\nobreak\plural@affi\nobreak\plural@p@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1135 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1136 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1137 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1138 \def\plural@p@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1139 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1140
685b35adf419 Initial revision
kono
parents:
diff changeset
1141 \if@tecrep\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1142 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
1143 \font\EA@font=cmr5
685b35adf419 Initial revision
kono
parents:
diff changeset
1144 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1145 \if@letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
1146 \font\EA@font=cmr6
685b35adf419 Initial revision
kono
parents:
diff changeset
1147 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1148 \font\EA@font=cmr7
685b35adf419 Initial revision
kono
parents:
diff changeset
1149 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1150 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1151 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1152
685b35adf419 Initial revision
kono
parents:
diff changeset
1153 \def\email@affi{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1154 \if@tecrep\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1155 \ifx\@tempEma\empty\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1156 $^{\mbox{\EA@font\ieicej@fnsymbol{\the\c@enumiv}}}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1157 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1158 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1159 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1160
685b35adf419 Initial revision
kono
parents:
diff changeset
1161 \def\TR@aeNP[#1]#2#3#4{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1162 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1163 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1164 \GetEma{#1}
685b35adf419 Initial revision
kono
parents:
diff changeset
1165 \get@al{#4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1166 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1167 \fmt@Jan{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1168 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1169 \@authorname\kern\z@\plural@affi\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1170 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1171 \fmt@Ean{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1172 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1173 \@authorname\nobreak\plural@affi\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1174 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1175 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1176 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1177 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1178
685b35adf419 Initial revision
kono
parents:
diff changeset
1179 \def\TR@aeP[#1]#2#3#4[#5]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1180 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1181 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1182 \GetEma{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1183 \get@al{#4}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1184 \def\al@none{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1185 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1186 \get@p@al{#5}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1187 \fmt@Jan{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1188 \expandafter\xdef\csname @Jauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1189 \@authorname\kern\z@\plural@affi\plural@p@affi\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1190 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1191 \fmt@Ean{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1192 \expandafter\xdef\csname @Eauthorname\number\@authorcnt\endcsname{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1193 \@authorname\nobreak\plural@affi\nobreak\plural@p@affi\nobreak\email@affi
685b35adf419 Initial revision
kono
parents:
diff changeset
1194 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1195 \global\@totalnumber=\@authorcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1196 \def\plural@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1197 \def\plural@p@affi{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1198 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1199
685b35adf419 Initial revision
kono
parents:
diff changeset
1200 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
1201 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1202 \catcode`@=12\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1203 \gdef\GetEma#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1204 \def\tempema{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1205 \ifx\tempema\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1206 \def\tempAnDn{n n.n.n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1207 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1208 \def\tempa##1@##2\nil{##1 ##2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1209 \edef\tempAnDn{\expandafter\tempa\tempema\nil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1210 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1211 \ProcessEma
685b35adf419 Initial revision
kono
parents:
diff changeset
1212 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1213 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1214
685b35adf419 Initial revision
kono
parents:
diff changeset
1215 \newcount\tn@dn
685b35adf419 Initial revision
kono
parents:
diff changeset
1216
685b35adf419 Initial revision
kono
parents:
diff changeset
1217 \def\ProcessEma{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1218 \def\tempa##1 ##2\@nil{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1219 \@ifundefined{##2}
685b35adf419 Initial revision
kono
parents:
diff changeset
1220 {\expandafter\gdef\csname ##2\endcsname{##1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1221 \advance\tn@dn\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1222 \expandafter\def\csname adrs\number\tn@dn\endcsname{##2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1223 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1224 {\expandafter\xdef\csname ##2\endcsname{\csname ##2\endcsname,##1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1225 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1226 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1227 \def\get@AnDn{\expandafter\tempa\tempAnDn\@nil}\get@AnDn
685b35adf419 Initial revision
kono
parents:
diff changeset
1228 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1229
685b35adf419 Initial revision
kono
parents:
diff changeset
1230 \def\fmt@Ema{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1231 \@tempcntb\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1232 \loop
685b35adf419 Initial revision
kono
parents:
diff changeset
1233 \ifnum\@tempcntb<\tn@dn %%>
685b35adf419 Initial revision
kono
parents:
diff changeset
1234 \advance\@tempcntb\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1235 \def\ad@none{n.n.n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1236 \expandafter\ifx\csname adrs\number\@tempcntb\endcsname \ad@none
685b35adf419 Initial revision
kono
parents:
diff changeset
1237 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1238 \edef\tmp@An{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1239 \expandafter\csname \csname adrs\number\@tempcntb\endcsname \endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1240 \@tempcnta\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1241 \@for\get@An:=\tmp@An\do{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1242 \global\advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1243 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1244 \protected@xdef\Mail@ddress{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1245 \ifx\Mail@ddress\empty\else\Mail@ddress,\ \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1246 \ifnum\@totalnumber=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1247 \if@affinone\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1248 $\ieicej@fnsymbol{\the\@tempcntb}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1249 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1250 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1251 $\ieicej@fnsymbol{\the\@tempcntb}$%
685b35adf419 Initial revision
kono
parents:
diff changeset
1252 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1253 \ifnum\@tempcnta=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1254 \expandafter\csname \csname adrs\number\@tempcntb\endcsname \endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1255 @\csname adrs\number\@tempcntb\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1256 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1257 \{%% \protect
685b35adf419 Initial revision
kono
parents:
diff changeset
1258 \expandafter\csname \csname adrs\number\@tempcntb\endcsname \endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1259 \}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1260 @\csname adrs\number\@tempcntb\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1261 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1262 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1263 \gdef\header@ma{E-mail:}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1264 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1265 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1266 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1267 \def\Mail@ddress{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1268 \def\header@ma{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1269
685b35adf419 Initial revision
kono
parents:
diff changeset
1270 \def\MailAddress#1{\gdef\@MailAddress{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1271 \def\@MailAddress{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1272 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1273 \setcounter{enumiv}{15}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1274 \def\GetEma#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1275 \def\@tempEma{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1276 \ifx\@tempEma\empty\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1277 \global\advance \c@enumiv \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1278 \let\@fnsymbol\ieicej@fnsymbol
685b35adf419 Initial revision
kono
parents:
diff changeset
1279 \protected@xdef\@Emadrs{\@Emadrs
685b35adf419 Initial revision
kono
parents:
diff changeset
1280 \protect\footnotetext[\the\c@enumiv]{E-mail: \protect\texttt{#1}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1281 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1282 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1283 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1284 \def\@Emadrs{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1285 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1286
685b35adf419 Initial revision
kono
parents:
diff changeset
1287 \newcount\@spcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1288 \newcount\alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1289 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
1290 \alignorder=2\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1291 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1292 \if@paper
685b35adf419 Initial revision
kono
parents:
diff changeset
1293 \alignorder=4\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1294 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1295 \alignorder=3\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1296 %%\alignorder=4\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1297 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1298 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1299
685b35adf419 Initial revision
kono
parents:
diff changeset
1300 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
1301 \alignorder=5\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1302 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1303
685b35adf419 Initial revision
kono
parents:
diff changeset
1304 \def\fmt@Jauthorlist{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1305 \@tempcnta=\alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1306 \@tempcntb=\alignorder\advance \@tempcntb \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1307 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1308 \expandafter\def\csname sp\number\alignorder\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1309 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1310 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1311 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1312 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1313 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1314 \expandafter\def\csname sp\number\@tempcnta\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1315 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1316 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1317 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1318 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1319 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1320 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1321 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1322 \expandafter\def\csname sp\number\@tempcnta\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1323 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1324 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1325 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1326 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1327 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1328 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1329 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1330 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1331 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1332 \expandafter\def\csname sp\number\@tempcnta\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1333 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1334 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1335 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1336 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1337 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1338 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1339 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1340 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1341 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1342 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1343 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1344 \expandafter\def\csname sp\number\@tempcnta\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1345 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1346 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1347 \ifnum \@totalnumber < \@tempcntb %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1348 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1349 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1350 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1351 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1352 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1353 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1354 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1355 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1356 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1357 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1358 \expandafter\def\csname sp\number\@tempcnta\endcsname{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1359 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1360 \advance \@tempcntb \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1361 \expandafter\def\csname sp\number\alignorder\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1362 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1363 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1364 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1365 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1366 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1367 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1368 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1369 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1370 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1371 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1372 \advance \@tempcnta \alignorder
685b35adf419 Initial revision
kono
parents:
diff changeset
1373 \expandafter\def\csname sp\number\@tempcnta\endcsname{\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1374 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1375 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1376 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1377 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1378 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1379 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1380 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1381
685b35adf419 Initial revision
kono
parents:
diff changeset
1382 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
1383 \def\@outputJauthorlist{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1384 \fmt@Jauthorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
1385 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1386 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1387 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1388 \advance \@spcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1389 \@ifundefined{sp\number\@spcnt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1390 {\expandafter\def\csname sp\number\@spcnt\endcsname{\hskip\Pauthorsep}}{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1391 \let\cr\@par
685b35adf419 Initial revision
kono
parents:
diff changeset
1392 \xdef\@tempx{\@tempx
685b35adf419 Initial revision
kono
parents:
diff changeset
1393 \mbox{\csname @Jauthorname\number\@authorcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1394 \csname sp\number\@spcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1395 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1396 \@tempx
685b35adf419 Initial revision
kono
parents:
diff changeset
1397 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1398 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1399 \def\@outputJauthorlist{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1400 \fmt@Jauthorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
1401 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1402 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1403 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1404 \advance \@spcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1405 \@ifundefined{sp\number\@spcnt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1406 {\expandafter\def\csname sp\number\@spcnt\endcsname{&}}{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1407 \xdef\@tempx{\@tempx\csname @Jauthorname\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1408 \csname sp\number\@spcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1409 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1410 \@tempx
685b35adf419 Initial revision
kono
parents:
diff changeset
1411 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1412 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1413
685b35adf419 Initial revision
kono
parents:
diff changeset
1414 \def\@tempx{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1415
685b35adf419 Initial revision
kono
parents:
diff changeset
1416 \def\breakauthorline#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1417 \@for\@breakauthor:=#1\do{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1418 \expandafter\gdef\csname @breakauthorline\@breakauthor\endcsname{\\}
685b35adf419 Initial revision
kono
parents:
diff changeset
1419 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1420 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1421 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1422 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1423 \@ifundefined{@breakauthorline\number\@authorcnt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1424 {\expandafter\gdef\csname @breakauthorline\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1425 {\relax}}{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1426 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1427 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1428
685b35adf419 Initial revision
kono
parents:
diff changeset
1429 \newcount\totalnumberm@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1430
685b35adf419 Initial revision
kono
parents:
diff changeset
1431 \def\L@outputEauthorlist{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1432 \def\r@member{{\itshape Member}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1433 \def\r@members{{\itshape Members}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1434 \def\m@member{{\itshape Member}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1435 \def\m@members{{\itshape Members}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1436 \def\n@member{{\itshape Nonmember}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1437 \def\n@members{{\itshape Nonmembers}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1438 \def\a@member{{\itshape Affiliate Member}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1439 \def\a@members{{\itshape Affiliate Members}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1440 \def\h@member{{\itshape Fellow, Honorary Member}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1441 \def\h@members{{\itshape Fellows, Honorary Members}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1442 \def\s@member{{\itshape Student Member}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1443 \def\s@members{{\itshape Student Members}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1444 \def\f@member{{\itshape Fellow}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1445 \def\f@members{{\itshape Fellows}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1446 \def\no@authormembership{\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1447 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1448 \totalnumberm@ne\@totalnumber \advance \totalnumberm@ne -\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1449 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1450 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1451 \ifnum \@authorcnt < \totalnumberm@ne %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1452 \mbox{\csname @Eauthorname\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1453 \expandafter\ifx \csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1454 \no@authormembership
685b35adf419 Initial revision
kono
parents:
diff changeset
1455 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1456 \nobreak,
685b35adf419 Initial revision
kono
parents:
diff changeset
1457 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1458 \nobreak\csname @authormembership\number\@authorcnt\endcsname}\nobreak,
685b35adf419 Initial revision
kono
parents:
diff changeset
1459 \csname @breakauthorline\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1460 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1461 \ifnum \@authorcnt = \@totalnumber
685b35adf419 Initial revision
kono
parents:
diff changeset
1462 \mbox{\csname @Eauthorname\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1463 \expandafter\ifx \csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1464 \no@authormembership
685b35adf419 Initial revision
kono
parents:
diff changeset
1465 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1466 \nobreak,
685b35adf419 Initial revision
kono
parents:
diff changeset
1467 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1468 \nobreak\csname @authormembership\number\@authorcnt\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1469 \csname @breakauthorline\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1470 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1471 \mbox{\csname @Eauthorname\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1472 \expandafter\ifx \csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1473 \no@authormembership
685b35adf419 Initial revision
kono
parents:
diff changeset
1474 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1475 \nobreak,
685b35adf419 Initial revision
kono
parents:
diff changeset
1476 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1477 \nobreak\csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1478 \ifnum \@totalnumber=\tw@\ \else , \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1479 \csname @breakauthorline\number\@authorcnt\endcsname\allowbreak
685b35adf419 Initial revision
kono
parents:
diff changeset
1480 and\
685b35adf419 Initial revision
kono
parents:
diff changeset
1481 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1482 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1483 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1484 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1485
685b35adf419 Initial revision
kono
parents:
diff changeset
1486 \def\@outputEauthorlist{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1487 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1488 \totalnumberm@ne\@totalnumber \advance \totalnumberm@ne -\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1489 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1490 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1491 \ifnum \@authorcnt < \totalnumberm@ne %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1492 \csname @Eauthorname\number\@authorcnt\endcsname\nobreak ,
685b35adf419 Initial revision
kono
parents:
diff changeset
1493 \csname @breakauthorline\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1494 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1495 \ifnum \@authorcnt = \@totalnumber
685b35adf419 Initial revision
kono
parents:
diff changeset
1496 \csname @Eauthorname\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1497 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1498 \csname @Eauthorname\number\@authorcnt\endcsname\nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
1499 \ifnum \@totalnumber=\tw@\ \else , \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1500 \csname @breakauthorline\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1501 and\ \nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
1502 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1503 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1504 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1505 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1506
685b35adf419 Initial revision
kono
parents:
diff changeset
1507 \newif\if@plural
685b35adf419 Initial revision
kono
parents:
diff changeset
1508 \newcount\@authorcntp@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1509
685b35adf419 Initial revision
kono
parents:
diff changeset
1510 %% letter and letter paper
685b35adf419 Initial revision
kono
parents:
diff changeset
1511 \def\@chkmbrship{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1512 \the\@authorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
1513 \@authorcnt \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1514 \@pluralfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
1515 \loop\ifnum \@authorcnt < \@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1516 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1517 \@authorcntp@ne=\@authorcnt \advance \@authorcntp@ne \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1518 \if@plural
685b35adf419 Initial revision
kono
parents:
diff changeset
1519 \edef\@nextmembership{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1520 \csname @authormembership\number\@authorcntp@ne*\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1521 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1522 \edef\@nextmembership{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1523 \csname @authormembership\number\@authorcntp@ne\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1524 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1525 \expandafter\ifx\csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1526 \@nextmembership
685b35adf419 Initial revision
kono
parents:
diff changeset
1527 \expandafter\gdef\csname @authormembership\number\@authorcnt\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1528 {\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1529 \edef\tempauthormembership
685b35adf419 Initial revision
kono
parents:
diff changeset
1530 {\csname @authormembership\number\@authorcntp@ne*\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1531 \expandafter\let
685b35adf419 Initial revision
kono
parents:
diff changeset
1532 \csname @authormembership\number\@authorcntp@ne\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
1533 \tempauthormembership \@pluraltrue
685b35adf419 Initial revision
kono
parents:
diff changeset
1534 \else \@pluralfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
1535 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1536 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1537 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1538
685b35adf419 Initial revision
kono
parents:
diff changeset
1539 \newcount\chk@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1540 \newcount\chk@p@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1541
685b35adf419 Initial revision
kono
parents:
diff changeset
1542 \if@tecrep %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
1543 \def\affiliate[#1]#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1544 \advance \chk@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1545 \@ifundefined{al@#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1546 {\expandafter\def\csname al@#1\endcsname{1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1547 \ieicej@warning{Check the "#1" label, it does not correspond to
685b35adf419 Initial revision
kono
parents:
diff changeset
1548 ^^J\space\space any labels in \string\authorentry\space command}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1549 }{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1550 \protected@xdef\J@affiliate{\J@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1551 $\protect\ieicej@fnsymbol{\csname al@#1\endcsname}$\ #2\\}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1552 \protected@xdef\E@affiliate{\E@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1553 $\protect\ieicej@fnsymbol{\csname al@#1\endcsname}$\ #3\\}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1554 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1555 \def\J@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1556 \def\E@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1557
685b35adf419 Initial revision
kono
parents:
diff changeset
1558 %% 引数を3つに変更
685b35adf419 Initial revision
kono
parents:
diff changeset
1559 \def\paffiliate[#1]#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1560 \advance \chk@p@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1561 \@ifundefined{p@al@#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1562 {\expandafter\def\csname p@al@#1\endcsname{1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1563 \ieicej@warning{Check the "#1" label, it does not correspond to
685b35adf419 Initial revision
kono
parents:
diff changeset
1564 ^^J\space\space any labels in \string\authorentry\space command}
685b35adf419 Initial revision
kono
parents:
diff changeset
1565 }{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1566 \protected@xdef\Jp@affiliate{\Jp@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1567 $\protect\ieicej@fnsymbol{\csname p@al@#1\endcsname}$\ #2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1568 \protected@xdef\Ep@affiliate{\Ep@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1569 $\protect\ieicej@fnsymbol{\csname p@al@#1\endcsname}$\ #3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1570 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1571 \def\Jp@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1572 \def\Ep@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1573 \else %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
1574 \def\affiliate[#1]#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1575 \advance \chk@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1576 \@ifundefined{al@#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1577 {\expandafter\def\csname al@#1\endcsname{1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1578 \ieicej@warning{Check the "#1" label, it does not correspond to
685b35adf419 Initial revision
kono
parents:
diff changeset
1579 ^^J\space\space any labels in \string\authorentry\space command}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1580 }{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1581 %% \let\@fnsymbol\ieicej@fnsymbol %% \show
685b35adf419 Initial revision
kono
parents:
diff changeset
1582 \protected@xdef\@affiliate{\@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1583 \protect\footnotetext[\csname al@#1\endcsname]{#2\hfil\break #3}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1584 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1585 \def\@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1586
685b35adf419 Initial revision
kono
parents:
diff changeset
1587 \def\paffiliate[#1]#2{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1588 \advance \chk@p@alcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1589 \@ifundefined{p@al@#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1590 {\expandafter\def\csname p@al@#1\endcsname{1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1591 \ieicej@warning{Check the "#1" label, it does not correspond to
685b35adf419 Initial revision
kono
parents:
diff changeset
1592 ^^J\space\space any labels in \string\authorentry\space command}
685b35adf419 Initial revision
kono
parents:
diff changeset
1593 }{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1594 %% \let\@fnsymbol\ieicej@fnsymbol %% \show
685b35adf419 Initial revision
kono
parents:
diff changeset
1595 \protected@xdef\p@affiliate{\p@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1596 \protect\footnotetext[\csname p@al@#1\endcsname]{#2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1597 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1598 \def\p@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1599 \fi %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
1600
685b35adf419 Initial revision
kono
parents:
diff changeset
1601 \newbox\eabstractbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1602 \newbox\ekeywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1603 \def\eabstract{\global\setbox\eabstractbox=\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1604 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
1605 \large
685b35adf419 Initial revision
kono
parents:
diff changeset
1606 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1607 \normalsize
685b35adf419 Initial revision
kono
parents:
diff changeset
1608 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1609 {\bfseries Abstract\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1610 \def\endeabstract{\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1611
685b35adf419 Initial revision
kono
parents:
diff changeset
1612 \def\ekeyword{\global\setbox\ekeywordbox=\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1613 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
1614 \large
685b35adf419 Initial revision
kono
parents:
diff changeset
1615 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1616 \normalsize
685b35adf419 Initial revision
kono
parents:
diff changeset
1617 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1618 {\bfseries Key words\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1619 \def\endekeyword{\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1620
685b35adf419 Initial revision
kono
parents:
diff changeset
1621 \newdimen\Pauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
1622 \Pauthorsep 7.5mm % 15Qx2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1623
685b35adf419 Initial revision
kono
parents:
diff changeset
1624 \def\titlepagebaselinestretch#1{\gdef\@titlepagebaselinestretch{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1625 \titlepagebaselinestretch{1}
685b35adf419 Initial revision
kono
parents:
diff changeset
1626
685b35adf419 Initial revision
kono
parents:
diff changeset
1627 \def\jsubtitle#1{\gdef\@jsubtitle{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1628 \def\@jsubtitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1629 \def\esubtitle#1{\gdef\@esubtitle{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1630 \def\@esubtitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1631
685b35adf419 Initial revision
kono
parents:
diff changeset
1632 \if@tecrep %%% technicalreport
685b35adf419 Initial revision
kono
parents:
diff changeset
1633 \def\maketitle{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1634 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1635 \ifnum \chk@alcnt < \@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1636 \ieicej@warning{information of \string\affiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1637 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1638 \advance \p@alcnt -9\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1639 \ifnum \chk@p@alcnt < \p@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1640 \ieicej@warning{information of \string\paffiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1641 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1642 \def\@fnsymbol##1{\ifcase##1 \or
685b35adf419 Initial revision
kono
parents:
diff changeset
1643 \dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1644 \dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1645 \dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1646 \dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1647 \dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1648 \dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1649 \dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1650 \dag\dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1651 \dag\dag\dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1652 *\or **\or ***\or ****\or *****\or ******\else\@ctrerr\fi\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1653 \def\thefootnote{\fnsymbol{footnote}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1654 \if@twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
1655 \twocolumn[\@maketitle]%
685b35adf419 Initial revision
kono
parents:
diff changeset
1656 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1657 \ieicej@warning{I don't recommend onecolumn option,
685b35adf419 Initial revision
kono
parents:
diff changeset
1658 ^^J\space\space because of no compatibility with technicalreport option}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1659 \@maketitle
685b35adf419 Initial revision
kono
parents:
diff changeset
1660 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1661 \endgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1662 \let\maketitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1663 \let\@maketitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1664 \gdef\@affiliate{}\gdef\p@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1665 \gdef\@jtitle{}\gdef\@etitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1666 \gdef\@jsubtitle{}\gdef\@esubtitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
1667 \let\affiliate\relax\let\paffiliate\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1668 \@authorlist={}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1669 \let\jkeyword\relax\let\jabstract\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1670 \let\ekeyword\relax\let\eabstract\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1671 \let\@outputJauthorlist\relax\let\@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1672 \let\@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1673 \let\@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1674 \let\TR@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1675 \let\N@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1676 \let\TR@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1677 \let\TR@aeNP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1678 \let\breakauthorline\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1679 \@authorcnt \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1680 \loop\ifnum \the\@authorcnt < \the\@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1681 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1682 \expandafter\let\csname @Jauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1683 \expandafter\let\csname @Eauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1684 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1685 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1686
685b35adf419 Initial revision
kono
parents:
diff changeset
1687 \def\@maketitle{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1688 \setbox\@tempboxa\vbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1689 \def\baselinestretch{\@titlepagebaselinestretch}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1690 \hskip8mm
685b35adf419 Initial revision
kono
parents:
diff changeset
1691 \vtop{\footnotesize\baselineskip3mm
685b35adf419 Initial revision
kono
parents:
diff changeset
1692 \hbox{社団法人\hskip1zw 電子情報通信学会}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1693 \hbox{THE INSTITUTE OF ELECTRONICS,}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1694 \hbox{INFORMATION AND COMMUNICATION ENGINEERS}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1695 }\hfill
685b35adf419 Initial revision
kono
parents:
diff changeset
1696 \vtop{\footnotesize\baselineskip3mm
685b35adf419 Initial revision
kono
parents:
diff changeset
1697 \hbox{信学技報}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1698 \hbox{TECHNICAL REPORT OF IEICE.}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1699 \hbox{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1700 }\hskip8mm\hbox{}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1701 \vskip\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1702 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1703 \centering
685b35adf419 Initial revision
kono
parents:
diff changeset
1704 {\fontsize{16}{23}\selectfont
685b35adf419 Initial revision
kono
parents:
diff changeset
1705 \@jtitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1706 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1707 \vskip.25\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1708 \ifx\@jsubtitle\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1709 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1710 {\huge
685b35adf419 Initial revision
kono
parents:
diff changeset
1711 \@jsubtitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1712 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1713 \vskip.25\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1714 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1715 {\LARGE
685b35adf419 Initial revision
kono
parents:
diff changeset
1716 \@outputJauthorlist\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1717 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1718 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1719 {\fontsize{10.5}{15}\selectfont
685b35adf419 Initial revision
kono
parents:
diff changeset
1720 \J@affiliate\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1721 \Jp@affiliate\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1722 \ifx\@MailAddress\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1723 \fmt@Ema
685b35adf419 Initial revision
kono
parents:
diff changeset
1724 \ifx\header@ma\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1725 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1726 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1727 E-mail: \Mail@ddress\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1728 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1729 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1730 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1731 E-mail: \@MailAddress
685b35adf419 Initial revision
kono
parents:
diff changeset
1732 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1733 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1734 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1735 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1736 \bgroup\large
685b35adf419 Initial revision
kono
parents:
diff changeset
1737 \leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
1738 \unhbox\jabstractbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1739 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1740 \vskip\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1741 \vskip-1zh
685b35adf419 Initial revision
kono
parents:
diff changeset
1742 \vskip0pt
685b35adf419 Initial revision
kono
parents:
diff changeset
1743 \leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
1744 \unhbox\jkeywordbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1745 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1746 %%
685b35adf419 Initial revision
kono
parents:
diff changeset
1747 \vskip1.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1748 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1749 \centering
685b35adf419 Initial revision
kono
parents:
diff changeset
1750 {\fontsize{16}{23}\selectfont
685b35adf419 Initial revision
kono
parents:
diff changeset
1751 \@etitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1752 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1753 \vskip.25\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1754 \ifx\@esubtitle\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1755 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1756 {\huge
685b35adf419 Initial revision
kono
parents:
diff changeset
1757 \@esubtitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1758 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1759 \vskip.25\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1760 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1761 {\LARGE
685b35adf419 Initial revision
kono
parents:
diff changeset
1762 \hyphenpenalty=10000\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1763 \@outputEauthorlist\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1764 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1765 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1766 {\fontsize{10.5}{15}\selectfont
685b35adf419 Initial revision
kono
parents:
diff changeset
1767 \E@affiliate\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1768 \Ep@affiliate\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1769 \ifx\@MailAddress\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1770 \ifx\header@ma\empty
685b35adf419 Initial revision
kono
parents:
diff changeset
1771 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1772 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1773 E-mail: \Mail@ddress\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1774 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1775 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1776 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1777 E-mail: \@MailAddress
685b35adf419 Initial revision
kono
parents:
diff changeset
1778 \vskip.5\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1779 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1780 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1781 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1782 \bgroup\large
685b35adf419 Initial revision
kono
parents:
diff changeset
1783 \leavevmode \unhbox\eabstractbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1784 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1785 \vskip\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1786 \vskip-1zh
685b35adf419 Initial revision
kono
parents:
diff changeset
1787 \vskip0pt
685b35adf419 Initial revision
kono
parents:
diff changeset
1788 \leavevmode \unhbox\ekeywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1789 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1790 \vskip\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1791 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1792 \@tempdima\ht\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
1793 \advance \@tempdima \dp\@tempboxa %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
1794 \ifdim \@tempdima>\textheight
685b35adf419 Initial revision
kono
parents:
diff changeset
1795 \ieicej@warning{The title page is too high.
685b35adf419 Initial revision
kono
parents:
diff changeset
1796 ^^J\space\space You can adjust the height of a title page
685b35adf419 Initial revision
kono
parents:
diff changeset
1797 ^^J\space\space by changing \string\titlepagebaselinestretch\space
685b35adf419 Initial revision
kono
parents:
diff changeset
1798 in preamble.
685b35adf419 Initial revision
kono
parents:
diff changeset
1799 ^^J\space\space For example, \string\titlepagebaselinestretch{0.9}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1800 {\parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1801 \vtop to \z@{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1802 \vbox to \textheight{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1803 \unvbox\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
1804 }\vss
685b35adf419 Initial revision
kono
parents:
diff changeset
1805 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1806 }\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1807 \clearpage
685b35adf419 Initial revision
kono
parents:
diff changeset
1808 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1809 \divide \@tempdima \Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
1810 \@tempcnta=\@tempdima
685b35adf419 Initial revision
kono
parents:
diff changeset
1811 \advance \@tempcnta \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1812 \vbox to \@tempcnta\Cvs{%
685b35adf419 Initial revision
kono
parents:
diff changeset
1813 \box\@tempboxa\vss
685b35adf419 Initial revision
kono
parents:
diff changeset
1814 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1815 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1816 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1817
685b35adf419 Initial revision
kono
parents:
diff changeset
1818 \newbox\jabstractbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1819 \newbox\jkeywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1820
685b35adf419 Initial revision
kono
parents:
diff changeset
1821 \def\jabstract{\global\setbox\jabstractbox\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1822 \large
685b35adf419 Initial revision
kono
parents:
diff changeset
1823 {\bfseries あらまし\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1824 \def\endjabstract{\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1825
685b35adf419 Initial revision
kono
parents:
diff changeset
1826 \def\jkeyword{\global\setbox\jkeywordbox\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1827 \large
685b35adf419 Initial revision
kono
parents:
diff changeset
1828 {\bfseries キーワード\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1829 \def\endjkeyword{\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1830
685b35adf419 Initial revision
kono
parents:
diff changeset
1831 \let\abstract\jabstract
685b35adf419 Initial revision
kono
parents:
diff changeset
1832 \let\endabstract\endjabstract
685b35adf419 Initial revision
kono
parents:
diff changeset
1833 \let\keyword\jkeyword
685b35adf419 Initial revision
kono
parents:
diff changeset
1834 \let\endkeyword\endjkeyword
685b35adf419 Initial revision
kono
parents:
diff changeset
1835
685b35adf419 Initial revision
kono
parents:
diff changeset
1836 \else %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
1837
685b35adf419 Initial revision
kono
parents:
diff changeset
1838 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
1839 \def\abstract{\parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1840 \hspace*{1zw}{\bfseries あらまし\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1841 \def\endabstract{\par\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1842
685b35adf419 Initial revision
kono
parents:
diff changeset
1843 \def\keyword{\parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1844 \hspace*{1zw}{\bfseries キーワード\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1845 \def\endkeyword{\par}
685b35adf419 Initial revision
kono
parents:
diff changeset
1846 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1847 \newbox\abstractbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1848 \newbox\keywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
1849 \def\abstract{\global\setbox\abstractbox=\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1850 \begin{minipage}[t]{137.5mm}%11Q 50zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1851 \Small\hskip1zw{\bfseries あらまし\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1852 \def\endabstract{\end{minipage}\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1853
685b35adf419 Initial revision
kono
parents:
diff changeset
1854 \def\keyword{\global\setbox\keywordbox=\hbox\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1855 \begin{minipage}[t]{137.5mm}%11Q 50zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1856 \Small\hskip1zw{\bfseries キーワード\hskip1zw}\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
1857 \def\endkeyword{\end{minipage}\egroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
1858 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1859
685b35adf419 Initial revision
kono
parents:
diff changeset
1860 \let\jabstract\abstract
685b35adf419 Initial revision
kono
parents:
diff changeset
1861 \let\endjabstract\endabstract
685b35adf419 Initial revision
kono
parents:
diff changeset
1862 \let\jkeyword\keyword
685b35adf419 Initial revision
kono
parents:
diff changeset
1863 \let\endjkeyword\endkeyword
685b35adf419 Initial revision
kono
parents:
diff changeset
1864
685b35adf419 Initial revision
kono
parents:
diff changeset
1865 \newdimen\Lauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
1866 %% \Lauthorsep 4.125mm % 11Qx1.5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1867 \Lauthorsep 5.5mm % 11Qx2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1868 \newdimen\LPauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
1869 %% \LPauthorsep 3mm % 12Qx1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1870 \LPauthorsep 6mm % 12Qx2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1871 %%\newdimen\Pauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
1872 %% \Pauthorsep 7.5mm % 15Qx2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1873
685b35adf419 Initial revision
kono
parents:
diff changeset
1874 \def\makeLtitle{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1875 \global\@topnum\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1876 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1877 \ifnum \chk@alcnt < \@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1878 \ieicej@warning{information of \string\affiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1879 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1880 \advance \p@alcnt -9\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1881 \ifnum \chk@p@alcnt < \p@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1882 \ieicej@warning{information of \string\paffiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1883 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1884 \long\def\@makefntext##1{% <<
685b35adf419 Initial revision
kono
parents:
diff changeset
1885 \ifnum \p@alcnt > \@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
1886 \ifnum \p@alcnt > \thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
1887 \@tempdima=\p@alcnt zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1888 \divide \@tempdima \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
1889 \advance \@tempdima .75zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1890 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1891 \@tempdima=2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1892 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1893 \else %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
1894 \ifnum \@alcnt > \thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
1895 \@tempdima=\@alcnt zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1896 \divide \@tempdima \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
1897 \advance \@tempdima .75zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1898 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1899 \@tempdima=2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
1900 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1901 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1902 \@tempdimb=\columnwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
1903 \global\advance \@tempdimb -\@tempdima %% 02
685b35adf419 Initial revision
kono
parents:
diff changeset
1904 \everypar={\hangindent=\@tempdima \hangafter=1\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1905 \parindent\@tempdima
685b35adf419 Initial revision
kono
parents:
diff changeset
1906 \noindent
685b35adf419 Initial revision
kono
parents:
diff changeset
1907 \if@tempswa
685b35adf419 Initial revision
kono
parents:
diff changeset
1908 \hbox to \@tempdima{\hss
685b35adf419 Initial revision
kono
parents:
diff changeset
1909 \@thefnmark\ }\parbox[t]{\@tempdimb}{##1\strut}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1910 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
1911 \hbox to \@tempdima{\hss
685b35adf419 Initial revision
kono
parents:
diff changeset
1912 $^{\@thefnmark}$\,}\parbox[t]{\@tempdimb}{##1\strut}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1913 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1914 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
1915 \def\thefootnote{\fnsymbol{footnote}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1916 \def\@fnsymbol##1{\ifcase##1 \or
685b35adf419 Initial revision
kono
parents:
diff changeset
1917 \dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1918 \dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1919 \dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1920 \dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1921 \dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1922 \dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1923 \dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1924 \dag\dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1925 \dag\dag\dag\dag\dag\dag\dag\dag\dag\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1926 *\or **\or ***\or ****\or *****\or ******\or %% ((((((((((((((((((((
685b35adf419 Initial revision
kono
parents:
diff changeset
1927 a)\or b)\or c)\or d)\or e)\or f)\or g)\or h)\or i)\or j)\or
685b35adf419 Initial revision
kono
parents:
diff changeset
1928 k)\or l)\or m)\or n)\or o)\or p)\or q)\or r)\or s)\or t)\else
685b35adf419 Initial revision
kono
parents:
diff changeset
1929 \@ctrerr\fi\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1930 \skip\@mpfootins=2.75mm \@plus .25mm \@minus \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1931 \noindent
685b35adf419 Initial revision
kono
parents:
diff changeset
1932 \begin{minipage}{\columnwidth}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1933 \@makeLtitle
685b35adf419 Initial revision
kono
parents:
diff changeset
1934 \@tempswafalse
685b35adf419 Initial revision
kono
parents:
diff changeset
1935 \@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1936 \p@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
1937 \@tempswatrue
685b35adf419 Initial revision
kono
parents:
diff changeset
1938 \@Emadrs
685b35adf419 Initial revision
kono
parents:
diff changeset
1939 \end{minipage}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1940 \vskip23\@Q \@plus 18\@Q \@minus 1\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
1941 \thispagestyle{ieicej}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1942 \endgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1943 \let\makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1944 \let\@makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1945 \gdef\@affiliate{}\gdef\p@affiliate{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1946 \gdef\@jtitle{}\gdef\@etitle{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1947 \let\affiliate\relax\let\paffiliate\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1948 \@authorlist={}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1949 \let\@outputJauthorlist\relax\let\L@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1950 \let\L@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1951 \let\L@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1952 \let\breakauthorline\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1953 \@authorcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1954 \loop\ifnum \the\@authorcnt < \the\@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1955 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
1956 \expandafter\let\csname @Jauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1957 \expandafter\let\csname @Eauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1958 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
1959 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1960
685b35adf419 Initial revision
kono
parents:
diff changeset
1961 \def\@makeLtitle{\newpage
685b35adf419 Initial revision
kono
parents:
diff changeset
1962 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1963 \null\parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1964 \tabcolsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
1965 \linethickness{0.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1966 \vskip3.75mm
685b35adf419 Initial revision
kono
parents:
diff changeset
1967 {\bfseries\mathversion{bold}\baselineskip18\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
1968 \@jtitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1969 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1970 {\Small
685b35adf419 Initial revision
kono
parents:
diff changeset
1971 \tabcolsep\Lauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
1972 \begin{tabular}{@{}ll@{}}
685b35adf419 Initial revision
kono
parents:
diff changeset
1973 \@outputJauthorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
1974 \end{tabular}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1975 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1976 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
1977 \vskip4\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
1978 {\footnotesize
685b35adf419 Initial revision
kono
parents:
diff changeset
1979 \@etitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1980 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1981 \vskip3\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
1982 {\footnotesize
685b35adf419 Initial revision
kono
parents:
diff changeset
1983 \parbox[t]{\columnwidth}{\raggedright\baselineskip3.25mm
685b35adf419 Initial revision
kono
parents:
diff changeset
1984 \hyphenpenalty=10000\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1985 \L@outputEauthorlist}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1986 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1987 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1988 }
685b35adf419 Initial revision
kono
parents:
diff changeset
1989
685b35adf419 Initial revision
kono
parents:
diff changeset
1990 \def\maketitle{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
1991 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
1992 \ifnum \chk@alcnt < \@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1993 \ieicej@warning{information of \string\affiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1994 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1995 \advance \p@alcnt -9\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
1996 \ifnum \chk@p@alcnt < \p@alcnt %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
1997 \ieicej@warning{information of \string\paffiliate\space is not assigned}%
685b35adf419 Initial revision
kono
parents:
diff changeset
1998 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
1999 \twocolumn[\csname @make\@type title\endcsname]
685b35adf419 Initial revision
kono
parents:
diff changeset
2000 \thispagestyle{ieicej}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2001 \def\thefootnote{\fnsymbol{footnote}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2002 \long\def\@makefntext##1{%% <<
685b35adf419 Initial revision
kono
parents:
diff changeset
2003 \ifnum \p@alcnt > \@alcnt
685b35adf419 Initial revision
kono
parents:
diff changeset
2004 \ifnum \p@alcnt > \thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
2005 \@tempdima=\p@alcnt zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2006 \divide \@tempdima \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
2007 \advance \@tempdima .75zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2008 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2009 \@tempdima=2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2010 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2011 \else %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2012 \ifnum \@alcnt > \thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
2013 \@tempdima=\@alcnt zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2014 \divide \@tempdima \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
2015 \advance \@tempdima .5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2016 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2017 \@tempdima=2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2018 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2019 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2020 \everypar={\hangindent=\@tempdima \hangafter=1\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2021 \parindent\@tempdima
685b35adf419 Initial revision
kono
parents:
diff changeset
2022 \noindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2023 \if@tempswa
685b35adf419 Initial revision
kono
parents:
diff changeset
2024 \hbox to \@tempdima{\hss \@thefnmark\ }##1%
685b35adf419 Initial revision
kono
parents:
diff changeset
2025 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2026 \hbox to \@tempdima{\hss $^{\@thefnmark}$\,}##1%
685b35adf419 Initial revision
kono
parents:
diff changeset
2027 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2028 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2029 \@tempswafalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2030 \@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
2031 \p@affiliate
685b35adf419 Initial revision
kono
parents:
diff changeset
2032 \@tempswatrue
685b35adf419 Initial revision
kono
parents:
diff changeset
2033 \@Emadrs
685b35adf419 Initial revision
kono
parents:
diff changeset
2034 \endgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2035 \let\maketitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2036 \expandafter\let\csname @make\@type title\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2037 \gdef\@affiliate{}\gdef\p@affiliate{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2038 \gdef\@jtitle{}\gdef\@etitle{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2039 \let\affiliate\relax\let\paffiliate\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2040 \@authorlist={}
685b35adf419 Initial revision
kono
parents:
diff changeset
2041 \let\keyword\relax\let\abstract\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2042 \let\@outputJauthorlist\relax\let\@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2043 \let\L@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2044 \let\@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2045 \let\@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2046 \let\L@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2047 \let\L@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2048 \let\breakauthorline\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2049 \@authorcnt \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2050 \loop\ifnum \the\@authorcnt < \the\@totalnumber %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
2051 \advance \@authorcnt \@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
2052 \expandafter\let\csname @Jauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2053 \expandafter\let\csname @Eauthorname\number\@authorcnt\endcsname\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2054 \repeat
685b35adf419 Initial revision
kono
parents:
diff changeset
2055 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2056
685b35adf419 Initial revision
kono
parents:
diff changeset
2057 \def\ADJ#1{\gdef\@ADJ{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2058 \def\@ADJ{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2059 \ADJ{0mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2060
685b35adf419 Initial revision
kono
parents:
diff changeset
2061 %% paper
685b35adf419 Initial revision
kono
parents:
diff changeset
2062 \def\@makePtitle{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2063 \setbox\@tempboxa\hbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2064 \begin{minipage}{137.5mm}% 151.5 - 14
685b35adf419 Initial revision
kono
parents:
diff changeset
2065 \vskip4.5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2066 \parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2067 \tabcolsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2068 \linethickness{0.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2069 \baselineskip33\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2070 {\LARGE
685b35adf419 Initial revision
kono
parents:
diff changeset
2071 \@jtitle
685b35adf419 Initial revision
kono
parents:
diff changeset
2072 }\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2073 \vskip11\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2074 {\Large
685b35adf419 Initial revision
kono
parents:
diff changeset
2075 \tabcolsep\Pauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
2076 \begin{tabular}{@{}llll@{}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2077 \@outputJauthorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
2078 \end{tabular}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2079 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2080 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2081 \vskip1mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2082 \Large\baselineskip24\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2083 \vskip14\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2084 \@etitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2085 \vskip8\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2086 {\large\baselineskip21\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2087 \parbox[t]{137.5mm}{\raggedright\baselineskip5.25mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2088 \hyphenpenalty=10000\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2089 \@outputEauthorlist}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2090 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2091 \vskip35\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2092 \hfill\box\abstractbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2093 \vskip4\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2094 \hfill\box\keywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
2095 \end{minipage}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2096 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2097 \@tempdima\ht\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2098 \advance \@tempdima \dp\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2099 \divide \@tempdima \Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
2100 \@tempcnta=\@tempdima
685b35adf419 Initial revision
kono
parents:
diff changeset
2101 \advance \@tempcnta \thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
2102 {\newpage\null
685b35adf419 Initial revision
kono
parents:
diff changeset
2103 \boxmaxdepth\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2104 \lineskiplimit\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2105 \lineskip\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2106 \parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2107 \vbox to \@tempcnta\Cvs{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2108 \hskip14mm\box\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2109 \vss}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2110 }\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2111 \vspace{\@ADJ}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2112 \setcounter{footnote}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2113 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2114
685b35adf419 Initial revision
kono
parents:
diff changeset
2115 %% letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
2116 \def\@makeLPtitle{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2117 \setbox\@tempboxa\hbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2118 \begin{minipage}{137.5mm}% 151.5 - 14
685b35adf419 Initial revision
kono
parents:
diff changeset
2119 \vskip5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2120 \parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2121 \tabcolsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2122 \linethickness{0.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2123 {\jtitlefont@LP
685b35adf419 Initial revision
kono
parents:
diff changeset
2124 \@jtitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2125 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2126 \vskip11\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2127 {\jauthorfont@LP
685b35adf419 Initial revision
kono
parents:
diff changeset
2128 \tabcolsep\LPauthorsep
685b35adf419 Initial revision
kono
parents:
diff changeset
2129 \begin{tabular}{@{}llll@{}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2130 \@outputJauthorlist
685b35adf419 Initial revision
kono
parents:
diff changeset
2131 \end{tabular}
685b35adf419 Initial revision
kono
parents:
diff changeset
2132 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2133 \vskip12\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2134 {\etitlefont@LP
685b35adf419 Initial revision
kono
parents:
diff changeset
2135 \@etitle\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2136 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2137 \vskip2\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2138 {\eauthorfont@LP
685b35adf419 Initial revision
kono
parents:
diff changeset
2139 \parbox[t]{137.5mm}{\raggedright\baselineskip14\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2140 \hyphenpenalty=10000\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2141 \L@outputEauthorlist}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2142 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2143 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2144 \vskip23\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2145 \hfill\box\abstractbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2146 \vskip3\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2147 \hfill\box\keywordbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2148 \end{minipage}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2149 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2150 \@tempdima\ht\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2151 \advance \@tempdima \dp\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2152 \divide \@tempdima \Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
2153 \@tempcnta=\@tempdima
685b35adf419 Initial revision
kono
parents:
diff changeset
2154 \advance \@tempcnta \tw@
685b35adf419 Initial revision
kono
parents:
diff changeset
2155 {\newpage\null
685b35adf419 Initial revision
kono
parents:
diff changeset
2156 \boxmaxdepth\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2157 \lineskiplimit\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2158 \lineskip\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2159 \parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2160 \vbox to \@tempcnta\Cvs{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2161 \hskip14mm\box\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2162 \vss}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2163 }\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2164 \vspace{\@ADJ}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2165 \setcounter{footnote}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2166 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2167
685b35adf419 Initial revision
kono
parents:
diff changeset
2168 %% LP (letterpaper)
685b35adf419 Initial revision
kono
parents:
diff changeset
2169 \def\jtitlefont@LP{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2170 \fontsize{16\@JQ}{24\@Q}\bfseries\selectfont
685b35adf419 Initial revision
kono
parents:
diff changeset
2171 \mathversion{bold}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2172 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2173 \def\etitlefont@LP{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2174 \normalsize\rmfamily\baselineskip14\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2175 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2176 \let\eauthorfont@LP\etitlefont@LP
685b35adf419 Initial revision
kono
parents:
diff changeset
2177 \def\jauthorfont@LP{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2178 \normalsize\baselineskip20\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2179 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2180
685b35adf419 Initial revision
kono
parents:
diff changeset
2181 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
2182 \let\maketitle\makeLtitle
685b35adf419 Initial revision
kono
parents:
diff changeset
2183 \let\@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2184 \let\@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2185 \let\@makePtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2186 \let\@makeLPtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2187 \let\@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2188 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2189
685b35adf419 Initial revision
kono
parents:
diff changeset
2190 \if@paper
685b35adf419 Initial revision
kono
parents:
diff changeset
2191 \let\L@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2192 \let\L@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2193 \let\makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2194 \let\@makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2195 \let\@makeLPtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2196 \let\L@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2197 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2198
685b35adf419 Initial revision
kono
parents:
diff changeset
2199 \if@letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
2200 \let\@aeP\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2201 \let\@ae\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2202 \let\makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2203 \let\@makeLtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2204 \let\@makePtitle\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2205 \let\@outputEauthorlist\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2206 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2207
685b35adf419 Initial revision
kono
parents:
diff changeset
2208 \fi %%%
685b35adf419 Initial revision
kono
parents:
diff changeset
2209
685b35adf419 Initial revision
kono
parents:
diff changeset
2210 \setcounter{secnumdepth}{5}
685b35adf419 Initial revision
kono
parents:
diff changeset
2211 \newcounter{section}
685b35adf419 Initial revision
kono
parents:
diff changeset
2212 \newcounter{subsection}[section]
685b35adf419 Initial revision
kono
parents:
diff changeset
2213 \newcounter{subsubsection}[subsection]
685b35adf419 Initial revision
kono
parents:
diff changeset
2214 \newcounter{paragraph}[subsubsection]
685b35adf419 Initial revision
kono
parents:
diff changeset
2215 \newcounter{subparagraph}[paragraph]
685b35adf419 Initial revision
kono
parents:
diff changeset
2216 \renewcommand{\thesection}{\@arabic\c@section.}
685b35adf419 Initial revision
kono
parents:
diff changeset
2217 \renewcommand{\thesubsection}{\thesection\,\@arabic\c@subsection}
685b35adf419 Initial revision
kono
parents:
diff changeset
2218 \renewcommand{\thesubsubsection}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2219 \thesubsection.\,\@arabic\c@subsubsection}
685b35adf419 Initial revision
kono
parents:
diff changeset
2220 \renewcommand{\theparagraph}{% (
685b35adf419 Initial revision
kono
parents:
diff changeset
2221 \@alph\c@paragraph\,)}
685b35adf419 Initial revision
kono
parents:
diff changeset
2222 \renewcommand{\thesubparagraph}{% (
685b35adf419 Initial revision
kono
parents:
diff changeset
2223 \@roman\c@subparagraph\,)}
685b35adf419 Initial revision
kono
parents:
diff changeset
2224
685b35adf419 Initial revision
kono
parents:
diff changeset
2225 \def\@afterheading{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2226 \global\@nobreaktrue
685b35adf419 Initial revision
kono
parents:
diff changeset
2227 \everypar{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2228 \if@nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
2229 \global\@nobreakfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2230 \clubpenalty \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2231 \if@afterindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2232 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2233 {\setbox\z@=\lastbox}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2234 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2235 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2236 \clubpenalty\@clubpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2237 \everypar{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2238 \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2239 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2240
685b35adf419 Initial revision
kono
parents:
diff changeset
2241 \def\@startsection#1#2#3#4#5#6{\if@noskipsec \leavevmode \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2242 \par \@tempskipa #4\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2243 \@afterindenttrue
685b35adf419 Initial revision
kono
parents:
diff changeset
2244 \ifdim \@tempskipa <\z@ \@tempskipa -\@tempskipa \@afterindentfalse\fi %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
2245 \if@nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
2246 \everypar{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2247 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2248 \addpenalty\@secpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2249 \ifnum #2=\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
2250 \vskip-\prevdepth \prevdepth\z@ \vskip\Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
2251 \advance\@tempskipa-\Cvs \vspace*{\@tempskipa}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2252 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2253 \addvspace\@tempskipa
685b35adf419 Initial revision
kono
parents:
diff changeset
2254 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2255 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2256 \@ifstar{\@ssect{#3}{#4}{#5}{#6}}{\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2257
685b35adf419 Initial revision
kono
parents:
diff changeset
2258 %% \@sect{NAME}{LEVEL}{INDENT}{BEFORESKIP}{AFTERSKIP}{STYLE}[ARG1]{ARG2}
685b35adf419 Initial revision
kono
parents:
diff changeset
2259 \def\@sect#1#2#3#4#5#6[#7]#8{%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2260 \ifnum #2>\c@secnumdepth
685b35adf419 Initial revision
kono
parents:
diff changeset
2261 \let\@svsec\@empty
685b35adf419 Initial revision
kono
parents:
diff changeset
2262 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2263 \refstepcounter{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2264 \protected@edef\@svsec{\@seccntformat{#1}\relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2265 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2266 \@tempskipa #5\relax %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2267 \ifdim \@tempskipa>\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2268 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2269 #6{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2270 \@hangfrom{\hskip #3\relax{\csname #2@font\endcsname \@svsec}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2271 \interlinepenalty \@M \@secjidori{#8}\@@par}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2272 \endgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2273 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2274 \def\@svsechd{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2275 #6{\hskip #3\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2276 \@svsec #8}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2277 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2278 \@xsect{#5}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2279
685b35adf419 Initial revision
kono
parents:
diff changeset
2280 %% \@ssect{INDENT}{BEFORESKIP}{AFTERSKIP}{STYLE}{ARG} ==
685b35adf419 Initial revision
kono
parents:
diff changeset
2281 \def\@ssect#1#2#3#4#5{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2282 \@tempskipa #3\relax %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2283 \ifdim \@tempskipa>\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2284 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2285 #4{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2286 \@hangfrom{\hskip #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2287 \interlinepenalty \@M \@secjidori{#5}\@@par}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2288 \endgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2289 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2290 \def\@svsechd{#4{\hskip #1\relax #5}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2291 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2292 \@xsect{#3}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2293
685b35adf419 Initial revision
kono
parents:
diff changeset
2294 \def\@secjidori#1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2295 \def\@tempfn{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2296 \def\@tempfncnt{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2297 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2298 \def\footnote{\@ifnextchar[% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
2299 {\@ignorefn}{\@ignorefn[]}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2300 \long\def\@ignorefn[##1]##2{\gdef\@tempfncnt{##1}\gdef\@tempfn{##2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2301 \global\setbox\@tempboxb\hbox{\inhibitglue #1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2302 \egroup %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2303 \ifdim \wd\@tempboxb>4.5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2304 \inhibitglue #1%
685b35adf419 Initial revision
kono
parents:
diff changeset
2305 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2306 \def\@makefnmark{\kern0pt\hbox to \z@{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2307 $^{\mbox{\tiny \kern-.5zw (注\@thefnmark{})\kern-.5zw}}$\hss}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2308 \kanjiskip\z@ \@plus 1fill \@minus 1fill\xkanjiskip=\kanjiskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2309 \jmathkanjiskip=\kanjiskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2310 \hbox to 5zw{\inhibitglue #1\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2311 \ifx\@tempfn\empty\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2312 \ifx\@tempfncnt\empty\footnotetext{\@tempfn}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2313 \footnotetext[\@tempfncnt]{\@tempfn}
685b35adf419 Initial revision
kono
parents:
diff changeset
2314 \fi\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2315 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2316 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2317
685b35adf419 Initial revision
kono
parents:
diff changeset
2318 \@namedef{3@font}{\bfseries}
685b35adf419 Initial revision
kono
parents:
diff changeset
2319 \def\@seccntformat#1{\csname the#1\endcsname\hskip1zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2320
685b35adf419 Initial revision
kono
parents:
diff changeset
2321 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
2322 \def\sec@font{\bfseries\mathversion{bold}\baselineskip20.5\@Q}
685b35adf419 Initial revision
kono
parents:
diff changeset
2323 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2324 \DeclareFixedFont{\KFsec}{JY1}{gt}{m}{n}{14\@JQ}
685b35adf419 Initial revision
kono
parents:
diff changeset
2325 \def\sec@font{\bfseries\KFsec\mathversion{bold}\baselineskip19\@Q}
685b35adf419 Initial revision
kono
parents:
diff changeset
2326 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2327
685b35adf419 Initial revision
kono
parents:
diff changeset
2328 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
2329 \newcommand{\section}{\@startsection{section}{1}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2330 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2331 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2332 {\reset@font\normalsize\bfseries\mathversion{bold}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2333 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2334 \newcommand{\section}{\@startsection{section}{1}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2335 {.5\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2336 {.5\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2337 {\reset@font\Large\sec@font}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2338 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2339 \newcommand{\subsection}{\@startsection{subsection}{2}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2340 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2341 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2342 {\reset@font\normalsize\bfseries\mathversion{bold}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2343 \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2344 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2345 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2346 {\reset@font\normalsize}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2347 \newcommand{\paragraph}{\@startsection{paragraph}{4}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2348 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2349 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2350 {\reset@font\normalsize}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2351 \newcommand{\subparagraph}{\@startsection{subparagraph}{5}{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2352 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2353 {.00001\Cvs \@plus.1mm \@minus.1mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2354 {\reset@font\normalsize}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2355
685b35adf419 Initial revision
kono
parents:
diff changeset
2356 \newcommand{\appendix}{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2357 \renewcommand{\section}{\@startsection{section}{1}{\z@}
685b35adf419 Initial revision
kono
parents:
diff changeset
2358 {.5\Cvs \@plus.1mm \@minus.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2359 {.5\Cvs \@plus.1mm \@minus.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2360 {\if@letter\centering\bfseries\else\centering\Large\sec@font\fi}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2361 \section*{付録}
685b35adf419 Initial revision
kono
parents:
diff changeset
2362 \renewcommand{\section}{\@startsection{section}{1}{1zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2363 {.00001\Cvs \@plus.1mm \@minus.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2364 {.00001\Cvs \@plus.1mm \@minus.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2365 {\normalsize\bfseries\mathversion{bold}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2366 \setcounter{section}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2367 \setcounter{subsection}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2368 \setcounter{equation}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2369 \setcounter{figure}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2370 \setcounter{table}{0}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2371 \def\theequation{\protect\mbox{A$\cdot$\@arabic\c@equation}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2372 \def\thefigure{A$\cdot$\,\@arabic\c@figure}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2373 \def\thetable{A$\cdot$\,\@arabic\c@table}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2374 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2375
685b35adf419 Initial revision
kono
parents:
diff changeset
2376 \if@twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
2377 \setlength\leftmargini {2zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2378 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2379 \setlength\leftmargini {2zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2380 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2381 \setlength\leftmarginii {2zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2382 \setlength\leftmarginiii {2zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2383 \setlength\leftmarginiv {2zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2384 \if@twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
2385 \setlength\leftmarginv {1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2386 \setlength\leftmarginvi{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2387 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2388 \setlength\leftmarginv {1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2389 \setlength\leftmarginvi{1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2390 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2391 \setlength \labelsep {1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2392 \setlength \labelwidth{\leftmargini}
685b35adf419 Initial revision
kono
parents:
diff changeset
2393 \addtolength\labelwidth{-\labelsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
2394 \@beginparpenalty -\@lowpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2395 \@endparpenalty -\@lowpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2396 \@itempenalty -\@lowpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2397
685b35adf419 Initial revision
kono
parents:
diff changeset
2398 \renewcommand{\theenumi}{\@arabic\c@enumi}
685b35adf419 Initial revision
kono
parents:
diff changeset
2399 \renewcommand{\theenumii}{\@alph\c@enumii}
685b35adf419 Initial revision
kono
parents:
diff changeset
2400 \renewcommand{\theenumiii}{\@roman\c@enumiii}
685b35adf419 Initial revision
kono
parents:
diff changeset
2401 \renewcommand{\theenumiv}{\@Alph\c@enumiv}
685b35adf419 Initial revision
kono
parents:
diff changeset
2402 \newcommand{\labelenumi}{\kern-.5zw (\,\theenumi\,)\kern-.5zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2403 \newcommand{\labelenumii}{\kern-.5zw (\,\theenumii\,)\kern-.5zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2404 \newcommand{\labelenumiii}{\theenumiii.}
685b35adf419 Initial revision
kono
parents:
diff changeset
2405 \newcommand{\labelenumiv}{\theenumiv.}
685b35adf419 Initial revision
kono
parents:
diff changeset
2406 \renewcommand{\p@enumii}{\theenumi}
685b35adf419 Initial revision
kono
parents:
diff changeset
2407 \renewcommand{\p@enumiii}{\theenumi(\theenumii)}
685b35adf419 Initial revision
kono
parents:
diff changeset
2408 \renewcommand{\p@enumiv}{\p@enumiii\theenumiii}
685b35adf419 Initial revision
kono
parents:
diff changeset
2409
685b35adf419 Initial revision
kono
parents:
diff changeset
2410 \renewenvironment{enumerate}
685b35adf419 Initial revision
kono
parents:
diff changeset
2411 {%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2412 \ifnum \@enumdepth >3\relax\@toodeep\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2413 \advance\@enumdepth\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
2414 \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2415 \list{\csname label\@enumctr\endcsname}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2416 \leftmargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2417 \labelwidth2zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2418 \labelsep1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2419 \itemindent4zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2420 \listparindent1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2421 \topsep\z@\parsep\z@\partopsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2422 \clubpenalty-200
685b35adf419 Initial revision
kono
parents:
diff changeset
2423 \usecounter{\@enumctr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2424 \def\makelabel##1{\hss\llap{##1}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2425 \fi}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2426
685b35adf419 Initial revision
kono
parents:
diff changeset
2427 \newcommand{\labelitemi}{\leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
2428 \raise.1zh\hbox to 1zw{\hss \textbullet\hss}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2429 \newcommand{\labelitemii}{{\normalfont\bfseries\textendash}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2430 \newcommand{\labelitemiii}{\textasteriskcentered}
685b35adf419 Initial revision
kono
parents:
diff changeset
2431 \newcommand{\labelitemiv}{\textperiodcentered}
685b35adf419 Initial revision
kono
parents:
diff changeset
2432
685b35adf419 Initial revision
kono
parents:
diff changeset
2433 \renewenvironment{itemize}
685b35adf419 Initial revision
kono
parents:
diff changeset
2434 {%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2435 \ifnum \@itemdepth >3\relax\@toodeep\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2436 \advance\@itemdepth\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
2437 \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2438 %% \expandafter
685b35adf419 Initial revision
kono
parents:
diff changeset
2439 \list{\csname \@itemitem\endcsname}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2440 \topsep\z@\parsep\z@\partopsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2441 \leftmargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2442 \labelwidth1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2443 \labelsep1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2444 \itemindent3zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2445 \listparindent1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2446 \clubpenalty-200\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2447 \def\makelabel##1{\hss\llap{##1}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2448 \fi}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2449
685b35adf419 Initial revision
kono
parents:
diff changeset
2450 \def\descriptionlabel#1{\hspace\labelsep #1}
685b35adf419 Initial revision
kono
parents:
diff changeset
2451 \newenvironment{description}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2452 \list{}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2453 \leftmargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2454 \labelsep1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2455 \labelwidth\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2456 \itemindent-\leftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2457 \listparindent1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2458 \topsep\z@\parsep\z@\partopsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2459 \let\makelabel\descriptionlabel}}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2460
685b35adf419 Initial revision
kono
parents:
diff changeset
2461 \newskip\@hlskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2462 \@hlskip.5\Cvs \@plus 1mm \@minus .5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2463
685b35adf419 Initial revision
kono
parents:
diff changeset
2464 \newenvironment{verse}
685b35adf419 Initial revision
kono
parents:
diff changeset
2465 {\let\\\@centercr
685b35adf419 Initial revision
kono
parents:
diff changeset
2466 \list{}{\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2467 \topsep\@hlskip\parsep\z@\partopsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2468 \itemindent -1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2469 \listparindent\itemindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2470 \rightmargin\leftmargin \advance\leftmargin 1zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2471 \item\relax}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2472
685b35adf419 Initial revision
kono
parents:
diff changeset
2473 \newenvironment{quotation}
685b35adf419 Initial revision
kono
parents:
diff changeset
2474 {\list{}{\listparindent 1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2475 \itemindent\listparindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2476 \rightmargin\leftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2477 \topsep\@hlskip\parsep\z@\partopsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2478 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2479 \item\relax}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2480
685b35adf419 Initial revision
kono
parents:
diff changeset
2481 \newenvironment{quote}
685b35adf419 Initial revision
kono
parents:
diff changeset
2482 {\list{}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2483 \topsep\@hlskip\parsep\z@\partopsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2484 \rightmargin\leftmargin}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2485 \item\relax}{\endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2486
685b35adf419 Initial revision
kono
parents:
diff changeset
2487 \gdef\tabbing{\lineskip \z@skip\let\>\@rtab\let\<\@ltab\let\=\@settab
685b35adf419 Initial revision
kono
parents:
diff changeset
2488 \let\+\@tabplus\let\-\@tabminus\let\`\@tabrj\let\'\@tablab
685b35adf419 Initial revision
kono
parents:
diff changeset
2489 \let\\=\@tabcr
685b35adf419 Initial revision
kono
parents:
diff changeset
2490 \@hightab\@firsttab
685b35adf419 Initial revision
kono
parents:
diff changeset
2491 \global\@nxttabmar\@firsttab
685b35adf419 Initial revision
kono
parents:
diff changeset
2492 \dimen\@firsttab\@totalleftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2493 \global\@tabpush\z@ \global\@rjfieldfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2494 \topsep\@hlskip \parsep\z@\partopsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2495 \trivlist \item\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2496 \if@minipage\else\vskip\parskip\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2497 \setbox\@tabfbox\hbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2498 \rlap{\hskip\@totalleftmargin\indent\the\everypar}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2499 \def\@itemfudge{\box\@tabfbox}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2500 \@startline\ignorespaces}
685b35adf419 Initial revision
kono
parents:
diff changeset
2501
685b35adf419 Initial revision
kono
parents:
diff changeset
2502 \newdimen\verbatimleftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2503 \verbatimleftmargin\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2504 \newdimen\verbatimbaselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2505 \verbatimbaselineskip\Cvs
685b35adf419 Initial revision
kono
parents:
diff changeset
2506 \def\verbatimsize{\normalsize}
685b35adf419 Initial revision
kono
parents:
diff changeset
2507
685b35adf419 Initial revision
kono
parents:
diff changeset
2508 \def\@verbatim{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2509 \topsep\z@\partopsep\z@\parsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2510 \trivlist \item\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2511 \if@minipage\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2512 \vskip\baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2513 \vskip-\verbatimbaselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2514 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2515 \leftskip\@totalleftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2516 \if@minipage\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2517 \advance \leftskip by \verbatimleftmargin
685b35adf419 Initial revision
kono
parents:
diff changeset
2518 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2519 \rightskip\z@skip
685b35adf419 Initial revision
kono
parents:
diff changeset
2520 \parindent\z@\parfillskip\@flushglue\parskip\z@skip
685b35adf419 Initial revision
kono
parents:
diff changeset
2521 \@@par
685b35adf419 Initial revision
kono
parents:
diff changeset
2522 \@tempswafalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2523 \def\par{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2524 \if@tempswa
685b35adf419 Initial revision
kono
parents:
diff changeset
2525 \leavevmode \null \@@par\penalty\interlinepenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2526 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2527 \@tempswatrue
685b35adf419 Initial revision
kono
parents:
diff changeset
2528 \ifhmode\@@par\penalty\interlinepenalty\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2529 \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2530 \let\do\@makeother \dospecials
685b35adf419 Initial revision
kono
parents:
diff changeset
2531 \obeylines
685b35adf419 Initial revision
kono
parents:
diff changeset
2532 \verbatimsize \baselineskip\verbatimbaselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2533 \ttfamily \@noligs
685b35adf419 Initial revision
kono
parents:
diff changeset
2534 \everypar \expandafter{\the\everypar \unpenalty}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2535 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2536
685b35adf419 Initial revision
kono
parents:
diff changeset
2537 %% from latex.ltx
685b35adf419 Initial revision
kono
parents:
diff changeset
2538 %% v1.3
685b35adf419 Initial revision
kono
parents:
diff changeset
2539 \def\@item[#1]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2540 \if@noparitem
685b35adf419 Initial revision
kono
parents:
diff changeset
2541 \@donoparitem
685b35adf419 Initial revision
kono
parents:
diff changeset
2542 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2543 \if@inlabel
685b35adf419 Initial revision
kono
parents:
diff changeset
2544 \indent \par
685b35adf419 Initial revision
kono
parents:
diff changeset
2545 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2546 \ifhmode
685b35adf419 Initial revision
kono
parents:
diff changeset
2547 \unskip\unskip \par
685b35adf419 Initial revision
kono
parents:
diff changeset
2548 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2549 \if@newlist
685b35adf419 Initial revision
kono
parents:
diff changeset
2550 \if@nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
2551 \@nbitem
685b35adf419 Initial revision
kono
parents:
diff changeset
2552 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2553 \addpenalty\@beginparpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2554 \addvspace\@topsep
685b35adf419 Initial revision
kono
parents:
diff changeset
2555 \addvspace{-\parskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2556 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2557 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2558 \addpenalty\@itempenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2559 \addvspace\itemsep
685b35adf419 Initial revision
kono
parents:
diff changeset
2560 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2561 \global\@inlabeltrue
685b35adf419 Initial revision
kono
parents:
diff changeset
2562 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2563 \everypar{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2564 \@minipagefalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2565 \global\@newlistfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2566 \if@inlabel
685b35adf419 Initial revision
kono
parents:
diff changeset
2567 \global\@inlabelfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2568 {\setbox\z@\lastbox
685b35adf419 Initial revision
kono
parents:
diff changeset
2569 \ifvoid\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2570 \kern-\itemindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2571 \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2572 \box\@labels
685b35adf419 Initial revision
kono
parents:
diff changeset
2573 \penalty\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2574 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2575 \if@nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
2576 \@nobreakfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2577 \clubpenalty\z@ %\@M --> \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2578 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2579 \clubpenalty \@clubpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2580 \everypar{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2581 \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2582 \if@noitemarg
685b35adf419 Initial revision
kono
parents:
diff changeset
2583 \@noitemargfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
2584 \if@nmbrlist
685b35adf419 Initial revision
kono
parents:
diff changeset
2585 \refstepcounter\@listctr
685b35adf419 Initial revision
kono
parents:
diff changeset
2586 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2587 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2588 \sbox\@tempboxa{\makelabel{#1}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2589 \global\setbox\@labels\hbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2590 \unhbox\@labels
685b35adf419 Initial revision
kono
parents:
diff changeset
2591 \hskip \itemindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2592 \hskip -\labelwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2593 \hskip -\labelsep
685b35adf419 Initial revision
kono
parents:
diff changeset
2594 \ifdim \wd\@tempboxa >\labelwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2595 \box\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2596 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2597 \hbox to\labelwidth {\unhbox\@tempboxa}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2598 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2599 \hskip \labelsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2600 \ignorespaces\inhibitglue
685b35adf419 Initial revision
kono
parents:
diff changeset
2601 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2602
685b35adf419 Initial revision
kono
parents:
diff changeset
2603 \newcounter{figure}
685b35adf419 Initial revision
kono
parents:
diff changeset
2604 \renewcommand{\thefigure}{\@arabic\c@figure}
685b35adf419 Initial revision
kono
parents:
diff changeset
2605 \def\fps@figure{tbp}
685b35adf419 Initial revision
kono
parents:
diff changeset
2606 \def\ftype@figure{1}
685b35adf419 Initial revision
kono
parents:
diff changeset
2607 \def\ext@figure{lof}
685b35adf419 Initial revision
kono
parents:
diff changeset
2608 \def\fnum@figure{\figurename~\thefigure}
685b35adf419 Initial revision
kono
parents:
diff changeset
2609 \def\fnum@efigure{Fig.\,\thefigure}
685b35adf419 Initial revision
kono
parents:
diff changeset
2610 \newenvironment{figure}
685b35adf419 Initial revision
kono
parents:
diff changeset
2611 {\@floatenv
685b35adf419 Initial revision
kono
parents:
diff changeset
2612 \if@tecrep\capwidth\hsize\ecapwidth\hsize\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2613 \capwidth65mm\ecapwidth65mm\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2614 \abovecaptionskip1mm\belowcaptionskip\z@\@float{figure}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2615 {\end@float}
685b35adf419 Initial revision
kono
parents:
diff changeset
2616 \newenvironment{figure*}
685b35adf419 Initial revision
kono
parents:
diff changeset
2617 {\@floatenv\capwidth.66\textwidth\ecapwidth.66\textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2618 \abovecaptionskip1mm\belowcaptionskip\z@\@dblfloat{figure}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2619 {\end@dblfloat}
685b35adf419 Initial revision
kono
parents:
diff changeset
2620 \newcounter{table}
685b35adf419 Initial revision
kono
parents:
diff changeset
2621 \renewcommand{\thetable}{\@arabic\c@table}
685b35adf419 Initial revision
kono
parents:
diff changeset
2622 \def\fps@table{tbp}
685b35adf419 Initial revision
kono
parents:
diff changeset
2623 \def\ftype@table{2}
685b35adf419 Initial revision
kono
parents:
diff changeset
2624 \def\ext@table{lot}
685b35adf419 Initial revision
kono
parents:
diff changeset
2625 \def\fnum@table{\tablename~\thetable}
685b35adf419 Initial revision
kono
parents:
diff changeset
2626 \def\fnum@etable{Table~\thetable}
685b35adf419 Initial revision
kono
parents:
diff changeset
2627 \newenvironment{table}
685b35adf419 Initial revision
kono
parents:
diff changeset
2628 {\@floatenv
685b35adf419 Initial revision
kono
parents:
diff changeset
2629 \if@tecrep\capwidth\hsize\ecapwidth\hsize\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2630 \capwidth65mm\ecapwidth65mm\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2631 \abovecaptionskip\z@\belowcaptionskip3pt\@float{table}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2632 {\end@float}
685b35adf419 Initial revision
kono
parents:
diff changeset
2633 \newenvironment{table*}
685b35adf419 Initial revision
kono
parents:
diff changeset
2634 {\@floatenv\capwidth.66\textwidth\ecapwidth.66\textwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2635 \abovecaptionskip\z@\belowcaptionskip3pt\@dblfloat{table}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2636 {\end@dblfloat}
685b35adf419 Initial revision
kono
parents:
diff changeset
2637 \def\@floatboxreset {%
685b35adf419 Initial revision
kono
parents:
diff changeset
2638 \reset@font
685b35adf419 Initial revision
kono
parents:
diff changeset
2639 \small\tabcolsep.5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2640 \@setminipage
685b35adf419 Initial revision
kono
parents:
diff changeset
2641 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2642 \def\@floatenv{\let\center\Center}
685b35adf419 Initial revision
kono
parents:
diff changeset
2643
685b35adf419 Initial revision
kono
parents:
diff changeset
2644 \def\Center{\topsep\z@\parsep\z@\partopsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2645 \trivlist \centering\item\relax}
685b35adf419 Initial revision
kono
parents:
diff changeset
2646 \def\endCenter{\endtrivlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2647
685b35adf419 Initial revision
kono
parents:
diff changeset
2648 \long\def\@caption#1[#2]#3{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2649 \begingroup
685b35adf419 Initial revision
kono
parents:
diff changeset
2650 \@parboxrestore
685b35adf419 Initial revision
kono
parents:
diff changeset
2651 \if@minipage
685b35adf419 Initial revision
kono
parents:
diff changeset
2652 \@setminipage
685b35adf419 Initial revision
kono
parents:
diff changeset
2653 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2654 \small
685b35adf419 Initial revision
kono
parents:
diff changeset
2655 \@makecaption{\csname fnum@#1\endcsname}{\ignorespaces #3}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2656 \endgroup}
685b35adf419 Initial revision
kono
parents:
diff changeset
2657
685b35adf419 Initial revision
kono
parents:
diff changeset
2658 \newlength\abovecaptionskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2659 \newlength\belowcaptionskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2660
685b35adf419 Initial revision
kono
parents:
diff changeset
2661 \newbox\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2662 \newdimen\capwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2663 \newdimen\ecapwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2664
685b35adf419 Initial revision
kono
parents:
diff changeset
2665 \long\def\@makecaption#1#2{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2666 \vskip\abovecaptionskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2667 \setbox\@tempboxa\hbox{#1\hskip1zw\shortstack[l]{#2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2668 \@tempdima\ht\@tempboxa \advance \@tempdima \dp\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2669 \setbox\@tempboxb\hbox{#1\hskip1zw}%% <<
685b35adf419 Initial revision
kono
parents:
diff changeset
2670 \ifdim \@tempdima > \baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2671 \ifdim \wd\@tempboxa > \capwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2672 \hfil\parbox[t]{\capwidth}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2673 #1\hskip1zw #2}\vskip2\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2674 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2675 \hfil\parbox[t]{\wd\@tempboxa}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2676 #1\hskip1zw #2}\vskip2\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2677 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2678 \else %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2679 \ifdim \wd\@tempboxa > \capwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2680 \hfil\parbox[t]{\capwidth}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2681 #1\hskip1zw #2}\vskip2\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2682 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2683 \setbox\@tempboxb\hbox{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2684 \ifdim \wd\@tempboxb < 4.5zw %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
2685 \hbox to\hsize{\hfil #1\hskip1zw\kintou{5zw}{#2}\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2686 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2687 \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2688 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2689 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2690 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2691 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2692
685b35adf419 Initial revision
kono
parents:
diff changeset
2693 \long\def\ecaption#1{\small
685b35adf419 Initial revision
kono
parents:
diff changeset
2694 \setbox\@tempboxa\hbox{\csname fnum@e\@captype\endcsname\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2695 \shortstack[l]{#1}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2696 \@tempdima\ht\@tempboxa \advance \@tempdima \dp\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2697 \setbox\@tempboxb\hbox{\csname fnum@e\@captype\endcsname\hskip1zw}%% <<
685b35adf419 Initial revision
kono
parents:
diff changeset
2698 \ifdim \@tempdima > \baselineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2699 \ifdim \wd\@tempboxa > \ecapwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2700 \hfil\parbox[t]{\ecapwidth}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2701 \csname fnum@e\@captype\endcsname\hskip1zw #1}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2702 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2703 \hfil\parbox[t]{\wd\@tempboxa}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2704 \csname fnum@e\@captype\endcsname\hskip1zw #1}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2705 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2706 \else %% <
685b35adf419 Initial revision
kono
parents:
diff changeset
2707 \ifdim \wd\@tempboxa > \ecapwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
2708 \hfil\parbox[t]{\ecapwidth}{\hangindent\wd\@tempboxb
685b35adf419 Initial revision
kono
parents:
diff changeset
2709 \csname fnum@e\@captype\endcsname\hskip1zw #1}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2710 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2711 \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2712 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2713 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2714 \vspace{\belowcaptionskip}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2715 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2716
685b35adf419 Initial revision
kono
parents:
diff changeset
2717 \setlength\arraycolsep{5\p@}
685b35adf419 Initial revision
kono
parents:
diff changeset
2718 \setlength\tabcolsep{.5zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2719 \setlength\arrayrulewidth{.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2720 \setlength\doublerulesep{\z@}
685b35adf419 Initial revision
kono
parents:
diff changeset
2721 \setlength\tabbingsep{\labelsep}
685b35adf419 Initial revision
kono
parents:
diff changeset
2722
685b35adf419 Initial revision
kono
parents:
diff changeset
2723 \skip\@mpfootins = \skip\footins
685b35adf419 Initial revision
kono
parents:
diff changeset
2724 \setlength\fboxsep{.5zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
2725 \setlength\fboxrule{.1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2726 \renewcommand{\theequation}{\@arabic\c@equation}
685b35adf419 Initial revision
kono
parents:
diff changeset
2727 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2728 \if@enablejfam
685b35adf419 Initial revision
kono
parents:
diff changeset
2729 \DeclareSymbolFont{mincho}{JY1}{mc}{m}{n}
685b35adf419 Initial revision
kono
parents:
diff changeset
2730 \DeclareSymbolFontAlphabet{\mathmc}{mincho}
685b35adf419 Initial revision
kono
parents:
diff changeset
2731 \SetSymbolFont{mincho}{bold}{JY1}{gt}{m}{n}
685b35adf419 Initial revision
kono
parents:
diff changeset
2732 \DeclareMathAlphabet\mathgt{JY1}{gt}{m}{n}
685b35adf419 Initial revision
kono
parents:
diff changeset
2733 \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc}
685b35adf419 Initial revision
kono
parents:
diff changeset
2734 \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}
685b35adf419 Initial revision
kono
parents:
diff changeset
2735 \jfam\symmincho
685b35adf419 Initial revision
kono
parents:
diff changeset
2736 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2737 \DeclareRobustCommand{\mathmc}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2738 \@latex@error{Command \noexpand\mathmc invalid with\space
685b35adf419 Initial revision
kono
parents:
diff changeset
2739 `disablejfam' class option.}\@eha
685b35adf419 Initial revision
kono
parents:
diff changeset
2740 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2741 \DeclareRobustCommand{\mathgt}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2742 \@latex@error{Command \noexpand\mathgt invalid with\space
685b35adf419 Initial revision
kono
parents:
diff changeset
2743 `disablejfam' class option.}\@eha
685b35adf419 Initial revision
kono
parents:
diff changeset
2744 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2745 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2746 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2747
685b35adf419 Initial revision
kono
parents:
diff changeset
2748 %% for 2.1.4 compatibility
685b35adf419 Initial revision
kono
parents:
diff changeset
2749 \@ifundefined{reDeclareMathAlphabet}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2750 \def\reDeclareMathAlphabet#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2751 \DeclareRobustCommand{#1}[1]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2752 \ifmmode
685b35adf419 Initial revision
kono
parents:
diff changeset
2753 \ifx\math@bgroup\@empty % 2.09 compatibility
685b35adf419 Initial revision
kono
parents:
diff changeset
2754 #2\relax#3\relax##1\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2755 \else % native mode
685b35adf419 Initial revision
kono
parents:
diff changeset
2756 \ifx\math@bgroup\relax % oldstyle
685b35adf419 Initial revision
kono
parents:
diff changeset
2757 #2\relax\@fontswitch\relax{#3}##1\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2758 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2759 #2{#3{##1}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2760 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2761 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2762 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2763 #2{##1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2764 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2765 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2766 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2767 \@onlypreamble\reDeclareMathAlphabet
685b35adf419 Initial revision
kono
parents:
diff changeset
2768 }{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2769
685b35adf419 Initial revision
kono
parents:
diff changeset
2770 \@ifundefined{mathmc}{\relax}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2771 \if@enablejfam
685b35adf419 Initial revision
kono
parents:
diff changeset
2772 \DeclareSymbolFont{mincho}{JY1}{mc}{m}{n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2773 \DeclareSymbolFontAlphabet{\mathmc}{mincho}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2774 \SetSymbolFont{mincho}{bold}{JY1}{gt}{m}{n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2775 \DeclareMathAlphabet\mathgt{JY1}{gt}{m}{n}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2776 \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2777 \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2778 \jfam\symmincho
685b35adf419 Initial revision
kono
parents:
diff changeset
2779 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2780 \DeclareRobustCommand{\mathmc}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2781 \@latex@error{Command \noexpand\mathmc invalid with\space
685b35adf419 Initial revision
kono
parents:
diff changeset
2782 `disablejfam' class option.}\@eha
685b35adf419 Initial revision
kono
parents:
diff changeset
2783 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2784 \DeclareRobustCommand{\mathgt}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2785 \@latex@error{Command \noexpand\mathgt invalid with\space
685b35adf419 Initial revision
kono
parents:
diff changeset
2786 `disablejfam' class option.}\@eha
685b35adf419 Initial revision
kono
parents:
diff changeset
2787 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2788 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2789 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2790
685b35adf419 Initial revision
kono
parents:
diff changeset
2791 \@ifundefined{mathmc}{\relax}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2792 \DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2793 \DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2794 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2795
685b35adf419 Initial revision
kono
parents:
diff changeset
2796 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2797 \DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
685b35adf419 Initial revision
kono
parents:
diff changeset
2798 \DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
685b35adf419 Initial revision
kono
parents:
diff changeset
2799 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2800 \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2801 \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
685b35adf419 Initial revision
kono
parents:
diff changeset
2802 \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
685b35adf419 Initial revision
kono
parents:
diff changeset
2803 \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
685b35adf419 Initial revision
kono
parents:
diff changeset
2804 \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
685b35adf419 Initial revision
kono
parents:
diff changeset
2805 \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
685b35adf419 Initial revision
kono
parents:
diff changeset
2806 \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
685b35adf419 Initial revision
kono
parents:
diff changeset
2807 \DeclareRobustCommand*{\cal}{\@fontswitch\relax\mathcal}
685b35adf419 Initial revision
kono
parents:
diff changeset
2808 \DeclareRobustCommand*{\mit}{\@fontswitch\relax\mathnormal}
685b35adf419 Initial revision
kono
parents:
diff changeset
2809
685b35adf419 Initial revision
kono
parents:
diff changeset
2810 \newdimen\bibindent
685b35adf419 Initial revision
kono
parents:
diff changeset
2811 \setlength\bibindent{1.5em}
685b35adf419 Initial revision
kono
parents:
diff changeset
2812 \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em}
685b35adf419 Initial revision
kono
parents:
diff changeset
2813
685b35adf419 Initial revision
kono
parents:
diff changeset
2814 \newenvironment{thebibliography}[1]
685b35adf419 Initial revision
kono
parents:
diff changeset
2815 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
2816 \def\subsection{\@startsection{subsection}{2}{\z@}
685b35adf419 Initial revision
kono
parents:
diff changeset
2817 {.00001\Cvs \@plus 1mm \@minus .1mm}
685b35adf419 Initial revision
kono
parents:
diff changeset
2818 {.15\Cvs \@plus 1mm \@minus .1mm}{\centering\bfseries}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2819 \subsection*{\refname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2820 \small\baselineskip15\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2821 \list{\@biblabel{\@arabic\c@enumiv}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2822 {\settowidth\labelwidth{\@biblabel{\hspace*{2zw}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2823 \topsep\z@\parsep\z@\partopsep\z@\itemsep\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2824 \leftmargin3zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2825 \labelsep1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2826 \@openbib@code
685b35adf419 Initial revision
kono
parents:
diff changeset
2827 \usecounter{enumiv}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2828 \let\p@enumi\@empty
685b35adf419 Initial revision
kono
parents:
diff changeset
2829 \renewcommand\theenumiv{\@arabic\c@enumiv}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2830 \sloppy
685b35adf419 Initial revision
kono
parents:
diff changeset
2831 \clubpenalty-100\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2832 \widowpenalty-100\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2833 \@clubpenalty\clubpenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
2834 \sfcode`\.\@m}
685b35adf419 Initial revision
kono
parents:
diff changeset
2835 {\def\@noitemerr
685b35adf419 Initial revision
kono
parents:
diff changeset
2836 {\@latex@warning{Empty `thebibliography' environment}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2837 \endlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
2838 \def\@biblabel#1{[#1]}
685b35adf419 Initial revision
kono
parents:
diff changeset
2839 \let\@openbib@code\@empty
685b35adf419 Initial revision
kono
parents:
diff changeset
2840
685b35adf419 Initial revision
kono
parents:
diff changeset
2841 \def\@uketsuke{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2842 \vskip6\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2843 \raggedleft\rightskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2844 (\@received\@revised\@finalreceived )\kern-.5zw\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2845 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2846
685b35adf419 Initial revision
kono
parents:
diff changeset
2847 \def\received#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2848 \gdef\@received{平成#1年#2月#3日受付}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2849 \gdef\@receivedyear{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
2850 \received{xx}{xx}{xx}
685b35adf419 Initial revision
kono
parents:
diff changeset
2851
685b35adf419 Initial revision
kono
parents:
diff changeset
2852 \def\revised#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2853 \gdef\@revisedyear{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2854 \ifx\@receivedyear\@revisedyear
685b35adf419 Initial revision
kono
parents:
diff changeset
2855 \gdef\@revised{,#2月#3日再受付}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2856 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2857 \gdef\@revised{,#1年#2月#3日再受付}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2858 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2859 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2860 \def\@revised{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2861
685b35adf419 Initial revision
kono
parents:
diff changeset
2862 \def\finalreceived#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2863 \gdef\@finalreceivedyear{#1}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2864 \ifx\@revisedyear\@finalreceivedyear
685b35adf419 Initial revision
kono
parents:
diff changeset
2865 \gdef\@finalreceived{,\inhibitglue\break #2月#3日最終受付}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2866 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2867 \gdef\@finalreceived{,\inhibitglue\break #1年#2月#3日最終受付}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2868 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2869 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2870 \def\@finalreceived{}
685b35adf419 Initial revision
kono
parents:
diff changeset
2871
685b35adf419 Initial revision
kono
parents:
diff changeset
2872 %% paper, letterpaper
685b35adf419 Initial revision
kono
parents:
diff changeset
2873 \newenvironment{biography}{\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2874 \raggedbottom
685b35adf419 Initial revision
kono
parents:
diff changeset
2875 {\small \@uketsuke}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2876 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2877 \vskip17mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2878 \parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
2879 \leftskip8\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2880 \small\baselineskip15\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2881 \global\let\@uketsuke\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2882 }{\par}
685b35adf419 Initial revision
kono
parents:
diff changeset
2883
685b35adf419 Initial revision
kono
parents:
diff changeset
2884 \ifx\pdfpageheight\@undefined
685b35adf419 Initial revision
kono
parents:
diff changeset
2885 \def\ieicej@in@ext{eps}
685b35adf419 Initial revision
kono
parents:
diff changeset
2886 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2887 \def\ieicej@in@ext{pdf}
685b35adf419 Initial revision
kono
parents:
diff changeset
2888 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2889
685b35adf419 Initial revision
kono
parents:
diff changeset
2890 \newcounter{profile}
685b35adf419 Initial revision
kono
parents:
diff changeset
2891 \def\profile{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2892 \@ifstar\np@profile{\@ifnextchar[%% ]
685b35adf419 Initial revision
kono
parents:
diff changeset
2893 {\pic@profile}{\stepcounter{profile}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2894 \pic@profile[a\theprofile.\ieicej@in@ext]}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2895
685b35adf419 Initial revision
kono
parents:
diff changeset
2896 \long\def\pic@profile[#1]#2#3#4{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2897 % \stepcounter{profile}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2898 \if #2r \def\p@mbrship{(正員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2899 \if #2m \def\p@mbrship{(正員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2900 \if #2s \def\p@mbrship{(学生員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2901 \if #2n \def\p@mbrship{}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2902 \if #2a \def\p@mbrship{(准員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2903 \if #2h \def\p@mbrship{(名誉員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2904 \if #2f \def\p@mbrship{(正員:フェロー)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2905 \def\p@mbrship{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2906 \ieicej@warning{Check the 1st. argument of \string\profile{#2}{#3}{}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2907 \fi\fi\fi\fi\fi\fi\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2908 \def\@checkname{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2909 \setbox\@tempboxa\hbox{\spaceskip=100mm #3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2910 \ifdim \wd\@tempboxa < 100mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2911 \ieicej@warning{Profile's name "#3" doesn't have a space}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2912 \let\@authorname\@checkname
685b35adf419 Initial revision
kono
parents:
diff changeset
2913 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2914 \setbox\@tempboxa\hbox{#3}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2915 \ifdim \wd\@tempboxa > 5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2916 \def\@tempb##1 ##2\@nil{##1\hskip\authornamesep ##2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2917 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2918 \def\@tempb##1 ##2\@nil{\leavevmode\hbox to 5zw{##1\hfil ##2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2919 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2920 \edef\@authorname{\expandafter\@tempb\@checkname\@nil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2921 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2922 \setbox\@tempboxa\hbox{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2923 \begin{minipage}[t]{19zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2924 \small\baselineskip15\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2925 {\normalsize{\bfseries \@authorname}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2926 \p@mbrship\nobreak\rule[-3mm]{0mm}{4mm}}\hfil\break
685b35adf419 Initial revision
kono
parents:
diff changeset
2927 \hspace*{1zw}#4\unskip\inhibitglue
685b35adf419 Initial revision
kono
parents:
diff changeset
2928 \end{minipage}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2929 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
2930 \@tempdima \ht\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2931 \advance \@tempdima \dp\@tempboxa
685b35adf419 Initial revision
kono
parents:
diff changeset
2932 \leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
2933 \hangindent9zw\hangafter-7\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
2934 \IfFileExists{#1}% a\theprofile.\ieicej@in@ext
685b35adf419 Initial revision
kono
parents:
diff changeset
2935 {\smash{\lower23.9mm\hbox to \z@{\hss
685b35adf419 Initial revision
kono
parents:
diff changeset
2936 \resizebox{20mm}{26.4mm}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2937 \includegraphics{#1}}\hskip2.5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2938 }}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2939 {\smash{\lower23.9mm\hbox to \z@{\hss
685b35adf419 Initial revision
kono
parents:
diff changeset
2940 \unitlength1mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2941 \begin{picture}(20,26.4)
685b35adf419 Initial revision
kono
parents:
diff changeset
2942 \put(0,0){\framebox(20,26.4){\null}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2943 \end{picture}\hskip2.5mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2944 }}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2945 \ifdim \@tempdima < 26.4mm %% >
685b35adf419 Initial revision
kono
parents:
diff changeset
2946 \vtop to 26.4mm{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2947 \hbox to 19zw{\hss
685b35adf419 Initial revision
kono
parents:
diff changeset
2948 \begin{minipage}[t]{19zw}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2949 \small\baselineskip15\@Q
685b35adf419 Initial revision
kono
parents:
diff changeset
2950 {\normalsize{\bfseries \@authorname}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2951 \p@mbrship\nobreak\rule[-3mm]{0mm}{4mm}}\hfil\break
685b35adf419 Initial revision
kono
parents:
diff changeset
2952 \hspace*{1zw}#4\unskip\inhibitglue
685b35adf419 Initial revision
kono
parents:
diff changeset
2953 \end{minipage}\hss}\vss
685b35adf419 Initial revision
kono
parents:
diff changeset
2954 }\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2955 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2956 {\normalsize{\bfseries \@authorname}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2957 \p@mbrship\nobreak\rule[-3mm]{0mm}{4mm}}\hfil\break
685b35adf419 Initial revision
kono
parents:
diff changeset
2958 \hspace*{1zw}#4\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2959 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2960 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2961 \vskip7mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2962 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2963
685b35adf419 Initial revision
kono
parents:
diff changeset
2964 \long\def\np@profile#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
2965 \stepcounter{profile}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2966 \if #1r \def\p@mbrship{(正員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2967 \if #1m \def\p@mbrship{(正員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2968 \if #1s \def\p@mbrship{(学生員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2969 \if #1n \def\p@mbrship{}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2970 \if #1a \def\p@mbrship{(准員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2971 \if #1h \def\p@mbrship{(名誉員)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2972 \if #1f \def\p@mbrship{(正員:フェロー)\kern-.5zw}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
2973 \def\p@mbrship{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2974 \ieicej@warning{Check the 1st. argument of \string\profile{#1}{#2}{}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2975 \fi\fi\fi\fi\fi\fi\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2976 \def\@checkname{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2977 \setbox\@tempboxa\hbox{\spaceskip=100mm #2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2978 \ifdim \wd\@tempboxa < 100mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2979 \ieicej@warning{Profile's name "#2" doesn't have a space}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2980 \let\@authorname\@checkname
685b35adf419 Initial revision
kono
parents:
diff changeset
2981 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2982 \setbox\@tempboxa\hbox{#2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2983 \ifdim \wd\@tempboxa > 5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2984 \def\@tempb##1 ##2\@nil{##1\hskip\authornamesep ##2}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2985 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
2986 \def\@tempb##1 ##2\@nil{\leavevmode\hbox to 5zw{##1\hfil ##2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2987 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2988 \edef\@authorname{\expandafter\@tempb\@checkname\@nil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
2989 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
2990 {\normalsize{\bfseries \@authorname}\hskip1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
2991 \p@mbrship\nobreak\rule[-3mm]{0mm}{4mm}}\hfil\break
685b35adf419 Initial revision
kono
parents:
diff changeset
2992 \hspace*{1zw}#3\par
685b35adf419 Initial revision
kono
parents:
diff changeset
2993 \nointerlineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
2994 \vskip7mm
685b35adf419 Initial revision
kono
parents:
diff changeset
2995 }
685b35adf419 Initial revision
kono
parents:
diff changeset
2996
685b35adf419 Initial revision
kono
parents:
diff changeset
2997 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
2998 \renewenvironment{biography}{\relax}{\relax}
685b35adf419 Initial revision
kono
parents:
diff changeset
2999 \long\def\pic@profile[#1]#2#3#4{}
685b35adf419 Initial revision
kono
parents:
diff changeset
3000 \long\def\np@profile#1#2#3{}
685b35adf419 Initial revision
kono
parents:
diff changeset
3001 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3002
685b35adf419 Initial revision
kono
parents:
diff changeset
3003 \renewcommand{\footnoterule}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3004 \kern-3\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3005 \hrule height .1mm width \columnwidth
685b35adf419 Initial revision
kono
parents:
diff changeset
3006 \kern 2.715\p@}
685b35adf419 Initial revision
kono
parents:
diff changeset
3007
685b35adf419 Initial revision
kono
parents:
diff changeset
3008 \def\@makefnmark{\hbox{$^{\mbox{\tiny \kern-.5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
3009 (注\kern.1zw\@thefnmark{})\kern-.5zw}}$}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3010
685b35adf419 Initial revision
kono
parents:
diff changeset
3011 \newcommand\@makefntext[1]{\parindent1zw
685b35adf419 Initial revision
kono
parents:
diff changeset
3012 \noindent\hbox{\kern-.5zw
685b35adf419 Initial revision
kono
parents:
diff changeset
3013 (注\kern.1zw\@thefnmark{})\kern-.5zw\hbox to 1zw{\hss :\hss}}#1}
685b35adf419 Initial revision
kono
parents:
diff changeset
3014
685b35adf419 Initial revision
kono
parents:
diff changeset
3015 \def\thefootnote{\@arabic\c@footnote}
685b35adf419 Initial revision
kono
parents:
diff changeset
3016 \def\thempfootnote{\@fnsymbol\c@mpfootnote}
685b35adf419 Initial revision
kono
parents:
diff changeset
3017
685b35adf419 Initial revision
kono
parents:
diff changeset
3018 %% from [proc|slide].cls
685b35adf419 Initial revision
kono
parents:
diff changeset
3019 %% \def\thefootnote{\fnsymbol{footnote}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3020 %% from [article|report|book].cls
685b35adf419 Initial revision
kono
parents:
diff changeset
3021 %% \renewcommand\thefootnote{\@fnsymbol\c@footnote}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3022 %% from latex.ltx
685b35adf419 Initial revision
kono
parents:
diff changeset
3023 %% \def\@fnsymbol#1{\ensuremath{\ifcase#1\or *\or \dagger\or \ddagger\or
685b35adf419 Initial revision
kono
parents:
diff changeset
3024 %% \mathsection\or \mathparagraph\or \|\or **\or \dagger\dagger
685b35adf419 Initial revision
kono
parents:
diff changeset
3025 %% \or \ddagger\ddagger \else\@ctrerr\fi}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3026
685b35adf419 Initial revision
kono
parents:
diff changeset
3027 %% from fleqn.clo
685b35adf419 Initial revision
kono
parents:
diff changeset
3028 %%\ProvidesFile{fleqn.clo}
685b35adf419 Initial revision
kono
parents:
diff changeset
3029 %% [1998/08/17 v1.1c Standard LaTeX option
685b35adf419 Initial revision
kono
parents:
diff changeset
3030 %% (flush left equations)]
685b35adf419 Initial revision
kono
parents:
diff changeset
3031 \newdimen\mathindent
685b35adf419 Initial revision
kono
parents:
diff changeset
3032 \AtEndOfClass{\mathindent1zw}% \leftmargini
685b35adf419 Initial revision
kono
parents:
diff changeset
3033 \renewcommand\[{\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
3034 \ifmmode\@badmath
685b35adf419 Initial revision
kono
parents:
diff changeset
3035 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3036 \parsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3037 \topsep 8\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3038 \itemsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3039 \begin{trivlist}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3040 \@beginparpenalty\predisplaypenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
3041 \@endparpenalty\postdisplaypenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
3042 \item[]\leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3043 \hb@xt@\linewidth\bgroup $\m@th\displaystyle %$
685b35adf419 Initial revision
kono
parents:
diff changeset
3044 \hskip\mathindent\bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
3045 \fi}
685b35adf419 Initial revision
kono
parents:
diff changeset
3046 \renewcommand\]{\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
3047 \ifmmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3048 \egroup $\hfil% $
685b35adf419 Initial revision
kono
parents:
diff changeset
3049 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
3050 \end{trivlist}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3051 \else \@badmath
685b35adf419 Initial revision
kono
parents:
diff changeset
3052 \fi}
685b35adf419 Initial revision
kono
parents:
diff changeset
3053 \renewenvironment{equation}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3054 {\@beginparpenalty\predisplaypenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
3055 \@endparpenalty\postdisplaypenalty
685b35adf419 Initial revision
kono
parents:
diff changeset
3056 \refstepcounter{equation}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3057 \parsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3058 \topsep 8\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3059 \itemsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3060 \trivlist \item[]\leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3061 \hb@xt@\linewidth\bgroup $\m@th% $
685b35adf419 Initial revision
kono
parents:
diff changeset
3062 \displaystyle
685b35adf419 Initial revision
kono
parents:
diff changeset
3063 \hskip\mathindent}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3064 {$\hfil % $
685b35adf419 Initial revision
kono
parents:
diff changeset
3065 \displaywidth\linewidth\hbox{\@eqnnum}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3066 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
3067 \endtrivlist}
685b35adf419 Initial revision
kono
parents:
diff changeset
3068 \renewenvironment{eqnarray}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3069 \stepcounter{equation}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3070 \parsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3071 \topsep 8\p@ \@plus2\p@ \@minus4\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3072 \itemsep 4\p@ \@plus2\p@ \@minus\p@
685b35adf419 Initial revision
kono
parents:
diff changeset
3073 \def\@currentlabel{\p@equation\theequation}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3074 \global\@eqnswtrue\m@th
685b35adf419 Initial revision
kono
parents:
diff changeset
3075 \global\@eqcnt\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3076 \tabskip\mathindent
685b35adf419 Initial revision
kono
parents:
diff changeset
3077 \let\\=\@eqncr
685b35adf419 Initial revision
kono
parents:
diff changeset
3078 \setlength\abovedisplayskip{\topsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3079 \ifvmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3080 \addtolength\abovedisplayskip{\partopsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3081 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3082 \addtolength\abovedisplayskip{\parskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3083 \setlength\belowdisplayskip{\abovedisplayskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3084 \setlength\belowdisplayshortskip{\abovedisplayskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3085 \setlength\abovedisplayshortskip{\abovedisplayskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3086 $$\everycr{}\halign to\linewidth% $$
685b35adf419 Initial revision
kono
parents:
diff changeset
3087 \bgroup
685b35adf419 Initial revision
kono
parents:
diff changeset
3088 \hskip\@centering
685b35adf419 Initial revision
kono
parents:
diff changeset
3089 $\displaystyle\tabskip\z@skip{##}$\@eqnsel&%
685b35adf419 Initial revision
kono
parents:
diff changeset
3090 \global\@eqcnt\@ne \hskip.8\arraycolsep \hfil${##}$\hfil&%
685b35adf419 Initial revision
kono
parents:
diff changeset
3091 \global\@eqcnt\tw@ \hskip.8\arraycolsep
685b35adf419 Initial revision
kono
parents:
diff changeset
3092 $\displaystyle{##}$\hfil \tabskip\@centering&%
685b35adf419 Initial revision
kono
parents:
diff changeset
3093 \global\@eqcnt\thr@@
685b35adf419 Initial revision
kono
parents:
diff changeset
3094 \hb@xt@\z@\bgroup\hss##\egroup\tabskip\z@skip\cr}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3095 {\@@eqncr
685b35adf419 Initial revision
kono
parents:
diff changeset
3096 \egroup
685b35adf419 Initial revision
kono
parents:
diff changeset
3097 \global\advance\c@equation\m@ne$$% $$
685b35adf419 Initial revision
kono
parents:
diff changeset
3098 \@ignoretrue
685b35adf419 Initial revision
kono
parents:
diff changeset
3099 }
685b35adf419 Initial revision
kono
parents:
diff changeset
3100 %%\endinput
685b35adf419 Initial revision
kono
parents:
diff changeset
3101 %%
685b35adf419 Initial revision
kono
parents:
diff changeset
3102 %% End of file `fleqn.clo'.
685b35adf419 Initial revision
kono
parents:
diff changeset
3103
685b35adf419 Initial revision
kono
parents:
diff changeset
3104 \def\@eqnnum{{\normalfont \normalcolor (\theequation)\hspace*{3mm}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3105
685b35adf419 Initial revision
kono
parents:
diff changeset
3106 \def\@begintheorem#1#2{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3107 \settowidth{\labelwidth}{\kern-.5zw [#1\ #2]\kern-.5zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
3108 \begin{description}
685b35adf419 Initial revision
kono
parents:
diff changeset
3109 \item[\@thmlbracket #1\ #2\@thmrbracket]}
685b35adf419 Initial revision
kono
parents:
diff changeset
3110
685b35adf419 Initial revision
kono
parents:
diff changeset
3111 \def\@opargbegintheorem#1#2#3{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3112 \begin{description}
685b35adf419 Initial revision
kono
parents:
diff changeset
3113 \item[\@thmlbracket #1\ #2\@thmrbracket (#3)\kern-.5zw]}%%
685b35adf419 Initial revision
kono
parents:
diff changeset
3114 \def\@endtheorem{\end{description}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3115
685b35adf419 Initial revision
kono
parents:
diff changeset
3116 \def\thmbracket#1#2{\gdef\@thmlbracket{#1}\gdef\@thmrbracket{#2}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3117 \thmbracket{\kern-.5zw [}{]\kern-.5zw }
685b35adf419 Initial revision
kono
parents:
diff changeset
3118 \def\@thmcountersep{}
685b35adf419 Initial revision
kono
parents:
diff changeset
3119
685b35adf419 Initial revision
kono
parents:
diff changeset
3120 \def\ack{\par{\bfseries 謝辞}\hskip1zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
3121
685b35adf419 Initial revision
kono
parents:
diff changeset
3122 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
3123 \newif\if西暦 \西暦false
685b35adf419 Initial revision
kono
parents:
diff changeset
3124 \def\西暦{\西暦true}
685b35adf419 Initial revision
kono
parents:
diff changeset
3125 \def\和暦{\西暦false}
685b35adf419 Initial revision
kono
parents:
diff changeset
3126 \def\today{{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3127 \iftdir
685b35adf419 Initial revision
kono
parents:
diff changeset
3128 \if西暦
685b35adf419 Initial revision
kono
parents:
diff changeset
3129 \kansuji\number\year 年
685b35adf419 Initial revision
kono
parents:
diff changeset
3130 \kansuji\number\month 月
685b35adf419 Initial revision
kono
parents:
diff changeset
3131 \kansuji\number\day 日
685b35adf419 Initial revision
kono
parents:
diff changeset
3132 \else \@tempcnta\year
685b35adf419 Initial revision
kono
parents:
diff changeset
3133 \advance\@tempcnta-1988 平成
685b35adf419 Initial revision
kono
parents:
diff changeset
3134 \ifnum \@tempcnta =1 元\else\kansuji\number\@tempcnta\fi 年
685b35adf419 Initial revision
kono
parents:
diff changeset
3135 \kansuji\number\month 月\kansuji\number\day 日
685b35adf419 Initial revision
kono
parents:
diff changeset
3136 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3137 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3138 \if西暦
685b35adf419 Initial revision
kono
parents:
diff changeset
3139 \number\year\, 年\hspace{.5em}\nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
3140 \number\month\, 月\hspace{.5em}\nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
3141 \number\day\, 日
685b35adf419 Initial revision
kono
parents:
diff changeset
3142 \else \@tempcnta\year
685b35adf419 Initial revision
kono
parents:
diff changeset
3143 \advance\@tempcnta-1988 平成
685b35adf419 Initial revision
kono
parents:
diff changeset
3144 \ifnum \@tempcnta =1 元\else\number\@tempcnta\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3145 \, 年\hspace{.5em}\nobreak
685b35adf419 Initial revision
kono
parents:
diff changeset
3146 \number\month\, 月\hspace{.5em}\nobreak\number\day\, 日
685b35adf419 Initial revision
kono
parents:
diff changeset
3147 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3148 \fi}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3149 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3150 %%\newcommand{\prepartname}{第}
685b35adf419 Initial revision
kono
parents:
diff changeset
3151 %%\newcommand{\postpartname}{部}
685b35adf419 Initial revision
kono
parents:
diff changeset
3152 %%\newcommand{\contentsname}{目 次}
685b35adf419 Initial revision
kono
parents:
diff changeset
3153 %%\newcommand{\listfigurename}{図 目 次}
685b35adf419 Initial revision
kono
parents:
diff changeset
3154 %%\newcommand{\listtablename}{表 目 次}
685b35adf419 Initial revision
kono
parents:
diff changeset
3155 \newcommand{\refname}{文献}
685b35adf419 Initial revision
kono
parents:
diff changeset
3156 %%\newcommand{\indexname}{索 引}
685b35adf419 Initial revision
kono
parents:
diff changeset
3157 \newcommand{\figurename}{図}
685b35adf419 Initial revision
kono
parents:
diff changeset
3158 \newcommand{\tablename}{表}
685b35adf419 Initial revision
kono
parents:
diff changeset
3159 %%\newcommand{\appendixname}{付 録}
685b35adf419 Initial revision
kono
parents:
diff changeset
3160 %%\newcommand{\abstractname}{概 要}
685b35adf419 Initial revision
kono
parents:
diff changeset
3161
685b35adf419 Initial revision
kono
parents:
diff changeset
3162 %%## citesort.sty ##%%
685b35adf419 Initial revision
kono
parents:
diff changeset
3163 %% from "citesort.sty", a little customized
685b35adf419 Initial revision
kono
parents:
diff changeset
3164 \newcount\@minsofar
685b35adf419 Initial revision
kono
parents:
diff changeset
3165 \newcount\@min
685b35adf419 Initial revision
kono
parents:
diff changeset
3166 \newcount\@cite@temp
685b35adf419 Initial revision
kono
parents:
diff changeset
3167 \def\@citex[#1]#2{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3168 \if@filesw \immediate \write \@auxout {\string \citation {#2}}\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3169 \@tempcntb\m@ne \let\@h@ld\relax \def\@citea{}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3170 \@min\m@ne%
685b35adf419 Initial revision
kono
parents:
diff changeset
3171 \@cite{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3172 \@for \@citeb:=#2\do {\@ifundefined {b@\@citeb}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3173 {\@h@ld\@citea\@tempcntb\m@ne{\bfseries ?}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3174 \@warning {Citation `\@citeb ' on page \thepage \space undefined}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3175 {\@minsofar\z@ \@for \@scan@cites:=#2\do {%
685b35adf419 Initial revision
kono
parents:
diff changeset
3176 \@ifundefined{b@\@scan@cites}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3177 {\@cite@temp\m@ne}
685b35adf419 Initial revision
kono
parents:
diff changeset
3178 {\@cite@temp\number\csname b@\@scan@cites \endcsname \relax}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3179 \ifnum\@cite@temp > \@min% select the next one to list
685b35adf419 Initial revision
kono
parents:
diff changeset
3180 \ifnum\@minsofar = \z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3181 \@minsofar\number\@cite@temp
685b35adf419 Initial revision
kono
parents:
diff changeset
3182 \edef\@scan@copy{\@scan@cites}\else
685b35adf419 Initial revision
kono
parents:
diff changeset
3183 \ifnum\@cite@temp < \@minsofar
685b35adf419 Initial revision
kono
parents:
diff changeset
3184 \@minsofar\number\@cite@temp
685b35adf419 Initial revision
kono
parents:
diff changeset
3185 \edef\@scan@copy{\@scan@cites}\fi\fi\fi}\@tempcnta\@min
685b35adf419 Initial revision
kono
parents:
diff changeset
3186 \ifnum\@minsofar > \z@ % some more
685b35adf419 Initial revision
kono
parents:
diff changeset
3187 \advance\@tempcnta\@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
3188 \@min\@minsofar
685b35adf419 Initial revision
kono
parents:
diff changeset
3189 \ifnum\@tempcnta=\@minsofar % Number follows previous--hold on to it
685b35adf419 Initial revision
kono
parents:
diff changeset
3190 \ifx\@h@ld\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
3191 \edef \@h@ld{\@citea\csname b@\@scan@copy\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3192 \else \edef\@h@ld{\ifmmode{]〜[}\else]〜[\fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3193 \csname b@\@scan@copy\endcsname}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3194 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3195 \else \@h@ld\@citea\csname b@\@scan@copy\endcsname
685b35adf419 Initial revision
kono
parents:
diff changeset
3196 \let\@h@ld\relax
685b35adf419 Initial revision
kono
parents:
diff changeset
3197 \fi % no more
685b35adf419 Initial revision
kono
parents:
diff changeset
3198 \fi}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3199 \def\@citea{],\penalty\@highpenalty\,[}}\@h@ld}{#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3200 %% end of citesort.sty
685b35adf419 Initial revision
kono
parents:
diff changeset
3201
685b35adf419 Initial revision
kono
parents:
diff changeset
3202 \def\@cite#1#2{\leavevmode\unskip
685b35adf419 Initial revision
kono
parents:
diff changeset
3203 \ifnum\lastpenalty=\z@\penalty\@highpenalty\fi% highpenalty before
685b35adf419 Initial revision
kono
parents:
diff changeset
3204 \,[{\multiply\@highpenalty 3 #1% % triple-highpenalties within
685b35adf419 Initial revision
kono
parents:
diff changeset
3205 \if@tempswa,\penalty\@highpenalty\ #2\fi % and before note.
685b35adf419 Initial revision
kono
parents:
diff changeset
3206 }]\spacefactor\@m}
685b35adf419 Initial revision
kono
parents:
diff changeset
3207
685b35adf419 Initial revision
kono
parents:
diff changeset
3208 \def\onelineskip{\par\vspace{1\baselineskip}\par}
685b35adf419 Initial revision
kono
parents:
diff changeset
3209 \def\halflineskip{\par\vspace{.5\baselineskip}\par}
685b35adf419 Initial revision
kono
parents:
diff changeset
3210
685b35adf419 Initial revision
kono
parents:
diff changeset
3211 \def\ddash{\hbox to 2zw{---\hss ---}}% \let\doubledash\ddash
685b35adf419 Initial revision
kono
parents:
diff changeset
3212 \def\FRAC#1#2{\leavevmode\kern-.1em
685b35adf419 Initial revision
kono
parents:
diff changeset
3213 \raise.5ex\hbox{\the\scriptfont0 #1}\kern-.1em
685b35adf419 Initial revision
kono
parents:
diff changeset
3214 /\kern-.15em\lower.25ex\hbox{\the\scriptfont0 #2}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3215 \def\RN#1{\uppercase\expandafter{\romannumeral#1}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3216
685b35adf419 Initial revision
kono
parents:
diff changeset
3217 \def\MARU#1{\raisebox{0.1zh}{{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3218 \leavevmode\ooalign{\hfil\lower.168ex\hbox{#1}\hfil\crcr\mathhexbox20D}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3219
685b35adf419 Initial revision
kono
parents:
diff changeset
3220 \def\kintou#1#2{\@ifundefined{jintercharskip}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3221 {\leavevmode\hbox to #1{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3222 \kanjiskip\z@ \@plus 1fill \@minus 1fill\xkanjiskip\kanjiskip #2}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3223 {\leavevmode\hbox to #1{\jintercharskip\z@ \@plus 1fill \@minus 1fill
685b35adf419 Initial revision
kono
parents:
diff changeset
3224 \jasciikanjiskip\jintercharskip #2}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3225
685b35adf419 Initial revision
kono
parents:
diff changeset
3226 \def\ruby#1#2{\leavevmode \setbox0=\hbox{#1}\setbox1=\hbox{\tiny #2}%% <
685b35adf419 Initial revision
kono
parents:
diff changeset
3227 \ifdim\wd0>\wd1 \dimen0=\wd0 \else \dimen0=\wd1 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3228 \hbox{\kanjiskip=\fill
685b35adf419 Initial revision
kono
parents:
diff changeset
3229 \vbox{\hbox to \dimen0{\tiny \hfil#2\hfil}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3230 \nointerlineskip \hbox to \dimen0{\hfil#1\hfil}}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3231
685b35adf419 Initial revision
kono
parents:
diff changeset
3232 \def\QED{{\unskip\nobreak\hfil\penalty50
685b35adf419 Initial revision
kono
parents:
diff changeset
3233 \hskip1zw\hbox{}\nobreak\hfil \hbox{$\Box$\hskip1zw}
685b35adf419 Initial revision
kono
parents:
diff changeset
3234 \parfillskip\z@ \finalhyphendemerits\z@\par}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3235
685b35adf419 Initial revision
kono
parents:
diff changeset
3236 \def\Hline{\noalign{\hrule height 0.4mm}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3237
685b35adf419 Initial revision
kono
parents:
diff changeset
3238 \def\leq{\mathrel{\mathpalette\gl@align<}} \let\le\leq
685b35adf419 Initial revision
kono
parents:
diff changeset
3239 \def\geq{\mathrel{\mathpalette\gl@align>}} \let\ge\geq
685b35adf419 Initial revision
kono
parents:
diff changeset
3240 \def\gl@align#1#2{\lower.6ex\vbox{\baselineskip\z@skip\lineskip\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3241 \ialign{$\m@th#1\hfil##\hfil$\crcr#2\crcr=\crcr}}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3242 \def\subseteq{\rlap{\raisebox{.25ex}{$\subset$}}\raisebox{-1.1ex}{$=$}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3243 \def\supseteq{\rlap{\raisebox{.25ex}{$\supset$}}\raisebox{-1.1ex}{$=$}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3244 \def\neq{\mathrel{\mathpalette\c@ncelass=}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3245 \def\c@ncelass#1#2{\ooalign{$\hfil#1\mkern-.4mu|\hfil$\crcr$#1#2$}}
685b35adf419 Initial revision
kono
parents:
diff changeset
3246 \let\ne\neq
685b35adf419 Initial revision
kono
parents:
diff changeset
3247
685b35adf419 Initial revision
kono
parents:
diff changeset
3248 \if@NTT\else
685b35adf419 Initial revision
kono
parents:
diff changeset
3249 \postbreakpenalty`(=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3250 \prebreakpenalty`)=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3251 \postbreakpenalty`[=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3252 \prebreakpenalty`]=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3253 \postbreakpenalty`〈=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3254 \prebreakpenalty`〉=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3255 \prebreakpenalty`"=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3256 \prebreakpenalty`℃=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3257 \prebreakpenalty` =10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3258 \prebreakpenalty`・=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3259 \prebreakpenalty`〜=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3260 \prebreakpenalty`ー=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3261 \prebreakpenalty`?=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3262 \prebreakpenalty`!=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3263 \postbreakpenalty"5C=10000
685b35adf419 Initial revision
kono
parents:
diff changeset
3264 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3265
685b35adf419 Initial revision
kono
parents:
diff changeset
3266 \def\sloppy{\tolerance9999\hbadness9999\hfuzz.5\p@ \vfuzz.5\p@}
685b35adf419 Initial revision
kono
parents:
diff changeset
3267
685b35adf419 Initial revision
kono
parents:
diff changeset
3268 \hbadness4000
685b35adf419 Initial revision
kono
parents:
diff changeset
3269 \vbadness10001
685b35adf419 Initial revision
kono
parents:
diff changeset
3270 \tolerance4000\pretolerance\m@ne
685b35adf419 Initial revision
kono
parents:
diff changeset
3271 \clubpenalty\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3272 \widowpenalty\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3273 \displaywidowpenalty\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3274 \interdisplaylinepenalty\z@ %% 100
685b35adf419 Initial revision
kono
parents:
diff changeset
3275 \predisplaypenalty\z@ %% 1000
685b35adf419 Initial revision
kono
parents:
diff changeset
3276
685b35adf419 Initial revision
kono
parents:
diff changeset
3277 \AtBeginDocument{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3278 \@ifundefined{@mathmargin}{\let\@mathmargin\undefined}
685b35adf419 Initial revision
kono
parents:
diff changeset
3279 {%
685b35adf419 Initial revision
kono
parents:
diff changeset
3280 % \let\@mathmargin\mathindent
685b35adf419 Initial revision
kono
parents:
diff changeset
3281 \@mathmargin1zw \@plus\z@ \@minus\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3282 \def\maketag@@@#1{\hbox{\m@th\normalfont #1}\hskip3mm}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3283 \def\eqref#1{\textup{\tagform@{\ref{#1}}\unskip}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3284 % %% from /usr/local/share/texmf/tex/latex/amslatex/amsmath.sty (v1.2c)
685b35adf419 Initial revision
kono
parents:
diff changeset
3285 % \renewenvironment{equation*}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3286 % \equation \nonumber
685b35adf419 Initial revision
kono
parents:
diff changeset
3287 % }{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3288 % % \nonumber
685b35adf419 Initial revision
kono
parents:
diff changeset
3289 % \endequation
685b35adf419 Initial revision
kono
parents:
diff changeset
3290 % }%
685b35adf419 Initial revision
kono
parents:
diff changeset
3291 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
3292 %% here.sty
685b35adf419 Initial revision
kono
parents:
diff changeset
3293 \@ifundefined{@HHfloat}{}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3294 \def\@HHfloat#1[H]{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3295 \expandafter\let\csname end#1\endcsname\end@Hfloat
685b35adf419 Initial revision
kono
parents:
diff changeset
3296 \vskip\intextsep
685b35adf419 Initial revision
kono
parents:
diff changeset
3297 \vbox\bgroup\def\@captype{#1}\parindent\z@
685b35adf419 Initial revision
kono
parents:
diff changeset
3298 \@floatboxreset %%
685b35adf419 Initial revision
kono
parents:
diff changeset
3299 \ignorespaces}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3300 \def\end@Hfloat{\egroup\vskip-1zh %%
685b35adf419 Initial revision
kono
parents:
diff changeset
3301 \vskip \intextsep}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3302 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
3303 %% nidanfloat
685b35adf419 Initial revision
kono
parents:
diff changeset
3304 \@ifundefined{dblbotfraction}{}{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3305 \renewcommand\dblbotfraction{0.9}% 0.5
685b35adf419 Initial revision
kono
parents:
diff changeset
3306 \setcounter{dblbotnumber}{4}% 2
685b35adf419 Initial revision
kono
parents:
diff changeset
3307 }%
685b35adf419 Initial revision
kono
parents:
diff changeset
3308 %%
685b35adf419 Initial revision
kono
parents:
diff changeset
3309 }
685b35adf419 Initial revision
kono
parents:
diff changeset
3310
685b35adf419 Initial revision
kono
parents:
diff changeset
3311 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
3312 \pagestyle{plain}
685b35adf419 Initial revision
kono
parents:
diff changeset
3313 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3314 \AtEndDocument{%
685b35adf419 Initial revision
kono
parents:
diff changeset
3315 \if@letter
685b35adf419 Initial revision
kono
parents:
diff changeset
3316 \nopagebreak
685b35adf419 Initial revision
kono
parents:
diff changeset
3317 {\small\@uketsuke}\par
685b35adf419 Initial revision
kono
parents:
diff changeset
3318 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3319 \immediate\write\@auxout
685b35adf419 Initial revision
kono
parents:
diff changeset
3320 {\string\newlabel{ieicej@lastpage}{{\@currentlabel}{\thepage}}}%
685b35adf419 Initial revision
kono
parents:
diff changeset
3321 \if@cameraready
685b35adf419 Initial revision
kono
parents:
diff changeset
3322 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3323 \onecolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
3324 \thispagestyle{empty}
685b35adf419 Initial revision
kono
parents:
diff changeset
3325 \ifvoid\eabstractbox\else
685b35adf419 Initial revision
kono
parents:
diff changeset
3326 \leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3327 \unhbox\eabstractbox\par
685b35adf419 Initial revision
kono
parents:
diff changeset
3328 \halflineskip
685b35adf419 Initial revision
kono
parents:
diff changeset
3329 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3330 \ifvoid\ekeywordbox\else
685b35adf419 Initial revision
kono
parents:
diff changeset
3331 \leavevmode
685b35adf419 Initial revision
kono
parents:
diff changeset
3332 \unhbox\ekeywordbox
685b35adf419 Initial revision
kono
parents:
diff changeset
3333 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3334 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3335 }
685b35adf419 Initial revision
kono
parents:
diff changeset
3336 \pagestyle{IEICEJ}
685b35adf419 Initial revision
kono
parents:
diff changeset
3337 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3338
685b35adf419 Initial revision
kono
parents:
diff changeset
3339 \pagenumbering{arabic}
685b35adf419 Initial revision
kono
parents:
diff changeset
3340 \raggedbottom
685b35adf419 Initial revision
kono
parents:
diff changeset
3341 \if@twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
3342 \twocolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
3343 \sloppy
685b35adf419 Initial revision
kono
parents:
diff changeset
3344 \if@tecrep
685b35adf419 Initial revision
kono
parents:
diff changeset
3345 \raggedbottom
685b35adf419 Initial revision
kono
parents:
diff changeset
3346 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3347 \flushbottom
685b35adf419 Initial revision
kono
parents:
diff changeset
3348 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3349 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3350 \onecolumn
685b35adf419 Initial revision
kono
parents:
diff changeset
3351 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3352 \if@twoside
685b35adf419 Initial revision
kono
parents:
diff changeset
3353 \@mparswitchtrue
685b35adf419 Initial revision
kono
parents:
diff changeset
3354 \else
685b35adf419 Initial revision
kono
parents:
diff changeset
3355 \@mparswitchfalse
685b35adf419 Initial revision
kono
parents:
diff changeset
3356 \fi
685b35adf419 Initial revision
kono
parents:
diff changeset
3357
685b35adf419 Initial revision
kono
parents:
diff changeset
3358 \endinput