annotate Paper/ipsjpapers.sty @ 75:454ddda8d306

modify explanation of CbC
author Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
date Tue, 03 Jan 2012 21:13:11 +0900
parents 878e70793abe
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 % Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 % by Hiroshi Nakashima, Yasuki Saito and
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 % The Editorial Board of the IPSJ Journal
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 %
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 % ipsjpapers.sty 30-Jan-02 by Hiroshi Nakashima (ver 2.09)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 % (revision history deleted)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 % ipsjpapers.sty 24-Apr-95 by Hiroshi Nakashima (ver 1.0)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 % ipsjpapers.sty 30-Nov-93 by Hiroshi Nakashima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 % ipsjpapers.sty 3-Feb-93 by Yaski Saito
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 % compsoft.sty 22-April-92 by Yaski Saito
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 % compsoft.sty 18-July-90 by Hideki Isozaki
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 % j-article.sty 10-Feb-89 from report.sty 16-Mar-88
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
13
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 %%%%%% LaTeX Version %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
15
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 % 2.00(1) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 %% \ifASCII is true if ASCII version Japanese TeX, which doesn't have
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 %% \jintercharskip (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
19 \newif\ifASCII \ASCIIfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 \ifx\jintercharskip\undefined\ASCIItrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 \newif\if@LaTeX@e \@LaTeX@efalse % 1.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 \newif\if@LaTeX@eN \@LaTeX@eNfalse % 2.00(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
23 \def\@tempa{LaTeX2e} % 1.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
24 \ifx\fmtname\@tempa \@LaTeX@etrue % 1.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
25 \ifx\xpt\undefined \@LaTeX@eNtrue \fi\fi % 2.00(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
26 % 2.00(1) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
27
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
28
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
29 %%%%%% Document Styles %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
30
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
31 % 2.00(2) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
32 \newif\ifDS@printer \DS@printerfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
33 \newif\ifDS@english \DS@englishfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
34 \newif\ifDS@technote \DS@technotefalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
35 \newif\ifDS@preface \DS@prefacefalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
36 \newif\ifDS@draft \DS@draftfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
37 \newif\ifDS@techrep \DS@techrepfalse % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
38 \newif\ifDS@sigrecommended \DS@sigrecommendedfalse % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
39 \newif\ifDS@invited \DS@invitedfalse % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
40 \newif\ifDS@abstract \DS@abstractfalse % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
41 \newif\ifDS@private \DS@privatefalse % 2.07(8)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
42
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
43 \if@LaTeX@eN
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
44 \DeclareOption{printer}{\relax} % 2.09(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
45 \DeclareOption{english}{\DS@englishtrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
46 \DeclareOption{technote}{\DS@technotetrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
47 \DeclareOption{preface}{\DS@prefacetrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
48 \DeclareOption{draft}{\DS@drafttrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
49 \DeclareOption{techrep}{\DS@techreptrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
50 \DeclareOption{sigrecommended}{\DS@sigrecommendedtrue} % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 \DeclareOption{invited}{\DS@invitedtrue} % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 \DeclareOption{abstract}{\DS@abstracttrue} % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
53 \DeclareOption{private}{\DS@privatetrue} % 2.07(8)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
54 \DeclareOption{10pt}{\def\@ptsize{0}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 \DeclareOption{11pt}{\def\@ptsize{1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
56 \DeclareOption{12pt}{\def\@ptsize{2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 \ExecuteOptions{10pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 \ProcessOptions
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
59 \def\ipsj@warning{\ClassWarning{ipsjpapers}} % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
60 \def\ipsj@error{\ClassError{ipsjpapers}} % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
61 \newskip \old@latex@skip % 2.00(14)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
62 \let\@maxsep\old@latex@skip % 2.00(14)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
63 \let\@dblmaxsep\old@latex@skip % 2.00(14)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
64
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
65 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
66 \expandafter\ifx\csname ver@ipsjpapers.cls\endcsname\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
67 \typeout{Document Style `ipsjpapers' (ver 2.09) <30 Jan 2002>.} % 2.05(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
68 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
69
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
70 \def\ds@printer{\relax} % 2.09(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
71 \def\ds@english{\DS@englishtrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
72 \def\ds@technote{\DS@technotetrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
73 \def\ds@preface{\DS@prefacetrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
74 \def\ds@draft{\DS@drafttrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
75 \def\ds@techrep{\DS@techreptrue} % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
76 \def\ds@sigrecommended{\DS@sigrecommendedtrue} % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
77 \def\ds@invited{\DS@invitedtrue} % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
78 \def\ds@abstract{\DS@abstracttrue} % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
79 \def\ds@private{\DS@privatetrue} % 2.07(8)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
80
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
81 % 1.04(3)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
82 \def\@ptsize{0}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
83 \@namedef{ds@11pt}{\def\@ptsize{1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
84 \@namedef{ds@12pt}{\def\@ptsize{2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
85 % 1.04(3)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
86
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
87 \@options
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
88 \let\ipsj@warning\@warning % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
89 \let\@latex@warning\@warning % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
90 \def\ipsj@error#1#2{\errhlp{#2}\errmessge{#1}} % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
91 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
92 % 2.00(2) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
93
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
94 \ifx\@classoptionslist\undefined\else % 2.03(1) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
95 \def\ipsj@draft@option{draft}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
96 \def\ipsj@remove@draft@option{\def\@tempb{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
97 \@for\@tempa:=\@classoptionslist\do{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
98 \ifx\@tempa\ipsj@draft@option\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
99 \edef\@tempb{\@tempb,\@tempa}\fi}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
100 \ifx\@tempb\@empty \def\@classoptionslist{}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
101 \expandafter\ipsj@remove@draft@ption\@tempb\@nil\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
102 \def\ipsj@remove@draft@ption,#1\@nil{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
103 \def\@classoptionslist{#1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
104 \ipsj@remove@draft@option
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
105 \fi % 2.03(1) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
106
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
107 %%%%%% Basics %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
108
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
109 \newdimen\@Q \@Q=0.25mm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
110
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
111 \lineskip\z@ \normallineskip\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
112 \lineskiplimit\z@ \normallineskiplimit\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
113 \abovedisplayskip\z@ \belowdisplayskip\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
114 \abovedisplayshortskip\z@ \belowdisplayshortskip\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
115
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
116 \def\baselinestretch{1}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
117 \jot\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
118
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
119 \ifDS@draft\def\next{\input{ipsjdrafts.sty}\endinput}\else\let\next\relax\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
120 \next
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
121
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
122 \@twosidetrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
123
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
124 %%%%%% Fonts %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
125 % \finvedm(dg) dm5 \vpt \tiny fn-mark
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
126 % \sixdm(dg) dm6 \vipt \scriptsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
127 % \sevendm(dg) dm7 \vipt \footnotesize f-note, capt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
128 % 10Q = 7.11304pt -> w(min7) = 6.73550pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
129 % \eightdm(dg) dm8 \viiipt \small abst, header
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
130 % 11Q = 7.82434pt -> w(min8) = 7.69772pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
131 % \eightdm(dg)half dm9 \ixpt \normalsize main text
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
132 % 12Q = 8.53564pt -> w(min9) = 8.65994
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
133 % \tendm(dg) dm10 \xpt \large sec title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
134 % 13Q = 9.24695pt -> w(min10) = 9.62216pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
135 % \tendm(dg)half dm10*1095 \xipt \Large author names
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
136 % 15Q =10.66956pt -> w(min10*1095) = 10.53625pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
137 % (\twlvdm) (dm12) \xiipt \LARGE e-title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
138 % \twelvedm(dg)half dm12*1095 \xivpt \huge title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
139 % min10*1440
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
140 % 18Q =12.80347pt -> w(min10*1440) = 13.8559pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
141 %
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
142 % Note that cm fonts follows LaTeX standard. (e.g. \viiipt -> cmr8, etc.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
143
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
144 % 2.00(4)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
145 \if@LaTeX@e
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
146 \ifASCII
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
147 \def\ipsj@declare@font#1#2#3{{\fontsize{#3}{\z@}#2\selectfont % 2.00(5)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
148 \edef\@tempa{\the\jfont}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
149 \expandafter\global\expandafter\let\expandafter#1\@tempa}} % 2.00(5)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
150
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
151 \ifDS@printer % ASCII LaTeX2e printer
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
152 \DeclareFontShape{JY1}{mc}{m}{n}{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
153 <5> sfixed* [5.175] min5 % 7Q/w5 = 4.97922/4.81108=1.035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
154 <6> sfixed* [5.916] min6 % 8Q/w6 = 5.69055/5.77328=0.986
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
155 <7> sfixed* [7.392] min7 %10Q/w7 = 7.11304/6.73550=1.056
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
156 <8> sfixed* [8.128] min8 %11Q/w8 = 7.82434/7.69772=1.016
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
157 <9> sfixed* [8.872] min8 %12Q/w8 = 8.53564/7.69772=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
158 <10> sfixed* [9.610] min10 %13Q/w10= 9.24695/9.62216=0.961
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
159 <10.95> sfixed* [11.09] min10 %15Q/w10=10.66956/9.62216=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
160 <12> sfixed* [11.83] min10 %16Q/w10=11.38110/9.62216=1.183
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
161 <14.4> sfixed* [13.31] min10 %18Q/w10=12.80347/9.62216=1.331
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
162 }{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
163 \DeclareFontShape{JY1}{gt}{m}{n}{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
164 <5> sfixed* [5.175] goth5 % 7Q/w5 = 4.97922/4.81108=1.035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
165 <6> sfixed* [5.916] goth6 % 8Q/w6 = 5.69055/5.77328=0.986
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
166 <7> sfixed* [7.392] goth7 %10Q/w7 = 7.11304/6.73550=1.056
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
167 <8> sfixed* [8.128] goth8 %11Q/w8 = 7.82434/7.69772=1.016
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
168 <9> sfixed* [8.872] goth8 %12Q/w8 = 8.53564/7.69772=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
169 <10> sfixed* [9.610] goth10 %13Q/w10= 9.24695/9.62216=0.961
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
170 <10.95> sfixed* [11.09] goth10 %15Q/w10=10.66956/9.62216=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
171 <12> sfixed* [11.83] goth10 %16Q/w10=11.38110/9.62216=1.183
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
172 <14.4> sfixed* [13.31] goth10 %18Q/w10=12.80347/9.62216=1.331
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
173 }{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
174
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
175 \ipsj@declare@font\fn@fontvii\mcfamily\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
176
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
177 %% The following fonts are out of NFSS scheme
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
178 \font\fn@fontv min5 scaled739 % 5Q/w5 = 3.55658/4.81108=0.739
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
179 \font\fn@fontvi min5 scaled887 % 6Q/w5 = 4.26790/4.81108=0.887
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
180 \font\fn@fontxv goth10 scaled1035 %14Q/w10= 9.95846/9.62216=1.035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
181
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
182 \else % ASCII LaTeX2e non-printer
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
183 \ipsj@declare@font\fn@fontv\mcfamily\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
184 \ipsj@declare@font\fn@fontvi\mcfamily\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
185 \ipsj@declare@font\fn@fontvii\mcfamily\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
186 \ipsj@declare@font\fn@fontxv\gtfamily\@xipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
187 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
188
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
189 \else % NTT LaTeX2e
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
190 \def\ipsj@declare@font#1#2#3{{\fontsize{#3}{\z@}#2\selectfont % 2.00(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
191 \xdef#1{\expandafter\noexpand\csname\jf@ntn@me\endcsname}}} % 2.00(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
192 \ipsj@declare@font\fn@fontv\dm\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
193 \ipsj@declare@font\fn@fontvi\dm\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
194 \ipsj@declare@font\fn@fontvii\dm\@vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
195 \ipsj@declare@font\fn@fontxv\dg\@xipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
196 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
197 % 2.00(4) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
198
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
199 \else % LaTeX 2.09 % 2.00(4)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
200 %% Fonts for ASCII TeX. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
201 \ifASCII
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
202 \ifDS@printer
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
203 \font\fn@fontv min5 scaled739 % 5Q/w5 = 3.55658/4.81108=0.739
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
204 \font\fn@fontvi min5 scaled887 % 6Q/w5 = 4.26790/4.81108=0.887
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
205 \font\fivedm min5 scaled1035 % 7Q/w5 = 4.97922/4.81108=1.035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
206 \font\fivedg goth5 scaled1035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
207 \font\sixdm min6 scaled986 % 8Q/w6 = 5.69055/5.77328=0.986
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
208 \font\sixdg goth6 scaled986
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
209 \font\sevendm min7 scaled1056 %10Q/w7 = 7.11304/6.73550=1.056
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
210 \font\sevendg goth7 scaled1056
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
211 \font\eightdm min8 scaled1016 %11Q/w8 = 7.82434/7.69772=1.016
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
212 \font\eightdg goth8 scaled1016
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
213 \font\eightdmhalf min8 scaled1109 %12Q/w8 = 8.53564/7.69772=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
214 \font\eightdghalf goth8 scaled1109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
215 \font\tendm min10 scaled961 %13Q/w10= 9.24695/9.62216=0.961
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
216 \font\tendg goth10 scaled961
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
217 \font\fn@fontxv goth10 scaled1035 %14Q/w10= 9.95846/9.62216=1.035
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
218 \font\tendmhalf min10 scaled1109 %15Q/w10=10.66956/9.62216=1.109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
219 \font\tendghalf goth10 scaled1109
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
220 \font\twelvedm min10 scaled1183 %16Q/w10=11.38110/9.62216=1.183
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
221 \font\twelvedg goth10 scaled1183
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
222 \font\twelvedmhalf min10 scaled1331 %18Q/w10=12.80347/9.62216=1.331
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
223 \font\twelvedghalf goth10 scaled1331
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
224 \let\fn@fontvii\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
225
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
226 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
227 \font\fivedm min5
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
228 \font\fivedg goth5
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
229 \font\sixdm min6
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
230 \font\sixdg goth6
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
231 \font\sevendm min7
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
232 \font\sevendg goth7
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
233 \font\eightdm min8
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
234 \font\eightdg goth8
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
235 \font\eightdmhalf min9
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
236 \font\eightdghalf goth9
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
237 \font\tendm min10
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
238 \font\tendg goth10
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
239 \font\tendmhalf min10 scaled\magstephalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
240 \font\tendghalf goth10 scaled\magstephalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
241 \font\twelvedm min10 scaled\magstep1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
242 \font\twelvedg goth10 scaled\magstep1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
243 \font\twelvedmhalf min10 scaled\magstep2
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
244 \font\twelvedghalf goth10 scaled\magstep2
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
245 \let\fn@fontv\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
246 \let\fn@fontvi\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
247 \let\fn@fontvii\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
248 \let\fn@fontxv\tendghalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
249
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
250 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
251
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
252 %% ASCII doesn't have \old@Npt. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
253 \let\old@@vpt\vpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
254 \let\old@@vipt\vipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
255 \let\old@@viipt\viipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
256 \let\old@@viiipt\viiipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
257 \let\old@@ixpt\ixpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
258 \let\old@@xpt\xpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
259 \let\old@@xipt\xipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
260 \let\old@@xiipt\xiipt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
261 \let\old@@xivpt\xivpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
262
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
263 \def\old@vpt{\old@@vpt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
264 \def\old@vipt{\old@@vipt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
265 \def\old@viipt{\old@@viipt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
266 \def\old@viiipt{\old@@viiipt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
267 \def\old@ixpt{\old@@ixpt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
268 \def\old@xpt{\old@@xpt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
269 \def\old@xipt{\old@@xipt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
270 \def\old@xiipt{\old@@xiipt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
271 \def\old@xivpt{\old@@xivpt\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
272
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
273 % 2.00(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
274 % 1.06(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
275
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
276 %% ASCII doesn't have \dg nor \dm. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
277 \def\dg{\protect\pdg}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
278 \def\dm{\protect\pdm}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
279 %% Redefine \gt and \mc
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
280 \def\gt{\protect\pdg}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
281 \def\mc{\protect\pdm}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
282 \let\pdm\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
283
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
284 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
285 %% Fonts for NTT jTeX
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
286 %% \magstephalf and \magstep1 may cause trouble in older versions.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
287
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
288 \jfont\fivedm=dm5
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
289 \jfont\fivedg=dg5
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
290 \jfont\sixdm=dm6
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
291 \jfont\sixdg=dg6
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
292 \jfont\sevendm=dm7
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
293 \jfont\sevendg=dg7
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
294 \jfont\eightdm=dm8
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
295 \jfont\eightdg=dg8
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
296 \jfont\eightdmhalf=dm9
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
297 \jfont\eightdghalf=dg9
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
298 \jfont\tendm=dm10
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
299 \jfont\tendg=dg10
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
300 \jfont\tendmhalf=dm10 scaled 1095
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
301 \jfont\tendghalf=dg10 scaled 1095
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
302 \jfont\twelvedm=dm12
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
303 \jfont\twelvedg=dg12
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
304 \jfont\twelvedmhalf=dm12 scaled 1095
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
305 \jfont\twelvedghalf=dg12 scaled 1095
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
306 \let\fn@fontv\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
307 \let\fn@fontvi\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
308 \let\fn@fontvii\fivedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
309 \let\fn@fontxv\tendghalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
310 % 1.06(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
311 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
312 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
313
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
314 \ifx\jfsize\undefined \newcount\jfsize \fi % 1.06(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
315
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
316 \ifASCII % 1.06(3),2.00(6)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
317 \let\setjglues\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
318 \let\jintercharskip\kanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
319 \let\jasciikanjiskip\xkanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
320 \let\jmathkanjiskip\xkanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
321 \newdimen\jspaceskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
322
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
323 \def\defjintercharskip#1#2#3#4{\@asciiwarning{\defjintercharskip}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
324 \def\defjasciikanjiskip#1#2#3#4{\@asciiwarning{\defjasciicharskip}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
325 \def\defmathkanjiskip#1#2#3#4{\@asciiwarning{\defmathcharskip}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
326 \def\defjspaceskip#1#2#3#4{\@asciiwarning{\defjspaceskip}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
327
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
328 \def\@asciiwarning#1{\ipsj@warning{\string#1\space % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
329 is not supported in ASCII version}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
330 % 1.06(3),2.00(6)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
331 \else % 2.00(7)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
332 \if@LaTeX@e
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
333 \ipsj@declare@font\fn@eightdmhalf\dm\@ixpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
334 \ipsj@declare@font\fn@eightdghalf\dg\@ixpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
335 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
336 \def\fn@eightdmhalf{\eightdmhalf}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
337 \def\fn@eightdghalf{\eightdghalf}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
338 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
339 \ifx\setjglues\undefined\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
340 \expandafter\defjintercharskip\fn@eightdmhalf{0pt}{1.4pt}{0.5pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
341 \expandafter\defjintercharskip\fn@eightdghalf{0pt}{1.4pt}{0.5pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
342 \expandafter\defjasciikanjiskip\fn@eightdmhalf{2pt}{1pt}{1pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
343 \expandafter\defjasciikanjiskip\fn@eightdghalf{2pt}{1pt}{1pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
344 \expandafter\defjmathkanjiskip\fn@eightdmhalf{2pt}{1pt}{1pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
345 \expandafter\defjmathkanjiskip\fn@eightdghalf{2pt}{1pt}{1pt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
346 \fi % 2.00(7)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
347 \fi % 2.00(4)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
348
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
349 \if@LaTeX@e % 2.00(8)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
350 \if@LaTeX@eN
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
351 \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
352 \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
353 \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
354 \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
355 \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
356 \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
357 \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
358 \DeclareRobustCommand*{\cal}{\@fontswitch{\relax}{\mathcal}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
359 \DeclareRobustCommand*{\mit}{\@fontswitch{\relax}{\mathnormal}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
360 \ifASCII
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
361 \DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
362 \DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
363 \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
364 \ifASCII
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
365 \def\dm{\mc}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
366 \def\dg{\gt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
367 \fi\fi % 2.00(8)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
368
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
369 %%%%%% Basic Font Size Macros %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
370
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
371 \if@LaTeX@e % 1.06(4),2.00(9),2.04(3)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
372 \def\@setsize#1#2#3#4{\@setfontsize#1{#4}{#2}\ipsj@setjspaceskip}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
373 \ifASCII
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
374 \def\ipsj@setjspaceskip{\jspaceskip1zw\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
375 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
376 \let\ipsj@setjspaceskip\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
377 \fi % 1.06(4),2.00(9),2.04(3)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
378
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
379 %% \vipt etc. are redefined to use appropriate Japanese fonts.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
380 \else % 2.00(9)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
381 \def\vpt{\old@vpt\fivedm\let\pdg\fivedg\let\pdm\fivedm\jfsize=5\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
382 \def\vipt{\old@vipt\sixdm\let\pdg\sixdg\let\pdm\sixdm\jfsize=6\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
383 \def\viipt{\old@viipt\sevendm\let\pdg\sevendg\let\pdm\sevendm\jfsize=7\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
384 \def\viiipt{\old@viiipt\eightdm\let\pdg\eightdg\let\pdm\eightdm\jfsize=8\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
385 \def\ixpt{\old@ixpt\eightdmhalf\let\pdg\eightdghalf\let\pdm\eightdmhalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
386 \jfsize=9\relax \@ixptboldmath} % 1.02(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
387 \def\xpt{\old@xpt\tendm\let\pdg\tendg\let\pdm\tendm\jfsize=10\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
388 \def\xipt{\old@xipt\tendmhalf\let\pdg\tendghalf\let\pdm\tendmhalf\jfsize=11
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
389 \relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
390 \def\xiipt{\old@xiipt\twelvedm\let\pdg\twelvedg\let\pdm\twelvedm
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
391 \jfsize=12\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
392 \def\xivpt{\old@xivpt\twelvedmhalf\let\pdg\twelvedghalf\let\pdm\twelvedmhalf
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
393 \jfsize=14\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
394 \fi % 2.00(9)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
395
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
396 \if@LaTeX@e % 1.06(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
397 \let\@ixptboldmath\relax % 1.06(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
398 \else % 1.06(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
399 % 1.02(2) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
400 \ifDS@printer
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
401 \def\@ixptboldmath{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
402 \def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
403 \textfont\@ne\ninmi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
404 \textfont\tw@\ninsy \textfont\lyfam\ninly
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
405 \@boldfalse}\@boldfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
406 \def\boldmath{\@ifundefined{ninmib}{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
407 \global\font\ninmib\@mbi\@ptscale9\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
408 \global\font\ninsyb\@mbsy\@ptscale9\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
409 \global\font\ninlyb\@lasyb\@ptscale9\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
410 \@addfontinfo\@ixpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
411 {\def\boldmath{\everymath{\mit}\everydisplay{\mit}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
412 \@prtct\@nomathbold
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
413 \textfont\@ne\ninmib \textfont\tw@\ninsyb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
414 \textfont\lyfam\ninlyb \@prtct\@boldtrue}}}{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
415 \@ixpt\boldmath}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
416 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
417 \def\@ixptboldmath{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
418 \def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
419 \textfont\@ne\ninmi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
420 \textfont\tw@\ninsy \textfont\lyfam\ninly
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
421 \@boldfalse}\@boldfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
422 % 1.03(1) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
423 \def\boldmath{\@ifundefined{ninmib}{\global\font\ninmib\@mbi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
424 \global\font\ninsyb\@mbsy\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
425 \global\font\ninlyb\@lasyb\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
426 \@addfontinfo\@ixpt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
427 {\def\boldmath{\everymath{\mit}\everydisplay{\mit}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
428 \@prtct\@nomathbold
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
429 \textfont\@ne\ninmib \textfont\tw@\ninsyb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
430 \textfont\lyfam\ninlyb \@prtct\@boldtrue}}}{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
431 \@ixpt\boldmath}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
432 % 1.03(1) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
433 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
434 % 1.02(2) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
435 \fi % 1.06(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
436
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
437
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
438 %%%%%% Font Size Macros %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
439
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
440 \def\fs@setsize#1#2#3#4{\normalsize\dimen@\normalbaselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
441 \@ifstar{\@setsize{#1}{\dimen@}{#3}{#4}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
442 {\@setsize{#1}{#2}{#3}{#4}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
443
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
444 % s = (3*b - (h' + d') - (h + d))/2
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
445 % s_a = s + h' + d - b
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
446 % s_b = s + h + d' - b
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
447 \def\sec@setskips#1{\setbox0\hbox{\fs@sec\bf#1}\setbox1\hbox{#1}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
448 \@tempdima3\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
449 \advance\@tempdima-\ht0 \advance\@tempdima-\dp0
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
450 \advance\@tempdima-\ht1 \advance\@tempdima-\dp1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
451 \divide\@tempdima\tw@ \advance\@tempdima-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
452 \@tempdimb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
453 \advance\@tempdima\ht0 \advance\@tempdima\dp1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
454 \advance\@tempdimb\ht1 \advance\@tempdimb\dp0
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
455 \edef\sec@aboveskip{\the\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
456 \edef\sec@belowskip{\the\@tempdimb}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
457
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
458 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
459 % size pt \baselineskip size \?pt \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
460 % \normalsize 10 16Q \large 11 18Q (*)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
461 % \small 9 15Q \Large 12 22Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
462 % \footnotesize 8 13Q \LARGE 14 26Q (*)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
463 % \scriptsize 6 8pt (*) \huge 18 30Q (*)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
464 % \tiny 5 6pt (*) \Huge 18 30Q (*)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
465 % * : not measured
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
466
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
467 \def\@normalsize{\@setsize\normalsize{16\@Q}\xpt\@xpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
468 \def\small{\fs@setsize\small{15\@Q}\ixpt\@ixpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
469 \def\footnotesize{\fs@setsize\footnotesize{13\@Q}\viiipt\@viiipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
470 \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
471 \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
472 \def\large{\@setsize\Large{18\@Q}\xipt\@xipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
473 \def\Large{\@setsize\LARGE{22\@Q}\xiipt\@xiipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
474 \def\LARGE{\@setsize\LARGE{26\@Q}\xivpt\@xivpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
475 \def\huge{\@setsize\Huge{30\@Q}\xviipt\@xviipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
476 \let\Huge\huge
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
477
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
478 \ifDS@techrep % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
479 \def\@normalsize{\@setsize\normalsize{17\@Q}\xpt\@xpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
480 \fi % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
481
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
482 \if@LaTeX@e % 2.00(10)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
483 \let\normalsize\@normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
484 \fi % 2.00(10)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
485
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
486 \let\fs@footnote\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
487 \let\fs@caption\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
488 \let\fs@table\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
489 \let\fs@eabst\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
490 \let\fs@header\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
491 \let\fs@footer\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
492 \let\fs@bibliography\small
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
493 \let\fs@subsec\normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
494 \let\fs@sec\normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
495 \let\fs@type\large
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
496 \let\fs@eauthor\large
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
497 \let\fs@title\Large
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
498
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
499 \@normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
500
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
501 \sec@setskips{A}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
502
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
503 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
504 % size pt \baselineskip size \?pt \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
505 % \normalsize 9 19Q \large 10 19Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
506 % \small 8 14Q \Large 11 22Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
507 % \footnotesize 7 14Q \LARGE 12 18Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
508 % \scriptsize 6 8pt (*) \huge 14 26Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
509 % \tiny 5 6pt (*) \Huge 14 26Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
510 % * : not measured
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
511
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
512 \def\@normalsize{\@setsize\normalsize{19\@Q}\ixpt\@ixpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
513 \def\small{\fs@setsize\small{14\@Q}\viiipt\@viiipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
514 \def\footnotesize{\fs@setsize\footnotesize{14\@Q}\viipt\@viipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
515 \def\scriptsize{\@setsize\scriptsize{8pt}\vipt\@vipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
516 \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
517 \def\large{\@setsize\large{19\@Q}\xpt\@xpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
518 \def\Large{\@setsize\Large{22\@Q}\xipt\@xipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
519 \def\LARGE{\@setsize\LARGE{18\@Q}\xiipt\@xiipt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
520 \def\huge{\@setsize\Huge{26\@Q}\xivpt\@xivpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
521 \let\Huge\huge
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
522
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
523 \ifDS@techrep % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
524 \def\@normalsize{\@setsize\normalsize{17\@Q}\ixpt\@ixpt}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
525 \fi % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
526
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
527 \if@LaTeX@e % 2.00(10)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
528 \let\normalsize\@normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
529 \fi % 2.00(10)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
530
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
531 \let\fs@footnote\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
532 \let\fs@caption\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
533 \let\fs@table\footnotesize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
534 \let\fs@abst\small
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
535 \def\fs@eabst{\small\baselineskip13\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
536 \let\fs@header\small
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
537 \let\fs@footer\small
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
538 \let\fs@subsec\normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
539 \def\fs@bibliography{\normalsize\baselineskip16\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
540 \let\fs@sec\large
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
541 \let\fs@type\fn@fontxv
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
542 \let\fs@author\Large
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
543 \def\fs@eauthor{\Large\baselineskip15\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
544 \let\fs@etitle\LARGE
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
545 \let\fs@title\huge
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
546
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
547 \@normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
548 % 2.00(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
549 \ifx\setjglues\undefined\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
550 \setjglues
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
551 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
552
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
553 \sec@setskips{あ}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
554
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
555 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
556
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
557 \if@LaTeX@e\else % 2.00(11)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
558 \let\latex@bf\bf % 1.06(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
559 \def\bf{\latex@bf \dg} % 1.06(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
560 \fi % 2.00(11)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
561
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
562
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
563 %%%%%% Page Layout Parameters %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
564
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
565 \newdimen\@mojihaba
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
566
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
567 \headheight 12\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
568
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
569 % We want to allow a line containing $\displaystyle X^X$ to be a first line.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
570 \setbox0\hbox{$\displaystyle X^X$}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
571 \topskip\ht0
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
572
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
573 \ifdim\maxdepth<\dp\strutbox \maxdepth\dp\strutbox \@maxdepth\maxdepth\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
574
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
575 \@tempswafalse % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
576 \ifDS@english \ifDS@techrep \else \@tempswatrue \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
577 \if@tempswa % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
578 \topmargin 138\@Q \advance\topmargin-1in
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
579
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
580 % \textheight = 53\baselineskip + \topskip + epsilon(100sp)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
581 \textheight53\baselineskip \advance\textheight\topskip \advance\textheight100sp
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
582
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
583 % \headsep = 24Q - \topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
584 \headsep28\@Q \advance\headsep-\topskip % 2.02(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
585
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
586 % Only first page has page number (footer) at the bottom
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
587 \footskip 27\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
588
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
589 \@mojihaba13\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
590
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
591 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
592 \topmargin 131\@Q \advance\topmargin-1in
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
593
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
594 % \textheight = 45\baselineskip + \topskip + epsilon(100sp)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
595 \textheight45\baselineskip \advance\textheight\topskip \advance\textheight100sp
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
596
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
597 \ifDS@techrep % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
598 \textheight50\baselineskip \advance\textheight\topskip \advance\textheight100sp
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
599 \fi % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
600
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
601 % \headsep = 28Q - \topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
602 \headsep28\@Q \advance\headsep-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
603
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
604 % Only first page has page number (footer) at the bottom
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
605 \footskip24\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
606
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
607 \@mojihaba12\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
608 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
609
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
610 \columnsep30\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
611
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
612 % \textwidth - \columnwidth = 24 * 12Q * 2 + \columnsep = 606Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
613 \textwidth606\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
614 \columnseprule0pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
615
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
616 \oddsidemargin210mm \advance\oddsidemargin-\textwidth \divide\oddsidemargin\tw@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
617 \advance\oddsidemargin-1in \evensidemargin\oddsidemargin
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
618
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
619 \skip\footins\baselineskip \advance\skip\footins-.5\@mojihaba
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
620 % \footnotesep = \baselineskip - depth(\strutbox)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
621 {\fs@footnote
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
622 \footnotesep\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
623 \global\advance\footnotesep-\dp\strutbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
624
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
625 \def\footnoterule{{\fs@footnote\kern-\dp\strutbox \hrule \kern-.4\p@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
626 \kern\dp\strutbox}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
627
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
628 \floatsep \baselineskip \textfloatsep \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
629 \intextsep \baselineskip \@maxsep \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
630 \dblfloatsep \baselineskip \dbltextfloatsep \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
631 \@dblmaxsep \baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
632 \@fptop 0pt plus 1fil \@fpsep 0pt plus 2fil \@fpbot 0pt plus 1fil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
633 \@dblfptop 0pt plus 1fil \@dblfpsep 0pt plus 2fil \@dblfpbot 0pt plus 1fil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
634
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
635 \parskip\z@ \parindent\@mojihaba
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
636 \@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
637 \@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
638 \@itempenalty -\@lowpenalty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
639
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
640
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
641 %%%%%% Title and Authors %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
642 %
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
643 % Format of title, author names and abstract.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
644 %
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
645 % \huge\bf <Japanese title>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
646 % \vskip 32Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
647 % \Large <Japanese author names>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
648 % \vskip 32Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
649 % \small <Japanese abstract>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
650 % \vskip 34Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
651 % \LARGE\bf <English title>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
652 % \vskip 28Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
653 % \Large\sc <English author names>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
654 % \vskip 28Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
655 % \small <English abstract>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
656 % \vskip 25Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
657
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
658 % 2.07(3)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
659 \def\ipsj@ohcheck#1#2#3{\fs@header\hskip12\@Q#1\qquad#2\qquad#3\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
660 \def\ipsj@ohcvolno{Vol.~00\hskip12\@Q No.~SIG\ 00(\ipsj@sig@code\ 00)}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
661
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
662 \def\maketitle{\let\ipsj@oddhead@t\ipsj@oddhead@a
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
663 \ifipsj@trans
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
664 \settowidth\@tempdima{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
665 \ipsj@ohcheck\ipsj@ohcvolno\@titlestring\ipsj@ohcvolno}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
666 \ifdim\@tempdima>\textwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
667 \let\ipsj@oddhead@t\ipsj@oddhead@b
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
668 \settowidth\@tempdima{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
669 \ipsj@ohcheck\ipsj@ohcvolno\@titlestring{000}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
670 \ifdim\@tempdima>\textwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
671 \ipsj@warning{% % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
672 \string\title\space for headding is too wide}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
673 \fi \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
674 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
675 \settowidth\@tempdima{\fs@header
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
676 \hskip12\@Q Vol.~00\hskip12\@Q No.~00\qquad\@titlestring\qquad
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
677 Vol.~00\hskip12\@Q No.~00\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
678 \ifdim\@tempdima>\textwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
679 \ipsj@warning{% % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
680 \string\title\space for headding is too wide}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
681 \fi \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
682 \par\twocolumn[\@maketitle]\thispagestyle{myheadings}\@thanks}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
683 % 2.07(3)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
684
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
685 % default title header
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
686
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
687 \def\title{\@dblarg{\@xtitle}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
688 \def\@xtitle[#1]#2{\gdef\@title{#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
689 {\def\protect{\noexpand\protect\noexpand}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
690 \ifDS@english\def\\{\unskip\ \ignorespaces}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
691 \else\def\\{\unskip\ignorespaces}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
692 \xdef\@titlestring{#1}}} % 2.07(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
693
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
694 \def\@title{\mkt@warning\title}\def\@titlestring{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
695 \long\def\author#1{\long\gdef\@author{#1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
696 \def\@author{\mkt@warning\author}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
697
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
698 \newbox\@abstractbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
699 %% Introduce \@titlewidth because we now use this dimen repeatedly. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
700 %% \@titlewidth = 44 * 11Q = 484Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
701 \newdimen\@titlewidth \@titlewidth 484\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
702
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
703 \def\abstract{\global\let\@abstract\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
704 \global\setbox\@abstractbox\hbox\bgroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
705 \begin{minipage}[b]{\@titlewidth}\fs@abst\parindent11\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
706 \def\endabstract{\end{minipage}\egroup}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
707 \def\@abstract{\mkt@warning{abstract env}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
708
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
709 %% We need English title, author name(s) and abstract. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
710 \def\etitle#1{\gdef\@etitle{#1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
711 \def\@etitle{\mkt@warning\etitle}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
712 \long\def\eauthor#1{\long\gdef\@eauthor{#1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
713 \def\@eauthor{\mkt@warning\eauthor}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
714
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
715 \newbox\@eabstractbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
716 \def\eabstract{\global\let\@eabstract\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
717 \global\setbox\@eabstractbox\hbox\bgroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
718 \begin{minipage}[b]{\@titlewidth}\fs@eabst\parindent11\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
719 \let\endeabstract\endabstract
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
720 \def\@eabstract{\mkt@warning{eabstract env}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
721
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
722 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
723 \let\author\eauthor \let\abstract\eabstract
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
724 \let\@eauthor\@author \let\@eabstract\@abstract
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
725 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
726
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
727 \def\mkt@warning#1{\ipsj@warning{Missing \string#1}} % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
728
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
729 \newdimen\mkt@prevdepth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
730 \newbox\mkt@titlebox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
731 \def\@maketitle{\setbox\mkt@titlebox\vbox{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
732 \ifDS@english \ifDS@preface
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
733 \hbox{}\vskip60\@Q \vskip-\headsep \vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
734 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
735 \hbox{}\vskip26\@Q \vskip-\headsep \vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
736 \leftline{\fs@type\it
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
737 \ifDS@technote Technical Note
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
738 \else\ifDS@invited Invited Paper % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
739 \else\ifDS@sigrecommended % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
740 Recommended Paper % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
741 \else\ifDS@abstract % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
742 Abstract % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
743 \else\ifDS@techrep\else % 2.02(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
744 Regular Paper\fi\fi\fi\fi\fi} % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
745 % % 2.04(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
746 \vskip32\@Q \vskip-\baselineskip \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
747 \else % 2.04(1) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
748 \@tempswafalse \ifDS@technote\@tempswatrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
749 \ifDS@sigrecommended\@tempswatrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
750 \ifDS@invited\@tempswatrue\fi % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
751 \ifDS@abstract\@tempswatrue\fi % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
752 \if@tempswa
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
753 \vskip18\@Q \vskip-\headsep
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
754 \leftline{\vbox to28\@Q{\hrule height.8pt\vss
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
755 \hbox{\hskip7\@Q \fs@type
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
756 \ifDS@technote テクニカルノート%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
757 \else\ifDS@invited 招待論文% % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
758 \else\ifDS@sigrecommended
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
759 研究会推薦論文 % 2.06(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
760 \else 発表概要\fi\fi\fi % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
761 \hskip7\@Q}\vss\hrule height.8pt}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
762 % % 2.04(1) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
763 \vskip40\@Q \vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
764 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
765 \hbox{}\vskip60\@Q \vskip-\headsep \vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
766 \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
767 \@tempswafalse \ifDS@english\else\ifDS@preface\@tempswatrue\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
768 \mkt@maketitle{\fs@title\bf}\@title\title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
769 % 1.04(1a) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
770 \ifnum\c@affi@footnote>\thr@@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
771 \let\theaffi@footnote\theaffi@footnotemany \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
772 \c@affi@footnote\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
773 % 1.04(1a) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
774 \affi@labels
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
775 \ifDS@english\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
776 \vskip-\mkt@prevdepth \nointerlineskip\vskip32\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
777 \centerline{\vbox{\centering\hsize\@titlewidth\fs@author
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
778 \mkt@makeauthor}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
779 \ifDS@preface\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
780 \vskip-\prevdepth \nointerlineskip\vskip32\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
781 \centerline{\@abstract\box\@abstractbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
782 \vskip-\prevdepth \nointerlineskip\vskip34\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
783 \mkt@maketitle{\fs@etitle\bf}\@etitle\etitle
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
784 \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
785 \if@tempswa\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
786 \vskip-\mkt@prevdepth \nointerlineskip\vskip28\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
787 \centerline{\vbox{\centering\hsize\@titlewidth\fs@eauthor\sc
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
788 \mkt@makeeauthor}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
789 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
790 \ifDS@preface\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
791 \vskip-\prevdepth \nointerlineskip\vskip28\@Q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
792 \centerline{\@eabstract\box\@eabstractbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
793 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
794 \vskip-\prevdepth \nointerlineskip\vskip25\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
795 \@tempdimb\ht\mkt@titlebox \advance\@tempdimb\dp\mkt@titlebox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
796 \@tempcnta\@tempdimb \@tempcntb\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
797 \divide\@tempcnta\@tempcntb \@tempdima\@tempcnta\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
798 \advance\@tempdima-\@tempdimb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
799 \box\mkt@titlebox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
800 \ifdim\@tempdima=\z@\else\advance\@tempdima\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
801 \vskip\@tempdima\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
802
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
803 %% \mkt@maketitle puts Japanese/English title, whose lines should be
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
804 %% properly broken with \\ by the user. The result is flushed to left, then
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
805 %% centered with respect to the longest line. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
806 \def\mkt@maketitle#1#2#3{\setbox\@tempboxa\vtop{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
807 \def\\{\unskip\egroup\hbox\bgroup\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
808 #1\hbox\bgroup#2\unskip\egroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
809 \global\mkt@prevdepth\prevdepth}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
810 \@tempdima\textwidth\advance\@tempdima-4\@mojihaba
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
811 \ifdim\wd\@tempboxa>\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
812 \ipsj@warning{% % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
813 \string#3 is too wide. Break line(s) by \string\\}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
814 \centerline{\box\@tempboxa}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
815
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
816 % Assignment of Japanese author names to lines:
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
817 % 1 -> 1, 2 -> 2, 3 -> 3, 4 -> 2+2, 5 -> 3+2, 6 -> 3+3, 7 -> 3+2+2, 8 -> 3+3+2,
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
818 % ...
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
819 % Rule for N authors (N > 2, q := N div 3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
820 % N mod 3 = 0 -> 3 * q
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
821 % N mod 3 = 1 -> 3 * (q - 2) + 2 + 2
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
822 % N mod 3 = 2 -> 3 * (q - 1) + 2
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
823
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
824 \newcount\mkt@cnta\newcount\mkt@cntb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
825 \newcount\mkt@sname\newcount\mkt@gname
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
826 \newbox\mkt@boxa
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
827 \newdimen\mkt@namewidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
828 \def\mkt@makeauthor{\let\member\@gobble \let\nomember\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
829 \let\stmember\@gobble % Those are not necessary in final manuscript.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
830 \def\@makefnmark{\smash{\rlap{\fn@fontvii$^{\affi@thefnmark}$}}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
831 \gdef\affi@thefnmark{}\leavevmode\let\+\ignorespaces
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
832 \settowidth\@tempdima{あ}\mkt@namewidth7\@tempdima\@tempcnta\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
833 \expandafter\mkt@countauthor\@author\and\@nil\and
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
834 \ifnum\@tempcnta=\@ne\let\mkt@anhbox\mkt@anhboxc\mkt@makesingleauthor
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
835 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
836 \@tempcntb\@tempcnta \divide\@tempcntb\thr@@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
837 \multiply\@tempcntb\thr@@ \advance\@tempcntb-\@tempcnta
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
838 \ifnum\@tempcntb=\m@ne\relax\@tempcntb\tw@\else\@tempcntb\z@\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
839 \mkt@cnta\thr@@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
840 \let\mkt@anhbox\mkt@anhboxl
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
841 \expandafter\mkt@makemultiauthor\@author\and\and\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
842 \def\mkt@countauthor#1\and{\def\@tempa{#1}\ifx\@tempa\@nnil\let\next\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
843 \else\advance\@tempcnta\@ne \let\next\mkt@countauthor\fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
844
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
845 % If single author, author name has 9 KC width instead of 7.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
846 \def\mkt@makesingleauthor{\divide\mkt@namewidth7\multiply\mkt@namewidth9\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
847 \expandafter\mkt@putauthor\@author\+ \@nil}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
848
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
849 \def\mkt@makemultiauthor#1\and{\ifnum\@tempcnta=\z@\unskip\let\next\relax\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
850 \leavevmode
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
851 \advance\mkt@cnta\m@ne \advance\@tempcnta\m@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
852 \ifnum\mkt@cnta=\z@\mkt@maleft{#1}\mkt@cnta\thr@@\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
853 \ifnum\@tempcnta=\@tempcntb\mkt@maleft{#1}\mkt@cnta\tw@\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
854 \mkt@putauthor#1\+ \@nil\let\mkt@anhbox\mkt@anhboxc\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
855 \let\next\mkt@makemultiauthor\fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
856 \def\mkt@maleft#1{\let\mkt@anhbox\mkt@anhboxr\mkt@putauthor#1\+ \@nil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
857 \par\let\mkt@anhbox\mkt@anhboxl}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
858
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
859 % Japanese author name format:
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
860 % Non Japanese : As is.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
861 % Japanese w/o s/g delimitor : As is with warning.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
862 % Japanese (s+g>6) : As is.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
863 % Japanese (s+g<7) : Give 1-KC space to s/g delimitor, then insert
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
864 % infinit stretch between each character pair, assuming the
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
865 % s/g delimitor as a charcter, to make the name have 7-KC
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
866 % width. An exception is 2s + 2g case, in which s/g
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
867 % delimitor has 0 width in order to have the result
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
868 % "S_S_G_G".
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
869
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
870 \def\mkt@putauthor#1 #2\@nil{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
871 \setbox\@tempboxa\hbox{\let\affiref\@gobble \let\mkt@warning\@gobble
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
872 \jintercharskip\z@#1#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
873 \setbox\mkt@boxa\hbox{\let\affiref\@gobble \let\mkt@warning\@gobble
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
874 \jintercharskip1cm#1#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
875 \ifdim\wd\@tempboxa=\wd\mkt@boxa \mkt@anhbox{#1 #2}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
876 % probably no Kanjis
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
877 \def\@tempa{#2}\ifx\@tempa\empty % without space btwn s/g-name
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
878 {\let\affiref\@gobble \def\+{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
879 \ipsj@warning{Author name #1 doesn't have a space}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
880 % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
881 \mkt@anhbox{#1}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
882 \mkt@getnamewidth\mkt@sname{#1}\mkt@getnamewidth\mkt@gname{#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
883 \mkt@cntb\mkt@sname \advance\mkt@cntb\mkt@gname
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
884 \ifnum\mkt@cntb>6\relax\mkt@anhbox{#1\ #2}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
885 \jintercharskip\fill%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
886 \@tempskipa\@tempdima plus2fill\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
887 \ifnum\mkt@sname=\tw@ \ifnum\mkt@gname=\tw@ \@tempskipa\fill\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
888 \hbox to\mkt@namewidth{#1\hskip\@tempskipa#2\@makefnmark}\fi\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
889 \gdef\affi@thefnmark{}\hskip\columnsep}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
890
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
891 % When an author name is formatted "as is", the following macros are used
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
892 % according to their position (left, right, or center).
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
893 \def\mkt@anhboxl#1{\hbox to\mkt@namewidth{\hss#1\@makefnmark}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
894 \def\mkt@anhboxr#1{\hbox to\mkt@namewidth{#1\@makefnmark\hss}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
895 \def\mkt@anhboxc#1{\setbox\@tempboxa\hbox{#1\@makefnmark}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
896 \ifdim\wd\@tempboxa>\mkt@namewidth\box\@tempboxa
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
897 \else\hbox to\mkt@namewidth{\hss\box\@tempboxa\hss}\fi} % 2.08(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
898
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
899 \def\mkt@getnamewidth#1#2{\setbox\@tempboxa\hbox{\let\affiref\@gobble#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
900 \@tempdimb\wd\@tempboxa
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
901 \advance\@tempdimb.5\@tempdima #1\@tempdimb \mkt@cntb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
902 \divide#1\mkt@cntb}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
903
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
904 % English author name format
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
905 % 1 -> <name-1>^*
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
906 % 2 -> <name-1>^* and~<name-2>^*
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
907 % 3 or more -> <name-1>,^* <name-2>,^* ... <name-n-1>^* and~<name-n>^*
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
908 % (be careful the position of comma).
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
909 %
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
910 % No special tricks for assignment names to line. Names are simply put in a
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
911 % \centering paragraph.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
912
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
913 \def\mkt@makeeauthor{\let\member\@gobble \let\nomember\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
914 \let\stmember\@gobble % Those are not necessary in final manuscript.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
915 \leavevmode\let\mkt@and\relax\gdef\affi@thefnmark{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
916 \def\@thefnmark{\affi@thefnmark}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
917 \expandafter\mkt@imakeeauthor\@eauthor\and\@nil\and}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
918 \def\mkt@imakeeauthor#1\and#2\and{\def\@tempa{#2}\ifx\@tempa\@nnil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
919 #1\@makefnmark\let\next\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
920 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
921 \def\@tempb{#1}\def\next{\mkt@iimakeeauthor#2\and}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
922 \fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
923 \def\mkt@iimakeeauthor#1\and{\def\@tempa{#1}\ifx\@tempa\@nnil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
924 \@makefnmark\ {\rm{and}~}\gdef\affi@thefnmark{}\hbox{\@tempb}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
925 \@makefnmark\let\next\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
926 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
927 \mkt@and\hbox{\@tempb}\let\mkt@and\mkt@andmid
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
928 \let\next\mkt@iimakeeauthor
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
929 \fi\def\@tempb{#1}\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
930 \def\mkt@andmid{,\@makefnmark\ \gdef\affi@thefnmark{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
931
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
932 % Macros to specify author's affiliation easily.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
933 \newcounter{affi@footnote} \c@affi@footnote\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
934 \def\affilabel{\stepcounter{affi@footnote}\affi@deflabels\affi@affilabel}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
935 % 1.04(1a)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
936 \def\paffilabel{\affi@deflabels\affi@paffilabel}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
937 \def\affi@deflabels#1#2#3{{\def\protect{\noexpand\protect\noexpand}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
938 \let\affi@affilabel\relax \let\affi@paffilabel\relax \let\\\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
939 \xdef\affi@labels{\affi@labels#1{#2}{#3}}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
940 \def\affi@labels{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
941 \def\affi@affilabel{\begingroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
942 \def\@mpfn{affi@footnote}\def\thempfn{\theaffi@footnote}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
943 \def\affi@fnmark{\protect\@makefnmarkdagger}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
944 \affi@label}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
945 \def\affi@paffilabel#1#2{\begingroup\PF@adjustfnote
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
946 \def\affi@fnmark{\protect\@makefnmarkstar}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
947 \def\protect{\noexpand\protect\noexpand}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
948 \def\\{\noexpand\\Presently with \ignorespaces}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
949 \edef\@tempa{\ifDS@english Presently with \else 現在,\fi#2}% 1.04(1d)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
950 \affi@label{#1}{\@tempa}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
951 \def\affi@label#1#2{\stepcounter{\@mpfn}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
952 \@ifundefined{affi@r@#1}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
953 {\expandafter\xdef\csname affi@r@#1\endcsname{\thempfn}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
954 {\ipsj@warning{Affiliation label `#1' multiply defined}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
955 % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
956 \let\affi@footnotetext\relax\let\\\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
957 \def\protect{\noexpand\protect\noexpand}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
958 \xdef\@thanks{\@thanks
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
959 \affi@footnotetext{\thempfn}{\affi@fnmark}{#2}}\endgroup}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
960
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
961 \def\affiref#1{\@ifundefined{affi@r@#1}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
962 {\ipsj@warning{Affiliation reference `#1' undefined}% 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
963 \def\@tempa{?}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
964 {\def\@tempa{\csname affi@r@#1\endcsname}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
965 \ifx\affi@thefnmark\empty\xdef\affi@thefnmark{\@tempa}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
966 \xdef\affi@thefnmark{\affi@thefnmark,\hskip\z@\@tempa}\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
967 \def\affi@footnotetext#1#2#3{{\def\@thefnmark{#1}\def\@makefnmarkforfn{#2}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
968 \@footnotetext{#3}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
969
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
970 % 1.04(1b)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
971 \def\theaffi@footnote{\ifcase\c@affi@footnote\or
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
972 {\dagger}\or {\dagger}{\dagger}\or {\dagger}{\dagger}{\dagger}\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
973 % 1.04(1c)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
974 \def\theaffi@footnotemany{{\dagger}\number\c@affi@footnote}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
975 % 1.04(1b)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
976
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
977 \def\thanks#1{\begingroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
978 \def\@makefnmark{\smash{\hbox{\fn@fontvii$^{\@thefnmark}$}}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
979 \footnotemark
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
980 \let\affi@footnotetext\relax\let\\\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
981 \def\protect{\noexpand\protect\noexpand}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
982 \xdef\@thanks{\@thanks
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
983 \affi@footnotetext{\thempfn}{\protect\@makefnmarkstar}{#1}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
984 \endgroup}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
985
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
986 % \contact is necessary only for drafts.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
987 \long\def\contact#1{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
988
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
989
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
990 %%%%%% Page Header and Footer %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
991
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
992 \mark{{}{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
993
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
994 \newcounter{volpageoffset} % You must set this to appropriate value
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
995 \setcounter{volpageoffset}{1} % for each issue!
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
996
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
997 % 2.00(16)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
998 \let\latex@document\document
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
999 \def\document{\latex@document
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1000 \ifDS@private\else \global\c@page\c@volpageoffset \fi} % 2.07(8)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1001 \let\c@volpage\c@page % for backward compatibility
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1002 \def\thevolpage{\thepage} % for backward compatibility
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1003 % 2.00(16)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1004
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1005 \newcounter{volume}\expandafter\let\csname c@巻数\endcsname\c@volume
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1006 \newcounter{number}\expandafter\let\csname c@号数\endcsname\c@number
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1007 \let\c@month\c@number \expandafter\let\csname c@月数\endcsname\c@number
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1008 % 2.07(4)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1009 \newcounter{year}\expandafter\let\csname c@年数\endcsname\c@year
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1010
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1011 % 2.07(4)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1012 \def\@thevolno{Vol.~\arabic{巻数}\hskip\@mojihaba No.~%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1013 \ifipsj@trans SIG\ \ipsj@sig@numa(\ipsj@sig@code\ \ipsj@sig@numb)%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1014 \else \arabic{号数}\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1015 % 2.07(4)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1016 % 2.00(15)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1017 \def\@monthyear{\ifcase\value{号数}\or Jan.\or Feb.\or Mar.\or Apr.\or May\or
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1018 June\or July\or Aug.\or Sep.\or Oct.\or Nov.\or Dec.\else\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1019 \hskip.5\@mojihaba \setcounter{年数}{1959}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1020 \addtocounter{年数}{\value{巻数}}\arabic{年数}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1021 % 2.00(15)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1022
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1023 % 2.07(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1024 \newif\ifipsj@trans \ipsj@transfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1025 \def\transaction#1#2#3{\ipsj@transtrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1026 \def\ipsj@sig@code{#1}\def\ipsj@sig@numa{#2}\def\ipsj@sig@numb{#3}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1027 \expandafter\let\expandafter\ipsj@sig@title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1028 \csname ipsj@sig@#1@\ifDS@english e\else j\fi\endcsname
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1029 \ifx\ipsj@sig@title\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1030 \ipsj@warning{Transaction code #1 is unknown}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1031 \let\ipsj@oddhead@s\ipsj@oddhead@a
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1032 \settowidth\@tempdima{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1033 \ipsj@ohcheck\ipsj@ohcvolno\hdr@tipsj\ipsj@ohcvolno}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1034 \ifdim\@tempdima>\textwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1035 \let\ipsj@oddhead@s\ipsj@oddhead@b
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1036 \settowidth\@tempdima{\c@month3\relax % "Mar." is longest
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1037 \ipsj@ohcheck\ipsj@ohcvolno\hdr@tipsj\@monthyear}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1038 \ifdim\@tempdima>\textwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1039 \let\ipsj@oddhead@s\ipsj@oddhead@c
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1040 \fi \fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1041
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1042 \def\ipsj@sig@PRO@j{プログラミング}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1043 \def\ipsj@sig@PRO@e{Programming}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1044 \def\ipsj@sig@TOM@j{数理モデル化と応用}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1045 \def\ipsj@sig@TOM@e{Mathematical Modeling and Its Applications}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1046 \def\ipsj@sig@TOD@j{データベース}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1047 \def\ipsj@sig@TOD@e{Databases}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1048 %\def\ipsj@sig@HPS@j{ハイパフォーマンスコンピューティングシステム}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1049 %\def\ipsj@sig@HPS@e{High Performance Computing Systems}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1050 \def\ipsj@sig@CVIM@j{コンピュータビジョンとイメージメディア}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1051 \def\ipsj@sig@CVIM@e{Computer Vision and Image Media}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1052 \def\ipsj@sig@ACS@j{コンピューティングシステム} % 2.09(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1053 \def\ipsj@sig@ACS@e{Advanced Computing Systems} % 2.09(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1054 % 2.07(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1055
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1056 \def\copyrightnotice{\long\def\ipsj@cnotice}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1057
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1058 % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1059 \ifDS@techrep
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1060 \def\ps@headings{\let\@mkboth\markboth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1061 \def\@oddhead{\@checklines\hss}\let\@evenhead\@oddhead
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1062 \def\@oddfoot{}\def\@evenfoot{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1063 \let\ps@myheadings\ps@headings
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1064
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1065 \else\ifDS@private % 2.07(8)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1066 \def\ps@headings{\let\@mkboth\markboth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1067 \def\@oddhead{\@checklines\hfil\thepage\hskip12\@Q}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1068 \def\@evenhead{\@checklines\hskip12\@Q\thepage\hfil}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1069 \def\@oddfoot{}\def\@evenfoot{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1070 \def\ps@myheadings{\ps@headings
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1071 \def\@oddhead{\@checklines
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1072 \smash{\parbox[b]{.75\textwidth}{\@nameuse{ipsj@cnotice}}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1073 \hfil\thepage\hskip12\@Q}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1074 \let\@evenhead\@oddhead}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1075 % 2.07(8)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1076 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1077 % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1078 \def\ps@headings{\let\@mkboth\markboth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1079 \def\@oddfoot{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1080 \def\@evenfoot{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1081 \def\@evenhead{\fs@header \@checklines
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1082 \hskip12\@Q\rlap{\thepage}\hss % 2.07(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1083 \hdr@tipsj\hss\llap{\@monthyear}\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1084 \def\@oddhead{\fs@header \@checklines
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1085 \ipsj@oddhead@t\@titlestring\thepage} % 2.07(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1086 \def\sectionmark##1{}\def\subsectionmark##1{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1087
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1088 \def\ps@myheadings{\let\@mkboth\@gobbletwo
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1089 \def\@oddhead{\fs@header \@checklines
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1090 \ipsj@oddhead@s\hdr@tipsj\@monthyear} % 2.07(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1091 \def\@oddfoot{\fs@footer\hfil\thepage\hfil}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1092 \let\@evenhead\@oddhead
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1093 \let\@evenfoot\@oddfoot
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1094 \def\sectionmark##1{}\def\subsectionmark##1{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1095 \fi\fi % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1096 % 2.07(8)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1097 % 2.07(3)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1098 \def\ipsj@oddhead@a#1#2{\hskip12\@Q \rlap{\@thevolno}\hss#1\hss
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1099 \llap{#2}\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1100 \def\ipsj@oddhead@b#1#2{\hskip12\@Q \@thevolno\qquad#1\hss
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1101 \llap{#2}\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1102 \def\ipsj@oddhead@c#1#2{\hskip12\@Q \@thevolno\hss#1\hss#2\hskip12\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1103 \let\ipsj@oddhead@t\ipsj@oddhead@a
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1104 \let\ipsj@oddhead@s\ipsj@oddhead@a
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1105 % 2.07(3)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1106
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1107 % 2.02(2),2.07(4)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1108 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1109 \def\hdr@tipsj{\smash{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1110 \ifipsj@trans
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1111 IPSJ Transactions on \ipsj@sig@title
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1112 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1113 IPSJ Journal\fi}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1114 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1115 \def\hdr@tipsj{\smash{情報処理学会論文誌%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1116 \ifipsj@trans :\ipsj@sig@title\fi}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1117 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1118 % 2.02(2),2.07(4)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1119
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1120 % \checklines enables to draw a horizontal rule onto each baselines.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1121
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1122 \newif\if@checklines \@checklinesfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1123 \def\checklines{\@checklinestrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1124 \def\@checklines{\if@checklines \rlap{\smash{\vtop{\normalsize
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1125 \hbox{} \vskip\headsep \hrule width\textwidth\vskip-.4pt \vskip\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1126 \hrule\vskip-.4pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1127 \ifDS@techrep\@tempcnta50\else % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1128 \ifDS@english\@tempcnta53\else\@tempcnta45\fi\fi % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1129 \relax\@@checklines}}}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1130 \ifDS@english\@tempcnta-7\else\@tempcnta\z@\fi\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1131 % 1.05(2)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1132 \@tempswafalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1133 \ifDS@printer \@tempswatrue \fi \ifDS@techrep \@tempswatrue \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1134 \if@tempswa \unitlength\@Q \begin{picture}(0,0)(0,\@tempcnta)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1135 \put(-61,63){\begin{picture}(0,0)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1136 \put(-10,0){\line(-1,0){30}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1137 \put(0,10){\line(0,1){30}}\end{picture}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1138 \put(667,63){\begin{picture}(0,0)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1139 \put(10,0){\line(1,0){30}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1140 \put(0,10){\line(0,1){30}}\end{picture}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1141 \put(-61,-965){\begin{picture}(0,0)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1142 \put(-10,0){\line(-1,0){30}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1143 \put(0,-10){\line(0,-1){30}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1144 \ifDS@techrep
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1145 \put(0,-10){\makebox(728,0)[t]{\thepage}}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1146 \end{picture}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1147 % 1.05(2)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1148 \put(667,-965){\begin{picture}(0,0)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1149 \put(10,0){\line(1,0){30}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1150 \put(0,-10){\line(0,-1){30}}\end{picture}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1151 \end{picture}\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1152 \def\@@checklines{\ifnum\@tempcnta>\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1153 \vskip\normalbaselineskip \hrule\vskip-.4pt \advance\@tempcnta\m@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1154 \let\next\@@checklines\else\let\next\relax\fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1155
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1156 \pagestyle{headings}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1157 \pagenumbering{arabic}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1158
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1159 \ifDS@english\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1160 \def\today{\the\year 年 \the\month 月 \the\day 日}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1161 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1162
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1163
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1164 %%%%%% Output Routine %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1165
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1166 % To balance the final page,
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1167 % following code is borrowed from nicetwocolumn style
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1168
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1169 % you can refrain from balancing by falsifying following switch!
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1170 %% Initial value of \if@lastpagebalancing is false. It may be turned true by
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1171 %% biography processing macros. (H.N.)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1172
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1173 \newif\if@lastpagebalancing \@lastpagebalancingfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1174 \newif\if@finalpageoutput \@finalpageoutputfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1175 % incorporate balanced output to \enddocument
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1176 \let\latex@enddocument\enddocument
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1177 \def\enddocument{\@finalpageoutputtrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1178 \if@lastpagebalancing
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1179 \global\let\@outputdblcol\opt@balanceoutputdblcol\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1180 \ifDS@preface
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1181 \global\let\@outputdblcol\opt@balanceoutputdblcol\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1182 \ifDS@abstract % 2.07(7)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1183 \hbox{}\newpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1184 \ifDS@english \rightline{(Presented \ra@presented)}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1185 \else \expandafter\ra@putpresented\ra@presented \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1186 \fi % 2.07(7)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1187 \latex@enddocument}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1188
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1189 \newbox\@leftcolumnfootnote \newbox\@rightcolumnfootnote
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1190 \newif\if@leftfootnoteexist \@leftfootnoteexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1191 \newif\if@rightfootnoteexist \@rightfootnoteexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1192 \newif\ifopt@floatexist \opt@floatexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1193
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1194 % 2.00(12) \color@{begin/end}group ignored
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1195 \def\enlargethispage{\ipsj@warning{\string\enlargepage is ignored}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1196 % 2.00(3,12)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1197 \def\@makecol{\vbadness10000 \lineskiplimit\normallineskiplimit % 1.05(1)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1198 \setbox\@outputbox\box\@cclv
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1199 \if@firstcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1200 \ifvoid\footins \global\@leftfootnoteexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1201 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1202 \global\@leftfootnoteexisttrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1203 \@tempdima\dp\footins
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1204 \global\setbox\@leftcolumnfootnote\vbox{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1205 \unvbox\footins\vskip-\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1206 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1207 \ifx\@botlist\@empty\else\global\opt@floatexisttrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1208 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1209 \ifvoid\footins \global\@rightfootnoteexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1210 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1211 \global\@rightfootnoteexisttrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1212 \@tempdima\dp\footins
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1213 \global\setbox\@rightcolumnfootnote\vbox{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1214 \unvbox\footins \vskip-\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1215 \ifx\@toplist\@empty\else\global\opt@floatexisttrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1216 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1217 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1218 \xdef\@freelist{\@freelist\@midlist}\gdef\@midlist{}\@combinefloats
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1219 \global\maxdepth\@maxdepth}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1220
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1221 % 2.01(1) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1222 \let\latex@vtryfc\@vtryfc
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1223 \def\@vtryfc{\if@firstcolumn \global\@leftfootnoteexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1224 \else \global\@rightfootnoteexistfalse \fi \latex@vtryfc}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1225 % 2.01(1) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1226
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1227 % 1.01(1,2) >>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1228 \let\latex@addtobot\@addtobot
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1229 \def\@addtobot{\latex@addtobot\global\maxdepth\@maxdepth}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1230 \let\latex@combinefloats\@combinefloats
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1231 \def\@combinefloats{\ifx\@botlist\@empty\else \dimen@\dp\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1232 \setbox\@outputbox\vbox{\unvbox\@outputbox \vskip-\dimen@}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1233 \latex@combinefloats}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1234 % 1.01(1,2) <<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1235
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1236 \newskip\opt@baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1237 \def\@outputdblcol{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1238 \if@firstcolumn \global\@firstcolumnfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1239 \global\setbox\@leftcolumn\box\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1240 \global\opt@baselineskip\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1241 \else \global\@firstcolumntrue \global\opt@floatexistfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1242 \global\bib@adjustheight-\maxdimen
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1243 \setbox\@leftcolumn\vbox to\@colht{\boxmaxdepth\@maxdepth % 1.01(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1244 \unvbox\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1245 \if@leftfootnoteexist\vfil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1246 \footnoterule\box\@leftcolumnfootnote\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1247 \setbox\@outputbox\vbox to\@colht{\boxmaxdepth\@maxdepth % 1.01(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1248 \unvbox\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1249 \if@rightfootnoteexist\vfil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1250 \footnoterule\box\@rightcolumnfootnote\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1251 \global\maxdepth\@maxdepth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1252 \if@finalpageoutput
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1253 \if@leftfootnoteexist\else\if@rightfootnoteexist\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1254 \setbox\@leftcolumn\vbox{\unvbox\@leftcolumn}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1255 \setbox\@outputbox\vbox{\unvbox\@outputbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1256 \ifdim\ht\@leftcolumn<\ht\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1257 \setbox\@leftcolumn\vbox to\ht\@outputbox{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1258 \unvbox\@leftcolumn}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1259 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1260 \setbox\@outputbox\vbox to\ht\@leftcolumn{
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1261 \unvbox\@outputbox}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1262 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1263 \fi\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1264 \setbox\@outputbox\vbox{\hbox to\textwidth{\hbox to\columnwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1265 {\box\@leftcolumn \hss}\hfil \vrule width\columnseprule\hfil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1266 \hbox to\columnwidth{\box\@outputbox \hss}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1267 \@combinedblfloats
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1268 \@outputpage \begingroup \@dblfloatplacement \@startdblcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1269 \@whilesw\if@fcolmade \fi{\@outputpage\@startdblcolumn}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1270 \endgroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1271 \fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1272
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1273 \let\opt@outputdblcol\@outputdblcol
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1274 \chardef\opt@boxa\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1275 \chardef\opt@boxb\@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1276 \chardef\opt@boxc\tw@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1277 \def\opt@magicpenalty{1234}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1278 \def\opt@balanceoutputdblcol{\let\next\opt@ibalanceoutputdblcol
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1279 \if@firstcolumn \let\next\opt@outputdblcol
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1280 \else \ifopt@floatexist \opt@warning \let\next\opt@outputdblcol
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1281 \else\ifx\@deferlist\@empty\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1282 \opt@warning \let\next\opt@outputdblcol\fi\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1283 \next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1284 \def\opt@ibalanceoutputdblcol{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1285 \setbox\@leftcolumn\vbox{\unvbox\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1286 \ifnum\lastpenalty=\opt@magicpenalty\relax\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1287 \@tempcnta10\relax\@whilenum\@tempcnta>0\do{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1288 \unskip\unskip\unkern\unpenalty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1289 \advance\@tempcnta\m@ne}\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1290 \advance\opt@baselineskip-\dp\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1291 \ifdim\dp\@leftcolumn=\z@ \ifdim\opt@baselineskip=\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1292 \@tempdima\ht\@leftcolumn \advance\@tempdima-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1293 \divide\@tempdima\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1294 \@tempcnta\@tempdima \@tempdima\@tempcnta\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1295 \advance\@tempdima\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1296 \advance\@tempdima-\ht\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1297 \advance\opt@baselineskip\@tempdima \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1298 \advance\opt@baselineskip-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1299 \setbox\@outputbox\vbox{\unvbox\@outputbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1300 \ifdim\ht\@outputbox=\topskip \ifdim\dp\@outputbox=\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1301 \setbox\opt@boxa\vbox{\unvcopy\@outputbox\unskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1302 \global\setbox\opt@boxb\lastbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1303 \global\dimen@\lastskip}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1304 \ifvoid\opt@boxb\else\ifdim\ht\opt@boxb=\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1305 \ifdim\dp\opt@boxb=\z@\ifdim\dimen@=\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1306 \@firstcolumntrue\fi\fi\fi\fi\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1307 \setbox\opt@boxa\copy\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1308 \setbox\@outputbox\vbox{\unvcopy\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1309 \if@firstcolumn\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1310 \vskip\opt@baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1311 \penalty\interlinepenalty\unvbox\@outputbox\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1312 \@tempdima\ht\@outputbox \advance\@tempdima\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1313 \divide\@tempdima\tw@ \advance\@tempdima100sp
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1314 \splittopskip\topskip \splitmaxdepth\@maxdepth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1315 \ifdim\bib@adjustheight<\@M pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1316 \opt@split\@outputbox\opt@boxb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1317 \ifdim\ht\opt@boxb<\bib@adjustheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1318 \opt@split\@leftcolumn\opt@boxc\bib@adjustheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1319 \opt@split\opt@boxc\opt@boxb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1320 \if@firstcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1321 \opt@adjust\opt@boxc{\unvbox\@leftcolumn}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1322 \else\opt@adjust\opt@boxc{\ifvoid\@leftcolumn\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1323 \unvbox\@leftcolumn\vskip\opt@baselineskip\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1324 \unvbox\opt@boxa}\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1325 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1326 \advance\bib@adjustheight-\@M pt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1327 \opt@split\opt@boxa\opt@boxc\bib@adjustheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1328 \setbox\@outputbox\vbox{\unvbox\@leftcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1329 \vskip\opt@baselineskip\unvbox\opt@boxc}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1330 \opt@split\@outputbox\opt@boxb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1331 \opt@adjust\@outputbox{\unvbox\opt@boxa}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1332 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1333 \if@leftfootnoteexist
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1334 \setbox\opt@boxb\vbox to\@colht{\box\opt@boxb\vfill
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1335 \footnoterule\box\@leftcolumnfootnote}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1336 \if@rightfootnoteexist
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1337 \setbox\@outputbox\vbox to\@colht{\box\@outputbox\vfill
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1338 \footnoterule\box\@rightcolumnfootnote}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1339 \ifdim\ht\@outputbox>\ht\opt@boxb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1340 \setbox\opt@boxb\vbox to\ht\@outputbox{\unvbox\opt@boxb}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1341 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1342 \setbox\@outputbox\vbox to\ht\opt@boxb{\unvbox\@outputbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1343 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1344 \setbox\@outputbox\vbox{\hbox to\textwidth{\hbox to\columnwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1345 {\box\opt@boxb \hss}\hfil \vrule width\columnseprule\hfil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1346 \hbox to\columnwidth{\box\@outputbox \hss}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1347 \global\@firstcolumntrue \@combinedblfloats
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1348 \@outputpage \begingroup \@dblfloatplacement \@startdblcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1349 \@whilesw\if@fcolmade \fi{\@outputpage\@startdblcolumn}\endgroup}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1350
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1351 \if@LaTeX@eN % 2.00(3)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1352 \def\opt@warning{\ClassWarning{ipsjpapers}{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1353 Single column floats still remain on biography\MessageBreak
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1354 processing.\MessageBreak
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1355 Do \string\verbbiography\space for manual balcing}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1356 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1357 \def\opt@warning{\@warning{Single column floats still remain on biography
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1358 processing.^^J\space\space\space\space\space
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1359 \space\space\space\space\space\space\space\space\space\space
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1360 Do \string\verbbiography\space for manual balancing}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1361 \fi % 2.00(3)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1362 \def\opt@split#1#2#3{\setbox#2\vsplit#1to#3\setbox#2\vbox{\unvbox#2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1363 \def\opt@adjust#1#2{\@tempdima\ht#1 \advance\@tempdima-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1364 \@tempdimb\@tempdima \divide\@tempdima\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1365 \@tempcnta\@tempdima \@tempdima\@tempcnta\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1366 \advance\@tempdima-\@tempdimb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1367 \ifdim\@tempdima<\z@ \advance\@tempdima\baselineskip \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1368 \advance\@tempdima\baselineskip \advance\@tempdima-\dp#1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1369 \advance\@tempdima-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1370 \setbox\@outputbox\vbox{\ifvoid#1\else\unvbox#1\vskip\@tempdima\fi#2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1371
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1372 \let\latex@outputpage\@outputpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1373 % \opt@finalgap: vertical space above the \hrule at the end of paper.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1374 % \opt@finallinewidth: width of the \hrule at the end of paper.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1375 \@tempdima2\baselineskip % This might be changed
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1376 \edef\opt@finalgap{\the\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1377 \def\opt@finallinewidth{220\@Q} % This might be changed
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1378 \ifDS@techrep \let\opt@finallinewidth\z@ \fi % 1.05(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1379
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1380 \def\@outputpage{\if@finalpageoutput
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1381 \setbox\@outputbox\vbox{\unvbox\@outputbox}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1382 \@tempdima\dp\@outputbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1383 \@tempdimb\ht\@outputbox \advance\@tempdimb\opt@finalgap\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1384 \ifdim\@tempdimb>\textheight\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1385 \setbox\@outputbox\vbox{\unvbox\@outputbox\vskip-\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1386 \nointerlineskip\vbox to\z@{\vskip\opt@finalgap
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1387 \hbox to\textwidth{\hss
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1388 \vrule height0.4pt width\opt@finallinewidth\hss}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1389 \vss}}\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1390 \ifASCII\if@LaTeX@e \@@topmargin\topmargin \fi\fi % 2.00(13)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1391 \latex@outputpage}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1392
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1393 %%%%%% Biography %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1394
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1395 % If you want to control the allocation of biographies manually, do
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1396 % \verbbiography and insert \adjust{<vertical materials>} just before
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1397 % \member (or its relatives). For example;
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1398 % \verbbiography
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1399 % \begin{biography}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1400 % \member{...} ...
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1401 % \adjust{\protect\newpage}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1402 % \member{...} ...
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1403 % \adjust{\protect\vspace{1.3cm}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1404 % \member{...} ...
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1405 % \end{biography}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1406 % will make page break just after the biography of the 1st author, and will
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1407 % insert a vertical space of 1.3cm just after that of the 2nd. It is
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1408 % strongly recommended to \protect any control sequence in the argument of
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1409 % \adjust.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1410
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1411 % \受付 and \採録 define the dates of receipt/acceptance. They are put at
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1412 % the end of manuscript (just before biographies) by ra@putrcvacc.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1413 \def\ra@nengo{平成} %% Change here when ...
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1414 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1415 \def\受付#1#2#3{\def\ra@received{\ra@date{#1}{#2}{#3}}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1416 \def\採録#1#2#3{\def\ra@accepted{\ra@date{#1}{#2}{#3}}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1417 \def\再受付#1#2#3{\def\ra@rereceived{\ra@date{#1}{#2}{#3}}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1418 % 2.07(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1419 \def\発表#1#2#3{\def\ra@presented{\ra@date{#1}{#2}{#3}}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1420 % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1421 \def\ra@received{??? ??, ????}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1422 \def\ra@accepted{??? ??, ????}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1423 \def\ra@presented{??? ??, ????} % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1424 \def\ipsj@TOD@editor{(Editor in Charge: {\it\ipsj@TOD@ename})} % 2.07(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1425 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1426 \def\受付#1#2#3{\def\ra@received{#1&#2&#3&}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1427 \def\採録#1#2#3{\def\ra@accepted{#1&#2&#3&}\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1428 \def\再受付#1#2#3{\def\ra@rereceived{#1&#2&#3&}\ignorespaces} % 2.07(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1429 \def\発表#1#2#3{\def\ra@presented{#1&#2&#3&}\ignorespaces} % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1430 \def\ra@received{?&?&?&}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1431 \def\ra@accepted{?&?&?&}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1432 \def\ra@presented{?&?&?&} % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1433 \def\ipsj@TOD@editor{(担当編集委員\ \ipsj@TOD@ename )} % 2.07(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1434 % 2.08(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1435 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1436 \let\received\受付
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1437 \let\accepted\採録
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1438 \let\rereceived\再受付 % 2.07(5)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1439 \let\presented\発表 % 2.07(7)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1440
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1441 \def\edInCharge#1{\def\ipsj@TOD@ename{#1}\ignorespaces} % 2.07(6)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1442
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1443 \def\ra@putrcvacc{\rightline{\vtop{\normalsize\tabskip\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1444 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1445 \llap{(Received \ra@received)}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1446 \ifx\ra@rereceived\undefined\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1447 \llap{(Revised \ra@rereceived)}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1448 \llap{(Accepted \ra@accepted)}\hbox{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1449 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1450 \halign{(\ra@nengo\hskip\jasciikanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1451 \hfil##\hfil\hskip\jasciikanjiskip 年\hskip\jasciikanjiskip&
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1452 \hfil##\hfil\hskip\jasciikanjiskip 月\hskip\jasciikanjiskip&
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1453 \hfil##\hfil\hskip\jasciikanjiskip 日&##\hfil\cr% 2.07(5)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1454 \ra@received 受付)\cr
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1455 \ifx\ra@rereceived\undefined\else \ra@rereceived 再受付)\cr\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1456 \ra@accepted 採録)\cr\multispan3\cr}\fi}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1457 % 2.07(5)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1458 \hskip\@mojihaba}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1459 \nobreak\vskip-2\baselineskip\prevdepth\z@\hbox{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1460 \ifipsj@recommendation\else % 2.04(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1461 \ifx\ipsj@TOD@ename\undefined\else % 2.07(6)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1462 \nobreak\vskip\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1463 \hbox{\ipsj@TOD@editor}\fi % 2.07(6)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1464 \vskip\baselineskip\penalty\opt@magicpenalty\fi}% 2.04(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1465 \def\ra@date#1#2#3{\ifcase#2\or
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1466 January\or February\or March\or April\or May\or June\or
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1467 July\or August\or September\or October\or November\or December\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1468 \space#3, #1}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1469 \def\ra@putpresented#1&#2&#3&{\rightline{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1470 (\ra@nengo\hskip\jasciikanjiskip % 2.07(7)>>
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1471 #1\hskip\jasciikanjiskip 年\hskip\jasciikanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1472 #2\hskip\jasciikanjiskip 月\hskip\jasciikanjiskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1473 #3\hskip\jasciikanjiskip 日発表)}} % 2.07(7)<<
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1474
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1475 \newbox\bio@picbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1476 % The following define the height and width of a picture for biography, and
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1477 % the indentation of the first 6 lines. They might be changed.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1478 \def\bio@picheight{100\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1479 \def\bio@picwidth{80\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1480
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1481 \newif\ifbio@showpicbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1482 \bio@showpicboxtrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1483 % Do \bio@showpicboxfalse if you don't want to put a frame box at the
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1484 % position for picture.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1485 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1486 \def\bio@lineheight{9\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1487 \def\bio@piclines{7}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1488 \def\bio@indent{91\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1489 \def\bio@hangafter{7}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1490 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1491 \def\bio@lineheight{8\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1492 \def\bio@piclines{6}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1493 \def\bio@indent{96\@Q}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1494 \def\bio@hangafter{5}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1495 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1496
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1497 % \verbbiography forces verbatim output of biography (i.e. not ballanced).
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1498 \newif\ifbio@verb \bio@verbfalse
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1499 \def\verbbiography{\global\bio@verbtrue}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1500 % The environment biography saves texts for biographies into the list of
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1501 % \inserts (for floats).
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1502 \def\biography{\ifipsj@recommendation\else\par\ra@putrcvacc\fi % 2.04(2)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1503 \def\member{\bio@member{(正会員)}}\def\nomember{\bio@member{}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1504 \def\stmember{\bio@member{(学生会員)}}\let\adjust\bio@adjust
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1505 \ifbio@showpicbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1506 \setbox\bio@picbox\hbox{\hbox to\z@{\vrule\hskip-0.4pt%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1507 \vtop to\bio@picheight{\vskip\z@\hrule width\bio@picwidth
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1508 \vfil\hrule}\hskip-0.4pt\vrule\hss}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1509 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1510 \setbox\bio@picbox\hbox{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1511 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1512 \@tempdima\bio@piclines\baselineskip \advance\@tempdima\bio@lineheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1513 \dp\bio@picbox\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1514 \let\bio@egroup\relax\let\+\ignorespaces\let\@elt\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1515 \def\bio@list{}\global\bio@th\z@}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1516
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1517 \def\bio@member#1#2{\bio@egroup\let\bio@egroup\bio@@egroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1518 \@next\@currbox\@freelist\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1519 {\@latexerr{Too many unprocessed floats and biographies}\@ehb}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1520 \def\@tempa{#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1521 \global\setbox\@currbox\hbox\bgroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1522 \raise\bio@lineheight\copy\bio@picbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1523 \vtop\bgroup
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1524 \let\par\\
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1525 \hangindent\bio@indent\hangafter-\bio@hangafter
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1526 \ifDS@english {\bf #2\ }%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1527 \else {\bf\bio@putauthor#2\+ \@nil}#1{\@@par}\fi\ignorespaces}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1528
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1529 % Author name format:
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1530 % S + G < 5 -> fill space between S/G (like SS__G)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1531 % otherwise -> 1 KC space between S/G (like SS_GG)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1532 \def\bio@putauthor#1 #2\@nil{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1533 \setbox\@tempboxa\hbox{\jintercharskip\z@#1#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1534 \setbox\mkt@boxa\hbox{\jintercharskip1cm#1#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1535 \ifdim\wd\@tempboxa=\wd\mkt@boxa #1 #2\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1536 \def\@tempa{#2}\ifx\@tempa\empty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1537 {\def\+{}\ipsj@warning{Author name #1 doesn't have a space}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1538 % 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1539 #1\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1540 \@tempdima\@mojihaba
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1541 \mkt@getnamewidth\mkt@sname{#1}\mkt@getnamewidth\mkt@gname{#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1542 \advance\mkt@sname\mkt@gname
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1543 \ifnum\mkt@sname<5\leavevmode\hbox to5\@mojihaba{#1\hfil#2}\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1544 #1#2\fi\fi\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1545 \def\bio@@egroup{\@@par\hbox{}\egroup\egroup\@tempdima\dp\@currbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1546 \ifdim\@tempdima>\textheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1547 \ipsj@warning{Biography of \@tempa\space is too long}% 2.00(3)
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1548 \bio@verbtrue \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1549 \advance\@tempdima\baselineskip\global\advance\bio@th\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1550 \global\dimen\@currbox\@tempdima \global\count\@currbox\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1551 {\let\protect\bio@protect\xdef\bio@list{\bio@list\@elt\@currbox}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1552 \def\bio@adjust#1{\bio@egroup\let\bio@egroup\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1553 \ifbio@verb {\let\protect\bio@protect\xdef\bio@list{\bio@list#1}\fi}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1554 \def\bio@protect{\noexpand\protect\noexpand}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1555
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1556 \def\endbiography{\bio@egroup \@tempswatrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1557 \ifx\@botlist\@empty\ifx\@deferlist\@empty \@tempswafalse \fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1558 \ifbio@verb\else\if@tempswa \bio@verbtrue \opt@warning\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1559 \ifbio@verb{\let\@elt\bio@putelt \let\protect\relax \bio@list}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1560 \else\bio@putbio\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1561
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1562 \newdimen\bio@colht \newdimen\bio@splitheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1563 \newdimen\bio@maxgap \newdimen\bio@lastgap
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1564 \newdimen\bio@th \newdimen\bio@lhA \newdimen\bio@hA \newdimen\bio@hB
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1565 \newdimen\bio@lh \newdimen\bio@rh
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1566 \newdimen\bio@tempdim
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1567 \newif\ifbio@awful
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1568 \newinsert\bio@pbox \count\bio@pbox\@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1569
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1570 \def\bio@putbio{\let\@elt\relax \let\bio@vskip\relax \allowbreak
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1571 \bio@colht\@colht \advance\bio@colht-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1572 \advance\bio@colht\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1573 \@tempdima\bio@colht \advance\@tempdima-\@colroom
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1574 \advance\@tempdima\pagetotal
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1575 \if@firstcolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1576 \ifdim\@tempdima>\bio@th
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1577 \global\@lastpagebalancingtrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1578 {\let\@elt\bio@putelt\bio@list}\vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1579 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1580 \ifdim\pagetotal=\z@\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1581 \dimen\bio@pbox\@tempdima \advance\bio@th\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1582 \edef\bio@list{\@elt\bio@pbox\bio@list}\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1583 \bio@splitheight\bio@colht \bio@splitpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1584 \bio@splitheight.5\bio@th
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1585 \let\bio@awfulput\bio@specialawfulput
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1586 \bio@trybalance\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1587 \else \advance\@tempdima\bio@th
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1588 \ifdim\@tempdima<\bio@colht
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1589 \global\@lastpagebalancingtrue
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1590 \ifdim\pagetotal=\z@ \global\opt@baselineskip2\baselineskip\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1591 {\let\@elt\bio@putelt\bio@list}\vskip-\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1592 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1593 \let\bio@awfulput\bio@normalawfulput
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1594 \bio@splitheight\z@ \advance\@tempdima-\bio@th
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1595 \advance\bio@colht-\@tempdima \bio@splitpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1596 {\let\@elt\bio@putelt\bio@list}\bio@nextpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1597 \bio@trybalance\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1598 \fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1599
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1600 \def\bio@trybalance{\bio@split
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1601 \let\bio@right\bio@rightA \let\bio@left\bio@leftA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1602 \def\bio@rightx{}\def\bio@leftx{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1603 \let\bio@hX\bio@hA \bio@balance
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1604 \let\bio@rightxA\bio@rightx \let\bio@leftxA\bio@leftx
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1605 \ifbio@awful\@tempcnta\tw@\else\@tempcnta\z@\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1606 \let\bio@right\bio@rightB \let\bio@left\bio@leftB
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1607 \def\bio@rightx{}\def\bio@leftx{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1608 \let\bio@hX\bio@hB \bio@balance
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1609 \let\bio@rightxB\bio@rightx \let\bio@leftxB\bio@leftx
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1610 \ifbio@awful\advance\@tempcnta\@ne\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1611 \ifcase\@tempcnta
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1612 \ifdim\bio@hA<\bio@hB \bio@balanceput\bio@leftxA\bio@rightxA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1613 \else \bio@balanceput\bio@leftxB\bio@rightxB\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1614 \or \bio@balanceput\bio@leftxA\bio@rightxA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1615 \or \bio@balanceput\bio@leftxB\bio@rightxB
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1616 \else \bio@awfulput\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1617 \ifx\bio@deferred\empty\vskip-\baselineskip\let\next\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1618 \else\bio@nextpage\let\next\bio@trybalance\fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1619
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1620 \def\bio@split{\def\bio@leftA{}\def\bio@leftB{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1621 \def\bio@rightA{}\def\bio@rightB{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1622 \bio@lhA\z@\@tempdimb\z@ \bio@isplit}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1623 \def\bio@isplit{\ifx\bio@list\empty\let\next\relax\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1624 \bio@car\@tempdima\@currbox\bio@list
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1625 \bio@lhA\@tempdimb\advance\@tempdimb\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1626 \edef\bio@leftB{\bio@leftB\@elt\@currbox}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1627 \ifdim\@tempdimb>\bio@splitheight
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1628 \edef\bio@rightA{\@elt\@currbox\bio@list}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1629 \let\bio@rightB\bio@list \let\next\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1630 \else\edef\bio@leftA{\bio@leftA\@elt\@currbox}\let\next\bio@isplit
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1631 \fi\fi\next}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1632
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1633 \def\bio@balanceput#1#2{{\let\@elt\bio@putelt\let\bio@vskip\bio@xvskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1634 #1\bio@newpage#2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1635 \def\bio@normalawfulput{{\let\bio@vskip\@gobble \@tempcnta\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1636 \@tempdima\z@ \bio@addheight\@tempdima\bio@leftxB
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1637 \ifdim\@tempdima<\bio@colht
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1638 \@tempdima\z@ \bio@addheight\@tempdima\bio@rightxB
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1639 \ifdim\@tempdima<\bio@colht \@tempcnta\@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1640 \let\@elt\bio@putelt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1641 \bio@leftxB\bio@newpage\bio@rightxB\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1642 \ifnum\@tempcnta=\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1643 \@tempdima\z@ \bio@addheight\@tempdima\bio@leftxA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1644 \ifdim\@tempdima<\bio@colht
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1645 \@tempdima\z@\bio@addheight\@tempdima\bio@rightxA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1646 \ifdim\@tempdima<\bio@colht \@tempcnta\@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1647 \let\@elt\bio@putelt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1648 \bio@leftxA\bio@newpage\bio@rightxA\fi\fi\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1649 % The following may be redundant.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1650 \ifnum\@tempcnta=\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1651 \let\@elt\bio@putelt\bio@listsave\fi}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1652 \def\bio@specialawfulput{{\advance\bio@th-\dimen\bio@pbox
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1653 \ifdim\bio@th<\bio@colht\bio@newpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1654 \let\bio@newpage\relax\fi\bio@normalawfulput}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1655
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1656 \def\bio@putelt#1{\ifnum\count#1>\z@\else\box#1
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1657 \nobreak\vskip-2\baselineskip\prevdepth\z@\hbox{}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1658 \vskip\baselineskip\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1659 \def\bio@xvskip#1{\vskip#1\prevdepth\z@}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1660 \def\bio@newpage{\vskip-\baselineskip\newpage}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1661
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1662 \def\bio@nextpage{\bio@newpage \let\bio@list\bio@deferred
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1663 \bio@th\z@ \bio@addheight\bio@th\bio@list
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1664 \bio@colht\@colht \advance\bio@colht-\topskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1665 \advance\bio@colht\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1666 \bio@splitheight\bio@colht \bio@splitpage
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1667 \bio@splitheight.5\bio@th
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1668 \let\bio@awfulput\bio@normalawfulput}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1669 \def\bio@splitpage{\let\bio@listsave\bio@list \bio@split
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1670 \@tempdima\bio@th \advance\@tempdima-\bio@lhA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1671 \ifdim\@tempdima>\bio@colht
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1672 \let\bio@leftAsave\bio@leftA \bio@th\bio@lhA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1673 \let\bio@list\bio@rightA \bio@splitheight\bio@colht
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1674 \bio@split \edef\bio@list{\bio@leftAsave\bio@leftA}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1675 \advance\bio@th\bio@lhA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1676 \let\bio@deferred\bio@rightA
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1677 \else\def\bio@deferred{}\let\bio@list\bio@listsave\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1678
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1679 % \bio@tolerablegap: maximum tolerable gap between adjacent bio's.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1680 % \bio@tolerablestretch:maximum stretch of a column.
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1681
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1682 \@tempdima10\baselineskip % This might be changed
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1683 \edef\bio@tolerablegap{\the\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1684 \@tempdima15\baselineskip
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1685 \edef\bio@tolerablelastgap{\the\@tempdima}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1686 \def\bio@tolerablestretch{2} % This might be changed
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1687
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1688 \def\bio@balance{\let\@elt\relax \edef\bio@bstack{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1689 \@elt{{\bio@left}{\bio@right}{}{}{0pt}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1690 \bio@xbalance}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1691 \def\bio@xbalance{%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1692 \expandafter\bio@popstack\bio@bstack\@nil
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1693 \let\bio@nextA\bio@xbalance \@tempdima\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1694 \ifx\bio@left\empty \ifx\bio@right\empty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1695 \let\bio@nextA\bio@balanceend
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1696 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1697 \bio@addheight\@tempdima\bio@right
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1698 \edef\bio@leftx{\bio@leftx\bio@vskip{\the\@tempdima}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1699 \advance\bio@hX\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1700 \edef\bio@rightx{\bio@rightx\bio@right}\def\bio@right{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1701 \bio@pushstack \fi\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1702 \ifx\bio@right\empty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1703 \bio@addheight\@tempdima\bio@left
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1704 \edef\bio@rightx{\bio@rightx\bio@vskip{\the\@tempdima}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1705 \advance\bio@hX\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1706 \edef\bio@leftx{\bio@leftx\bio@left}\def\bio@left{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1707 \bio@pushstack \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1708 \bio@car\@tempdima\bio@leftbox\bio@left
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1709 \bio@car\@tempdimb\bio@rightbox\bio@right
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1710 \edef\bio@leftx{\bio@leftx\@elt\bio@leftbox}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1711 \edef\bio@rightx{\bio@rightx\@elt\bio@rightbox}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1712 \ifdim\@tempdima>\@tempdimb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1713 \advance\bio@hX\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1714 \let\bio@da\@tempdima\let\bio@db\@tempdimb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1715 \bio@ibalance\bio@left\bio@right\bio@leftx\bio@rightx
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1716 \else \advance\bio@hX\@tempdimb
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1717 \let\bio@da\@tempdimb\let\bio@db\@tempdima
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1718 \bio@ibalance\bio@right\bio@left\bio@rightx\bio@leftx\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1719 \fi\fi\bio@nextA}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1720 \def\bio@ibalance#1#2#3#4{\let\bio@nextB\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1721 \ifx#2\empty
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1722 \advance\bio@da-\bio@db
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1723 \edef#4{#4\bio@vskip{\the\bio@da}}\bio@pushstack\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1724 \bio@car\bio@tempdim\@currbox#2 \advance\bio@db\bio@tempdim
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1725 \ifdim\bio@da<\bio@db
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1726 \advance\bio@db-\bio@da
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1727 \let\@tempa#3\edef#3{#3\bio@vskip{\the\bio@db}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1728 \let\@tempb#4\edef#4{#4\@elt\@currbox}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1729 \advance\bio@hX\bio@db \bio@pushstack
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1730 \advance\bio@hX-\bio@db
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1731 \edef#2{\@elt\@currbox#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1732 \advance\bio@tempdim-\bio@db
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1733 \let#3\@tempa \edef#4{\@tempb\bio@vskip{\the\bio@tempdim}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1734 \bio@pushstack
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1735 \else \edef#4{#4\@elt\@currbox}\def\bio@nextB{\bio@ibalance#1#2#3#4}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1736 \fi\fi\bio@nextB}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1737 \def\bio@balanceend{\bio@awfulfalse \def\bio@bstack{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1738 \bio@maxgap\z@ \bio@lastgap\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1739 \bio@checkgap\bio@leftx \bio@checkgap\bio@rightx
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1740 \ifdim\bio@maxgap>\bio@tolerablegap\relax\bio@awfultrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1741 \ifdim\bio@lastgap>\bio@tolerablelastgap\relax\bio@awfultrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1742 \ifdim\bio@hX>\bio@tolerablestretch\bio@splitheight\bio@awfultrue\fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1743 \ifdim\bio@hX>\bio@colht\bio@awfultrue\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1744 \def\bio@checkgap#1{{\@tempdima\z@ \@tempdimb\z@ \bio@tempdim\z@
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1745 \let\@elt\bio@cgelt \let\bio@vskip\bio@cgvskip #1\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1746 \ifdim\@tempdima>\bio@maxgap \global\bio@maxgap\@tempdima \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1747 \ifdim\bio@tempdim>\bio@lastgap \global\bio@lastgap\bio@tempdim \fi}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1748 \def\bio@cgvskip#1{\advance\bio@tempdim#1\relax
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1749 \ifdim\bio@tempdim>\@tempdimb \@tempdimb\bio@tempdim\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1750 \def\bio@cgelt#1{\@tempdima\@tempdimb \bio@tempdim\z@}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1751 \def\bio@popstack\@elt#1#2\@nil{\edef\bio@bstack{#2}\bio@ipopstack#1}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1752 \def\bio@ipopstack#1#2#3#4#5{\def\bio@left{#1}\def\bio@right{#2}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1753 \def\bio@leftx{#3}\def\bio@rightx{#4}\bio@hX#5\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1754 \def\bio@pushstack{\def\bio@bstackx{}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1755 \expandafter\bio@ipushstack\bio@bstack\@elt\@nil}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1756 \def\bio@ipushstack\@elt#1{\def\@tempc{#1}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1757 \ifx\@tempc\@nnil \edef\bio@bstack{\bio@bstackx\bio@stackelt}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1758 \let\bio@nextC\relax \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1759 \bio@iipushstack#1\fi\bio@nextC}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1760 \def\bio@iipushstack#1#2#3#4#5{\ifdim#5>\bio@hX
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1761 \edef\bio@bstackx{\bio@bstackx\bio@stackelt
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1762 \@elt{{#1}{#2}{#3}{#4}{#5}}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1763 \let\bio@nextC\bio@pushstackend\else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1764 \edef\bio@bstackx{\bio@bstackx
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1765 \@elt{{#1}{#2}{#3}{#4}{#5}}}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1766 \let\bio@nextC\bio@ipushstack\fi}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1767 \def\bio@pushstackend#1\@elt\@nil{\edef\bio@bstack{\bio@bstackx#1}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1768 \def\bio@stackelt{\@elt{{\bio@left}{\bio@right}{\bio@leftx}{\bio@rightx}%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1769 {\the\bio@hX}}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1770 \def\bio@addheight#1#2{\def\@elt##1{\advance#1\dimen##1}#2\let\@elt\relax}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1771 \def\bio@car#1#2#3{\expandafter\bio@icar#3\@nil#1#2#3}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1772 \def\bio@icar\@elt#1#2\@nil#3#4#5{#3=\dimen#1\relax\def#4{#1}\def#5{#2}}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1773
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1774
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1775 %%%%%% Miscellaneous %%%%%%
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1776
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1777 \flushbottom
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1778
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1779 \ifDS@english
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1780 \hbadness9999 \tolerance9999
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1781 \else
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1782 \hbadness5000 \tolerance5000
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1783 \pretolerance\m@ne
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1784 \fi
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1785
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1786 \input{ipsjcommon.sty}
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1787
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1788 \twocolumn
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1789
9fc7603e8e8b add nobu-prosym
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1790 \endinput