Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php on line 456
%%
%% This is file `kjarticle.cls',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% jsclasses.dtx (with options: `article')
%%
%% IMPORTANT NOTICE:
%%
%% For the copyright see the source file.
%%
%% Any modified versions of this file must be renamed
%% with new filenames distinct from kjarticle.cls.
%%
%% For distribution of the original source see the terms
%% for copying and modification in the file jsclasses.dtx.
%%
%% This generated file may be distributed as long as the
%% original source files, as listed above, are part of the
%% same distribution. (The sources need not necessarily be
%% in the same archive or directory.)
%% \CharacterTable
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%% Digits \0\1\2\3\4\5\6\7\8\9
%% Exclamation \! Double quote \" Hash (number) \#
%% Dollar \$ Percent \% Ampersand \&
%% Acute accent \' Left paren \( Right paren \)
%% Asterisk \* Plus \+ Comma \,
%% Minus \- Point \. Solidus \/
%% Colon \: Semicolon \; Less than \<
%% Equals \= Greater than \> Question mark \?
%% Commercial at \@ Left bracket \[ Backslash \\
%% Right bracket \] Circumflex \^ Underscore \_
%% Grave accent \` Left brace \{ Vertical bar \|
%% Right brace \} Tilde \~}
\NeedsTeXFormat{pLaTeX2e}
\ProvidesClass{onlisp_j}
[2004/06/01 nodakai]
\newif\if@restonecol
\newif\if@titlepage
\newif\if@enablejfam \@enablejfamtrue
\DeclareOption{a4paper}{%
\setlength\paperheight {297mm}%
\setlength\paperwidth {210mm}}
\DeclareOption{a5paper}{%
\setlength\paperheight {210mm}%
\setlength\paperwidth {148mm}}
\DeclareOption{a6paper}{%
\setlength\paperheight {148mm}%
\setlength\paperwidth {105mm}}
\DeclareOption{b4paper}{%
\setlength\paperheight {364mm}%
\setlength\paperwidth {257mm}}
\DeclareOption{b5paper}{%
\setlength\paperheight {257mm}%
\setlength\paperwidth {182mm}}
\DeclareOption{a4j}{%
\setlength\paperheight {297mm}%
\setlength\paperwidth {210mm}}
\DeclareOption{a5j}{%
\setlength\paperheight {210mm}%
\setlength\paperwidth {148mm}}
\DeclareOption{b4j}{%
\setlength\paperheight {364mm}%
\setlength\paperwidth {257mm}}
\DeclareOption{b5j}{%
\setlength\paperheight {257mm}%
\setlength\paperwidth {182mm}}
\DeclareOption{a4var}{%
\setlength\paperheight {283mm}%
\setlength\paperwidth {210mm}}
\DeclareOption{b5var}{%
\setlength\paperheight {230mm}%
\setlength\paperwidth {182mm}}
\DeclareOption{letterpaper}{%
\setlength\paperheight {11in}%
\setlength\paperwidth {8.5in}}
\DeclareOption{legalpaper}{%
\setlength\paperheight {14in}%
\setlength\paperwidth {8.5in}}
\DeclareOption{executivepaper}{%
\setlength\paperheight {10.5in}%
\setlength\paperwidth {7.25in}}
\newcommand{\@ptsize}{0}
\DeclareOption{9pt}{\renewcommand{\@ptsize}{-1}}
\DeclareOption{10pt}{\renewcommand{\@ptsize}{0}}
\DeclareOption{11pt}{\renewcommand{\@ptsize}{1}}
\DeclareOption{12pt}{\renewcommand{\@ptsize}{2}}
\DeclareOption{14pt}{\renewcommand{\@ptsize}{4}}
\DeclareOption{17pt}{\renewcommand{\@ptsize}{7}}
\DeclareOption{20pt}{\renewcommand{\@ptsize}{10}}
\DeclareOption{21pt}{\renewcommand{\@ptsize}{11}}
\DeclareOption{25pt}{\renewcommand{\@ptsize}{15}}
\DeclareOption{30pt}{\renewcommand{\@ptsize}{20}}
\DeclareOption{36pt}{\renewcommand{\@ptsize}{26}}
\DeclareOption{43pt}{\renewcommand{\@ptsize}{33}}
\DeclareOption{12Q}{\renewcommand{\@ptsize}{1200}}
\DeclareOption{14Q}{\renewcommand{\@ptsize}{1400}}
\DeclareOption{landscape}{%
\setlength\@tempdima {\paperheight}%
\setlength\paperheight {\paperwidth}%
\setlength\paperwidth {\@tempdima}}
\hour\time \divide\hour by 60\relax
\@tempcnta\hour \multiply\@tempcnta 60\relax
\minute\time \advance\minute-\@tempcnta
\DeclareOption{tombow}{%
\tombowtrue \tombowdatetrue
\setlength{\@tombowwidth}{.1\p@}%
\@bannertoken{%
\jobname\space:\space\number\year/\number\month/\number\day
(\number\hour:\number\minute)}
\maketombowbox}
\DeclareOption{tombo}{%
\tombowtrue \tombowdatefalse
\setlength{\@tombowwidth}{.1\p@}%
\maketombowbox}
\DeclareOption{mentuke}{%
\tombowtrue \tombowdatefalse
\setlength{\@tombowwidth}{\z@}%
\maketombowbox}
\DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
\DeclareOption{twoside}{\@twosidetrue \@mparswitchtrue}
\DeclareOption{vartwoside}{\@twosidetrue \@mparswitchfalse}
\DeclareOption{onecolumn}{\@twocolumnfalse}
\DeclareOption{twocolumn}{\@twocolumntrue}
\DeclareOption{titlepage}{\@titlepagetrue}
\DeclareOption{notitlepage}{\@titlepagefalse}
\def\eqnarray{%
\stepcounter{equation}%
\def\@currentlabel{\p@equation\theequation}%
\global\@eqnswtrue
\m@th
\global\@eqcnt\z@
\tabskip\@centering
\let\\\@eqncr
$$\everycr{}\halign to\displaywidth\bgroup
\hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
&\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
&\global\@eqcnt\tw@ $\displaystyle{##}$\hfil\tabskip\@centering
&\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
\tabskip\z@skip
\cr}
\DeclareOption{leqno}{\input{leqno.clo}}
\DeclareOption{fleqn}{\input{fleqn.clo}%
\def\eqnarray{%
\stepcounter{equation}%
\def\@currentlabel{\p@equation\theequation}%
\global\@eqnswtrue\m@th
\global\@eqcnt\z@
\tabskip\mathindent
\let\\=\@eqncr
\setlength\abovedisplayskip{\topsep}%
\ifvmode
\addtolength\abovedisplayskip{\partopsep}%
\fi
\addtolength\abovedisplayskip{\parskip}%
\setlength\belowdisplayskip{\abovedisplayskip}%
\setlength\belowdisplayshortskip{\abovedisplayskip}%
\setlength\abovedisplayshortskip{\abovedisplayskip}%
$$\everycr{}\halign to\linewidth% $$
\bgroup
\hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
&\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
&\global\@eqcnt\tw@
$\displaystyle{##}$\hfil \tabskip\@centering
&\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
\tabskip\z@skip\cr
}}
\DeclareOption{disablejfam}{\@enablejfamfalse}
\newif\ifdraft
\DeclareOption{draft}{\drafttrue \setlength\overfullrule{5pt}}
\DeclareOption{final}{\draftfalse \setlength\overfullrule{0pt}}
\newif\ifjisfont
\jisfonttrue
\DeclareOption{mingoth}{\jisfontfalse}
\newif\ifwinjis
\winjisfalse
\DeclareOption{winjis}{\winjistrue}
\newif\ifpapersize
\papersizefalse
\DeclareOption{papersize}{\papersizetrue}
\newif\if@english
\@englishfalse
\DeclareOption{english}{\@englishtrue}
\ExecuteOptions{a4paper,oneside,onecolumn,notitlepage,final}
\ProcessOptions
%% \RequirePackage{url}
\ifpapersize
\setlength{\@tempdima}{\paperwidth}
\setlength{\@tempdimb}{\paperheight}
\iftombow
\advance \@tempdima 2in
\advance \@tempdimb 2in
\fi
\AtBeginDvi{\special{papersize=\the\@tempdima,\the\@tempdimb}}
\fi
\def\n@baseline{16}
\ifnum\@ptsize=-1
\mag 913 % formerly 900
\setlength\paperwidth{1.09529\paperwidth}%
\setlength\paperheight{1.09529\paperheight}%
\def\n@baseline{15}%
\fi
\ifnum\@ptsize=1
\mag 1095 % formerly 1100
\setlength\paperwidth{0.913242\paperwidth}% formerly 0.90909
\setlength\paperheight{0.913242\paperheight}% 0.90909
\fi
\ifnum\@ptsize=2
\mag 1200
\setlength\paperwidth{0.833333\paperwidth}%
\setlength\paperheight{0.833333\paperheight}%
\fi
\ifnum\@ptsize=4
\mag 1440
\setlength\paperwidth{0.694444\paperwidth}%
\setlength\paperheight{0.694444\paperheight}%
\fi
\ifnum\@ptsize=7
\mag 1728
\setlength\paperwidth{0.578704\paperwidth}%
\setlength\paperheight{0.578704\paperheight}%
\fi
\ifnum\@ptsize=10
\mag 2000
\setlength\paperwidth{0.5\paperwidth}%
\setlength\paperheight{0.5\paperheight}%
\fi
\ifnum\@ptsize=11
\mag 2074
\setlength\paperwidth{0.48216\paperwidth}%
\setlength\paperheight{0.48216\paperheight}%
\fi
\ifnum\@ptsize=15
\mag 2488
\setlength\paperwidth{0.401929\paperwidth}%
\setlength\paperheight{0.401929\paperheight}%
\fi
\ifnum\@ptsize=20
\mag 2986
\setlength\paperwidth{0.334896\paperwidth}%
\setlength\paperheight{0.334896\paperheight}%
\fi
\ifnum\@ptsize=26
\mag 3583
\setlength\paperwidth{0.279096\paperwidth}%
\setlength\paperheight{0.279096\paperheight}%
\fi
\ifnum\@ptsize=33
\mag 4300
\setlength\paperwidth{0.232558\paperwidth}%
\setlength\paperheight{0.232558\paperheight}%
\fi
\ifnum\@ptsize=1200
\mag 923
\setlength\paperwidth{1.0834236\paperwidth}%
\setlength\paperheight{1.0834236\paperheight}%
\fi
\ifnum\@ptsize=1400
\mag 1077
\setlength\paperwidth{0.928505\paperwidth}%
\setlength\paperheight{0.928505\paperheight}%
\fi
\ifpapersize
\setlength{\@tempdima}{\paperwidth}
\setlength{\@tempdimb}{\paperheight}
\iftombow
\advance \@tempdima 2truein
\advance \@tempdimb 2truein
\fi
\AtBeginDvi{\special{pdf: pagesize width \the\@tempdima\space height \the\@tempdimb}}
\fi
\ifwinjis
\DeclareFontShape{JY1}{mc}{m}{n}{<-> s * [0.961] winjis}{}
\DeclareFontShape{JY1}{gt}{m}{n}{<-> s * [0.961] winjisg}{}
\DeclareFontShape{JT1}{mc}{m}{n}{<-> s * [0.961] winjis-v}{}
\DeclareFontShape{JT1}{gt}{m}{n}{<-> s * [0.961] winjisg-v}{}
\else
\ifjisfont
\DeclareFontShape{JY1}{mc}{m}{n}{<-> s * [0.961] jis}{}
\DeclareFontShape{JY1}{gt}{m}{n}{<-> s * [0.961] jisg}{}
\else
\DeclareFontShape{JY1}{mc}{m}{n}{<-> s * [0.961] min10}{}
\DeclareFontShape{JY1}{gt}{m}{n}{<-> s * [0.961] goth10}{}
\fi
\DeclareFontShape{JT1}{mc}{m}{n}{<-> s * [0.961] tmin10}{}
\DeclareFontShape{JT1}{gt}{m}{n}{<-> s * [0.961] tgoth10}{}
\fi
\DeclareFontShape{JY1}{mc}{m}{it}{<->ssub*mc/m/n}{}
\DeclareFontShape{JY1}{mc}{m}{sl}{<->ssub*mc/m/n}{}
\DeclareFontShape{JY1}{mc}{m}{sc}{<->ssub*mc/m/n}{}
\DeclareFontShape{JY1}{gt}{m}{it}{<->ssub*gt/m/n}{}
\DeclareFontShape{JY1}{gt}{m}{sl}{<->ssub*gt/m/n}{}
\DeclareFontShape{JY1}{mc}{bx}{it}{<->ssub*gt/m/n}{}
\DeclareFontShape{JY1}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
\DeclareFontShape{JT1}{mc}{m}{it}{<->ssub*mc/m/n}{}
\DeclareFontShape{JT1}{mc}{m}{sl}{<->ssub*mc/m/n}{}
\DeclareFontShape{JT1}{mc}{m}{sc}{<->ssub*mc/m/n}{}
\DeclareFontShape{JT1}{gt}{m}{it}{<->ssub*gt/m/n}{}
\DeclareFontShape{JT1}{gt}{m}{sl}{<->ssub*gt/m/n}{}
\DeclareFontShape{JT1}{mc}{bx}{it}{<->ssub*gt/m/n}{}
\DeclareFontShape{JT1}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
\DeclareRobustCommand\sffamily
{\not@math@alphabet\sffamily\mathsf
\romanfamily\sfdefault\kanjifamily\gtdefault\selectfont}
\DeclareRobustCommand\ttfamily
{\not@math@alphabet\ttfamily\mathtt
\romanfamily\ttdefault\kanjifamily\gtdefault\selectfont}
\def\textmc#1{\relax\ifmmode\hbox\fi{\mcfamily #1}}
\def\textgt#1{\relax\ifmmode\hbox\fi{\gtfamily #1}}
\if@enablejfam
\DeclareSymbolFont{mincho}{JY1}{mc}{m}{n}
\DeclareSymbolFontAlphabet{\mathmc}{mincho}
\SetSymbolFont{mincho}{bold}{JY1}{gt}{m}{n}
\DeclareMathAlphabet{\mathgt}{JY1}{gt}{m}{n}
\reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc}
\reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}
\jfam\symmincho
\fi
\prebreakpenalty\jis"2147=10000 % 5000 ’
\postbreakpenalty\jis"2148=10000 % 5000 “
\prebreakpenalty\jis"2149=10000 % 5000 ”
\inhibitxspcode`〒=2
\xspcode`+=3
\xspcode`\%=3
\def\@{\spacefactor3000\space}
\def\@setfontsize#1#2#3{%
\ifx\protect\@typeset@protect
\let\@currsize#1%
\fi
\fontsize{#2}{#3}\selectfont
\ifdim\parindent>\z@
\parindent=1zw
\fi
\kanjiskip=0zw plus .1zw minus .01zw
\ifdim\xkanjiskip>\z@
\xkanjiskip=0.25em plus 0.15em minus 0.06em
\fi}
\emergencystretch 3zw
\newif\ifnarrowbaselines
\if@english\narrowbaselinestrue\fi
\def\narrowbaselines{%
\narrowbaselinestrue
\skip0=\abovedisplayskip
\skip2=\abovedisplayshortskip
\skip4=\belowdisplayskip
\skip6=\belowdisplayshortskip
\@currsize\selectfont
\abovedisplayskip=\skip0
\abovedisplayshortskip=\skip2
\belowdisplayskip=\skip4
\belowdisplayshortskip=\skip6\relax}
\def\widebaselines{\narrowbaselinesfalse\@currsize\selectfont}
\renewcommand{\normalsize}{%
\ifnarrowbaselines
\@setfontsize\normalsize\@xpt\@xiipt
\else
\@setfontsize\normalsize\@xpt{\n@baseline}%
\fi
\abovedisplayskip 10\p@ \@plus3\p@ \@minus4\p@
\abovedisplayshortskip \z@ \@plus3\p@
\belowdisplayskip \abovedisplayskip
\belowdisplayshortskip \belowdisplayskip
\let\@listi\@listI}
\normalsize
\setbox0\hbox{\char\euc"A1A1}%
\setlength\Cht{\ht0}
\setlength\Cdp{\dp0}
\setlength\Cwd{\wd0}
\setlength\Cvs{\baselineskip}
\setlength\Chs{\wd0}
\newcommand{\small}{%
\ifnarrowbaselines
\@setfontsize\small\@ixpt{11}%
\else
\@setfontsize\small\@ixpt{13}%
\fi
\abovedisplayskip 9\p@ \@plus3\p@ \@minus4\p@
\abovedisplayshortskip \z@ \@plus3\p@
\belowdisplayskip \abovedisplayskip
\belowdisplayshortskip \belowdisplayskip
\def\@listi{\leftmargin\leftmargini
\topsep \z@
\parsep \z@
\itemsep \parsep}}
\newcommand{\footnotesize}{%
\ifnarrowbaselines
\@setfontsize\footnotesize\@viiipt{9.5}%
\else
\@setfontsize\footnotesize\@viiipt{11}%
\fi
\abovedisplayskip 6\p@ \@plus2\p@ \@minus3\p@
\abovedisplayshortskip \z@ \@plus2\p@
\belowdisplayskip \abovedisplayskip
\belowdisplayshortskip \belowdisplayskip
\def\@listi{\leftmargin\leftmargini
\topsep \z@
\parsep \z@
\itemsep \parsep}}
\newcommand{\scriptsize}{\@setfontsize\scriptsize\@viipt\@viiipt}
\newcommand{\tiny}{\@setfontsize\tiny\@vpt\@vipt}
\if@twocolumn
\newcommand{\large}{\@setfontsize\large\@xiipt{\n@baseline}}
\else
\newcommand{\large}{\@setfontsize\large\@xiipt{17}}
\fi
\newcommand{\Large}{\@setfontsize\Large\@xivpt{21}}
\newcommand{\LARGE}{\@setfontsize\LARGE\@xviipt{25}}
\newcommand{\huge}{\@setfontsize\huge\@xxpt{28}}
\newcommand{\Huge}{\@setfontsize\Huge\@xxvpt{33}}
\everydisplay=\expandafter{\the\everydisplay \narrowbaselines}
\newcommand{\headfont}{\gtfamily\sffamily}
\setlength\columnsep{2zw}
\setlength\columnseprule{0\p@}
\setlength\lineskip{1\p@}
\setlength\normallineskip{1\p@}
\setlength\lineskiplimit{1\p@}
\setlength\normallineskiplimit{1\p@}
\renewcommand{\baselinestretch}{}
\setlength\parskip{0\p@}
\setlength\parindent{1zw}
\@lowpenalty 51
\@medpenalty 151
\@highpenalty 301
\setlength\topskip{8\p@} % 元: 10\p@
\setlength\headheight{1.6\topskip} % 元: 2\topskip
\setlength\footskip{0.025\paperheight} % 元: 0.03367\paperheight
\ifdim\footskip<\baselineskip
\setlength\footskip{\baselineskip}
\fi
\setlength\headsep{.8\footskip} % 元: \footskip
\addtolength\headsep{-\topskip}
\setlength\maxdepth{.5\topskip}
\newdimen\fullwidth
\setlength\fullwidth{0.88\paperwidth} % 元: 0.76\paperwidth
\if@twocolumn \@tempdima=2zw \else \@tempdima=1zw \fi
\divide\fullwidth\@tempdima \multiply\fullwidth\@tempdima
\setlength\textwidth{\fullwidth}
\setlength{\textheight}{0.93\paperheight} % 元: 0.83\paperheight
\addtolength{\textheight}{-\topskip}
\addtolength{\textheight}{-\headsep}
\addtolength{\textheight}{-\footskip}
\addtolength{\textheight}{-\topskip}
\divide\textheight\baselineskip
\multiply\textheight\baselineskip
\addtolength{\textheight}{\topskip}
\addtolength{\textheight}{0.1\p@}
\setlength\marginparsep{\columnsep}
\setlength\marginparpush{\baselineskip}
\setlength{\oddsidemargin}{\paperwidth}
\addtolength{\oddsidemargin}{-\fullwidth}
\setlength{\oddsidemargin}{.5\oddsidemargin}
\iftombow
\addtolength{\oddsidemargin}{-1in}
\else
\addtolength{\oddsidemargin}{-1truein}
\fi
\setlength{\evensidemargin}{\oddsidemargin}
\if@mparswitch
\addtolength{\evensidemargin}{\fullwidth}
\addtolength{\evensidemargin}{-\textwidth}
\fi
\setlength\marginparwidth{\paperwidth}
\addtolength\marginparwidth{-\oddsidemargin}
\addtolength\marginparwidth{-1truein}
\addtolength\marginparwidth{-\textwidth}
\addtolength\marginparwidth{-1cm}
\addtolength\marginparwidth{-\marginparsep}
\@tempdima=1zw
\divide\marginparwidth\@tempdima
\multiply\marginparwidth\@tempdima
\setlength\topmargin{\paperheight}
\addtolength\topmargin{-\textheight}
\addtolength\topmargin{-\topskip}
\addtolength\topmargin{-\headsep}
\addtolength\topmargin{-\footskip}
\setlength\topmargin{0.5\topmargin}
\iftombow
\addtolength\topmargin{-1in}
\else
\addtolength\topmargin{-1truein}
\fi
{\footnotesize\global\setlength\footnotesep{\baselineskip}}
\setlength\footnotesep{0.7\footnotesep}
\setlength{\skip\footins}{16\p@ \@plus 5\p@ \@minus 2\p@}
\setcounter{topnumber}{9}
\renewcommand{\topfraction}{.85}
\setcounter{bottomnumber}{9}
\renewcommand{\bottomfraction}{.8}
\setcounter{totalnumber}{20}
\renewcommand{\textfraction}{.1}
\renewcommand{\floatpagefraction}{.8}
\setcounter{dbltopnumber}{9}
\renewcommand{\dbltopfraction}{.8}
\renewcommand{\dblfloatpagefraction}{.8}
\setlength\floatsep {12\p@ \@plus 2\p@ \@minus 2\p@}
\setlength\textfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@}
\setlength\intextsep {12\p@ \@plus 2\p@ \@minus 2\p@}
\setlength\dblfloatsep {12\p@ \@plus 2\p@ \@minus 2\p@}
\setlength\dbltextfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@}
\setlength\@fptop{0\p@ \@plus 1fil}
\setlength\@fpsep{8\p@ \@plus 2fil}
\setlength\@fpbot{0\p@ \@plus 1fil}
\setlength\@dblfptop{0\p@ \@plus 1fil}
\setlength\@dblfpsep{8\p@ \@plus 2fil}
\setlength\@dblfpbot{0\p@ \@plus 1fil}
\def\ps@plainfoot{%
\let\@mkboth\@gobbletwo
\let\@oddhead\@empty
\def\@oddfoot{\normalfont\hfil\thepage\hfil}%
\let\@evenhead\@empty
\let\@evenfoot\@oddfoot}
\def\ps@plainhead{%
\let\@mkboth\@gobbletwo
\let\@oddfoot\@empty
\let\@evenfoot\@empty
\def\@evenhead{%
\if@mparswitch \hss \fi
\hbox to \fullwidth{\textbf{\thepage}\hfil}%
\if@mparswitch\else \hss \fi}%
\def\@oddhead{%
\hbox to \fullwidth{\hfil\textbf{\thepage}}\hss}}
\let\ps@plain\ps@plainfoot
\if@twoside
\def\ps@headings{%
\let\@oddfoot\@empty
\let\@evenfoot\@empty
\def\@evenhead{%
\underline{%
\hbox to \textwidth{\textbf{\thepage}\hfil\leftmark}}}%
\def\@oddhead{%
\underline{%
\hbox to \textwidth{{\rightmark}\hfil\textbf{\thepage}}}}%
\let\@mkboth\markboth
\def\sectionmark##1{\markboth{%
\ifnum \c@secnumdepth >\z@ \thesection \hskip1zw\fi
##1}{}}%
\def\subsectionmark##1{\markright{%
\ifnum \c@secnumdepth >\@ne \thesubsection \hskip1zw\fi
##1}}%
}
\else % if not twoside
\def\ps@headings{%
\let\@oddfoot\@empty
\def\@oddhead{%
\underline{%
\hbox to \textwidth{{\rightmark}\hfil\textbf{\thepage}}}}%
\let\@mkboth\markboth
\def\sectionmark##1{\markright{%
\ifnum \c@secnumdepth >\z@ \thesection \hskip1zw\fi
##1}}}
\fi
\def\ps@myheadings{%
\let\@oddfoot\@empty\let\@evenfoot\@empty
\def\@evenhead{%
\if@mparswitch \hss \fi%
\hbox to \fullwidth{\thepage\hfil\leftmark}%
\if@mparswitch\else \hss \fi}%
\def\@oddhead{%
\hbox to \fullwidth{\rightmark\hfil\thepage}\hss}%
\let\@mkboth\@gobbletwo
\let\sectionmark\@gobble
\let\subsectionmark\@gobble
}
\def\plainifnotempty{%
\ifx \@oddhead \@empty
\ifx \@oddfoot \@empty
\else
\thispagestyle{plainfoot}%
\fi
\else
\thispagestyle{plainhead}%
\fi}
\if@titlepage
\newcommand{\maketitle}{%
\begin{titlepage}%
\let\footnotesize\small
\let\footnoterule\relax
\let\footnote\thanks
\null\vfil
\vskip 60\p@
\begin{center}%
{\LARGE \@title \par}%
\vskip 3em%
{\large
\lineskip .75em
\begin{tabular}[t]{c}%
\@author
\end{tabular}\par}%
\vskip 1.5em
{\large \@date \par}%
\end{center}\par
\@thanks\vfil\null
\end{titlepage}%
\setcounter{footnote}{0}%
\global\let\thanks\relax
\global\let\maketitle\relax
\global\let\@thanks\@empty
\global\let\@author\@empty
\global\let\@date\@empty
\global\let\@title\@empty
\global\let\title\relax
\global\let\author\relax
\global\let\date\relax
\global\let\and\relax
}%
\else
\newcommand{\maketitle}{\par
\begingroup
\renewcommand\thefootnote{\@fnsymbol\c@footnote}%
\def\@makefnmark{\rlap{\@textsuperscript{\normalfont\@thefnmark}}}%
\long\def\@makefntext##1{\advance\leftskip 3zw
\parindent 1zw\noindent
\llap{\@textsuperscript{\normalfont\@thefnmark}\hskip0.3zw}##1}%
\if@twocolumn
\ifnum \col@number=\@ne
\@maketitle
\else
\twocolumn[\@maketitle]%
\fi
\else
\newpage
\global\@topnum\z@ % Prevents figures from going at top of page.
\@maketitle
\fi
\plainifnotempty
\@thanks
\endgroup
\setcounter{footnote}{0}%
\global\let\thanks\relax
\global\let\maketitle\relax
\global\let\@thanks\@empty
\global\let\@author\@empty
\global\let\@date\@empty
\global\let\@title\@empty
\global\let\title\relax
\global\let\author\relax
\global\let\date\relax
\global\let\and\relax
}
\def\@maketitle{%
\newpage\null
% \vskip 2em % 元: コメントなし
\begin{center}%
\let\footnote\thanks
{\LARGE \@title \par}%
\vskip 1.5em
{\large
\lineskip .5em
\begin{tabular}[t]{c}%
\@author
\end{tabular}\par}%
\vskip 1em
{\large \@date}%
\end{center}%
\par\vskip 1.5em
\ifvoid\@abstractbox\else\centerline{\box\@abstractbox}\vskip1.5em\fi
}
\fi
\def\@startsection#1#2#3#4#5#6{%
\if@noskipsec \leavevmode \fi
\par
\@tempskipa #4\relax
\@afterindenttrue
\ifdim \@tempskipa <\z@
\@tempskipa -\@tempskipa \@afterindentfalse
\fi
\if@nobreak
\everypar{}%
\else
\addpenalty\@secpenalty
\ifdim \@tempskipa >\z@
\null
\vspace*{-\baselineskip}\vskip\@tempskipa
\fi
\fi
\noindent
\@ifstar
{\@ssect{#3}{#4}{#5}{#6}}%
{\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}
\def\@sect#1#2#3#4#5#6[#7]#8{%
\ifnum #2>\c@secnumdepth
\let\@svsec\@empty
\else
\refstepcounter{#1}%
\protected@edef\@svsec{\@seccntformat{#1}\relax}%
\fi
\@tempskipa #5\relax
\ifdim \@tempskipa<\z@
\def\@svsechd{%
#6{\hskip #3\relax
\@svsec #8}%
\csname #1mark\endcsname{#7}%
\addcontentsline{toc}{#1}{%
\ifnum #2>\c@secnumdepth \else
\protect\numberline{\csname the#1\endcsname}%
\fi
#7}}% 目次にフルネームを載せるなら #8
\else
\begingroup
\interlinepenalty \@M % 下から移動
#6{%
\@hangfrom{\hskip #3\relax\@svsec}%
#8\@@par}%
\endgroup
\csname #1mark\endcsname{#7}%
\addcontentsline{toc}{#1}{%
\ifnum #2>\c@secnumdepth \else
\protect\numberline{\csname the#1\endcsname}%
\fi
#7}% 目次にフルネームを載せるならここは #8
\fi
\@xsect{#5}}
\def\@xsect#1{%
\@tempskipa #1\relax
\ifdim \@tempskipa<\z@
\@nobreakfalse
\global\@noskipsectrue
\everypar{%
\if@noskipsec
\global\@noskipsecfalse
{\setbox\z@\lastbox}%
\clubpenalty\@M
\begingroup \@svsechd \endgroup
\unskip
\@tempskipa #1\relax
\hskip -\@tempskipa
\else
\clubpenalty \@clubpenalty
\everypar{\everyparhook}%
\fi\everyparhook}%
\else
\par \nobreak
\vskip \@tempskipa
\@afterheading
\fi
\par % 2000-12-18
\ignorespaces}
\def\@ssect#1#2#3#4#5{%
\@tempskipa #3\relax
\ifdim \@tempskipa<\z@
\def\@svsechd{#4{\hskip #1\relax #5}}%
\else
\begingroup
#4{%
\@hangfrom{\hskip #1}%
\interlinepenalty \@M #5\@@par}%
\endgroup
\fi
\@xsect{#3}}
\newcommand*\chaptermark[1]{}
\setcounter{secnumdepth}{3}
\newcounter{part}
\newcounter{section}
\newcounter{subsection}[section]
\newcounter{subsubsection}[subsection]
\newcounter{paragraph}[subsubsection]
\newcounter{subparagraph}[paragraph]
\renewcommand{\thepart}{\@Roman\c@part}
% \renewcommand{\thesection}{\@arabic\c@section}
\renewcommand{\thesection}{\presectionname\@arabic\c@section\postsectionname}
\renewcommand{\thesubsection}{\@arabic\c@section.\@arabic\c@subsection}
\renewcommand{\thesubsubsection}{%
\thesubsection.\@arabic\c@subsubsection}
\renewcommand{\theparagraph}{%
\thesubsubsection.\@arabic\c@paragraph}
\renewcommand{\thesubparagraph}{%
\theparagraph.\@arabic\c@subparagraph}
\newcommand\part{%
\if@noskipsec \leavevmode \fi
\par
\addvspace{4ex}%
\secdef\@part\@spart}
\def\@part[#1]#2{%
\ifnum \c@secnumdepth >\m@ne
\refstepcounter{part}%
\addcontentsline{toc}{part}{%
\prepartname\thepart\postpartname\hspace{1zw}#1}%
\else
\addcontentsline{toc}{part}{#1}%
\fi
\markboth{}{}%
{\parindent\z@
\raggedright
\interlinepenalty \@M
\normalfont
\ifnum \c@secnumdepth >\m@ne
\Large\headfont\prepartname\thepart\postpartname
\par\nobreak
\fi
\huge \headfont #2%
\markboth{}{}\par}%
\nobreak
\vskip 3ex
\@afterheading}
\def\@spart#1{{%
\parindent \z@ \raggedright
\interlinepenalty \@M
\normalfont
\huge \headfont #1\par}%
\nobreak
\vskip 3ex
\@afterheading}
\if@twocolumn
\newcommand{\section}{%
\@startsection{section}{1}{\z@}%
{0.6\Cvs}{0.4\Cvs}%
{\normalfont\large\headfont\raggedright}}
\else
\newcommand{\section}{\@startsection{section}{1}{\z@}%
{\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
{.5\Cvs \@plus.3\Cdp}% 後アキ
{\normalfont\Large\headfont\raggedright}}
\fi
\if@twocolumn
\newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
{\z@}{\z@}%
{\normalfont\normalsize\headfont}}
\else
\newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
{\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
{.5\Cvs \@plus.3\Cdp}% 後アキ
{\normalfont\large\headfont}}
\fi
\if@twocolumn
\newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
{\z@}{\z@}%
{\normalfont\normalsize\headfont}}
\else
\newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
{\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
{\z@}%
{\normalfont\normalsize\headfont}}
\fi
\if@twocolumn
\newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
{\z@}{-1zw}% 改行せず 1zw のアキ
{\normalfont\normalsize\headfont\paragraphchar}}
\else
\newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
{0.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
{-1zw}% 改行せず 1zw のアキ
{\normalfont\normalsize\headfont\paragraphchar}}
\fi
\newcommand{\subparagraph}{\@startsection{subparagraph}{5}{\z@}%
{\z@}{-1zw}%
{\normalfont\normalsize\headfont}}
\setlength\leftmargini{3zw}
\if@twocolumn
\setlength\leftmarginii {2zw} % 2.2em
\setlength\leftmarginiii{2zw} % 1.87em
\setlength\leftmarginiv {2zw} % 1.7em
\setlength\leftmarginv {1zw} % .5em
\setlength\leftmarginvi {1zw} % .5em
\else
\setlength\leftmarginii {2zw} % 2.2em
\setlength\leftmarginiii{2zw} % 1.87em
\setlength\leftmarginiv {2zw} % 1.7em
\setlength\leftmarginv {1zw} % 1em
\setlength\leftmarginvi {1zw} % 1em
\fi
\setlength \labelsep {0.5zw} % .5em
\setlength \labelwidth{\leftmargini}
\addtolength\labelwidth{-\labelsep}
\setlength\partopsep{\z@} % {2\p@ \@plus 1\p@ \@minus 1\p@}
\@beginparpenalty -\@lowpenalty
\@endparpenalty -\@lowpenalty
\@itempenalty -\@lowpenalty
\def\@listi{\leftmargin\leftmargini
\parsep \z@
\topsep 0.5\baselineskip \@plus 0.2\baselineskip \@minus 0.1\baselineskip
\itemsep \z@ \relax}
\let\@listI\@listi
\@listi
\def\@listii{\leftmargin\leftmarginii
\labelwidth\leftmarginii \advance\labelwidth-\labelsep
\topsep \z@
\parsep \z@
\itemsep\parsep}
\def\@listiii{\leftmargin\leftmarginiii
\labelwidth\leftmarginiii \advance\labelwidth-\labelsep
\topsep \z@
\parsep \z@
\itemsep\parsep}
\def\@listiv {\leftmargin\leftmarginiv
\labelwidth\leftmarginiv
\advance\labelwidth-\labelsep}
\def\@listv {\leftmargin\leftmarginv
\labelwidth\leftmarginv
\advance\labelwidth-\labelsep}
\def\@listvi {\leftmargin\leftmarginvi
\labelwidth\leftmarginvi
\advance\labelwidth-\labelsep}
\renewcommand{\theenumi}{\@arabic\c@enumi}
\renewcommand{\theenumii}{\@alph\c@enumii}
\renewcommand{\theenumiii}{\@roman\c@enumiii}
\renewcommand{\theenumiv}{\@Alph\c@enumiv}
\newcommand{\labelenumi}{\theenumi.}
\newcommand{\labelenumii}{\inhibitglue（\theenumii）\inhibitglue}
\newcommand{\labelenumiii}{\theenumiii.}
\newcommand{\labelenumiv}{\theenumiv.}
\renewcommand{\p@enumii}{\theenumi}
\renewcommand{\p@enumiii}{\theenumi\inhibitglue（\theenumii）}
\renewcommand{\p@enumiv}{\p@enumiii\theenumiii}
\newcommand\labelitemi{\textbullet}
\newcommand\labelitemii{\normalfont\bfseries \textendash}
\newcommand\labelitemiii{\textasteriskcentered}
\newcommand\labelitemiv{\textperiodcentered}
\newenvironment{description}{%
\list{}{%
\labelwidth=\leftmargin
\labelsep=1zw
\advance \labelwidth by -\labelsep
\let \makelabel=\descriptionlabel}}{\endlist}
\newcommand*\descriptionlabel[1]{\normalfont\headfont #1\hfil}
\newbox\@abstractbox
\if@titlepage
\newenvironment{abstract}{%
\titlepage
\null\vfil
\@beginparpenalty\@lowpenalty
\begin{center}%
\headfont \abstractname
\@endparpenalty\@M
\end{center}}%
{\par\vfil\null\endtitlepage}
\else
\newenvironment{abstract}{%
\if@twocolumn
\ifx\maketitle\relax
\section*{\abstractname}%
\else
\global\setbox\@abstractbox\hbox\bgroup
\begin{minipage}[b]{\textwidth}
\small\parindent1zw
\begin{center}%
{\headfont \abstractname\vspace{-.5em}\vspace{\z@}}%
\end{center}%
\list{}{%
\listparindent\parindent
\itemindent \listparindent
\rightmargin \leftmargin}%
\item\relax
\fi
\else
\small
\begin{center}%
{\headfont \abstractname\vspace{-.5em}\vspace{\z@}}%
\end{center}%
\list{}{%
\listparindent\parindent
\itemindent \listparindent
\rightmargin \leftmargin}%
\item\relax
\fi}{\if@twocolumn
\ifx\maketitle\relax
\else
\endlist\end{minipage}\egroup
\fi
\else
\endlist
\fi}
\fi
\newenvironment{verse}{%
\let \\=\@centercr
\list{}{%
\itemsep \z@
\itemindent -2zw % 元: -1.5em
\listparindent\itemindent
\rightmargin \z@
\advance\leftmargin 2zw}% 元: 1.5em
\item\relax}{\endlist}
\newenvironment{quotation}{%
\list{}{%
\listparindent\parindent
\itemindent\listparindent
\rightmargin \z@}%
\item\relax}{\endlist}
\newenvironment{quote}%
{\list{}{\rightmargin\z@}\item\relax}{\endlist}
\def\@begintheorem#1#2{\trivlist
\item[\hskip \labelsep{\bfseries #1\ #2}]}
\def\@opargbegintheorem#1#2#3{\trivlist
\item[\hskip \labelsep{\bfseries #1\ #2\ (#3)}]}
\newenvironment{titlepage}{%
\if@twocolumn
\@restonecoltrue\onecolumn
\else
\@restonecolfalse\newpage
\fi
\thispagestyle{empty}%
\setcounter{page}\@ne
}%
{\if@restonecol\twocolumn \else \newpage \fi
\if@twoside\else
\setcounter{page}\@ne
\fi}
\newcommand{\appendix}{\par
\setcounter{section}{0}%
\setcounter{subsection}{0}%
\gdef\presectionname{\appendixname}%
\gdef\postsectionname{}%
\gdef\thesection{\presectionname\@Alph\c@section\postsectionname}%
\gdef\thesubsection{\@Alph\c@section.\@arabic\c@subsection}}
\setlength\arraycolsep{5\p@}
\setlength\tabcolsep{6\p@}
\setlength\arrayrulewidth{.4\p@}
\setlength\doublerulesep{2\p@}
\setlength\tabbingsep{\labelsep}
\skip\@mpfootins = \skip\footins
\setlength\fboxsep{3\p@}
\setlength\fboxrule{.4\p@}
\renewcommand \theequation {\@arabic\c@equation}
\newcounter{figure}
\renewcommand \thefigure {\@arabic\c@figure}
\def\fps@figure{tbp}
\def\ftype@figure{1}
\def\ext@figure{lof}
\def\fnum@figure{\figurename\nobreak\thefigure}
\newenvironment{figure}%
{\@float{figure}}%
{\end@float}
\newenvironment{figure*}%
{\@dblfloat{figure}}%
{\end@dblfloat}
\newcounter{table}
\renewcommand\thetable{\@arabic\c@table}
\def\fps@table{tbp}
\def\ftype@table{2}
\def\ext@table{lot}
\def\fnum@table{\tablename\nobreak\thetable}
\newenvironment{table}%
{\@float{table}}%
{\end@float}
\newenvironment{table*}%
{\@dblfloat{table}}%
{\end@dblfloat}
\newlength\abovecaptionskip
\newlength\belowcaptionskip
\setlength\abovecaptionskip{5\p@} % 元: 10\p@
\setlength\belowcaptionskip{5\p@} % 元: 0\p@
\long\def\@makecaption#1#2{{\small
\advance\leftskip1cm
\advance\rightskip1cm
\vskip\abovecaptionskip
\sbox\@tempboxa{#1\hskip1zw\relax #2}%
\ifdim \wd\@tempboxa <\hsize \centering \fi
#1\hskip1zw\relax #2\par
\vskip\belowcaptionskip}}
\DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
\DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
\DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
\DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
\DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
\DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
\DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
\DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
\DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
\DeclareRobustCommand*{\cal}{\@fontswitch\relax\mathcal}
\DeclareRobustCommand*{\mit}{\@fontswitch\relax\mathnormal}
\newcommand\@pnumwidth{1.55em}
\newcommand\@tocrmarg{2.55em}
\newcommand\@dotsep{4.5}
\setcounter{tocdepth}{2}
\newcommand{\tableofcontents}{%
\section*{\contentsname
\@mkboth{\contentsname}{\contentsname}}%
\@starttoc{toc}%
}
\newcommand{\MYtableofcontents}{%
\twocolumn[\section*{\contentsname}\@mkboth{\contentsname}{\contentsname}]%
\@starttoc{toc}%
\onecolumn
}
\newcommand*{\l@part}[2]{%
\ifnum \c@tocdepth >-2\relax
\addpenalty\@secpenalty
\addvspace{2.25em \@plus\p@}%
\begingroup
\parindent \z@
\rightskip \@tocrmarg
\parfillskip -\rightskip
{\leavevmode
\large \headfont
\setlength\@lnumwidth{4zw}%
#1\hfil \hb@xt@\@pnumwidth{\hss #2}}\par
\nobreak
\endgroup
\fi}
\newcommand*{\l@section}[2]{%
\ifnum \c@tocdepth >\z@
\addpenalty{\@secpenalty}%
\addvspace{1.0em \@plus\p@}%
\begingroup
\parindent\z@
\rightskip\@tocrmarg
\parfillskip-\rightskip
\leavevmode\headfont
\setlength\@lnumwidth{4zw}% 元1.5em [2003-03-02]
\advance\leftskip\@lnumwidth \hskip-\leftskip
#1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
\endgroup
\fi}
\newcommand*{\l@subsection} {\@dottedtocline{2}{1zw}{3zw}}
\newcommand*{\l@subsubsection}{\@dottedtocline{3}{2zw}{3zw}}
\newcommand*{\l@paragraph} {\@dottedtocline{4}{3zw}{3zw}}
\newcommand*{\l@subparagraph} {\@dottedtocline{5}{4zw}{3zw}}
\newdimen\@lnumwidth
\def\numberline#1{\hb@xt@\@lnumwidth{#1\hfil}\hspace{0pt}}
\def\@dottedtocline#1#2#3#4#5{\ifnum #1>\c@tocdepth \else
\vskip \z@ \@plus.2\p@
{\leftskip #2\relax \rightskip \@tocrmarg \parfillskip -\rightskip
\parindent #2\relax\@afterindenttrue
\interlinepenalty\@M
\leavevmode
\@lnumwidth #3\relax
\advance\leftskip \@lnumwidth \null\nobreak\hskip -\leftskip
{#4}\nobreak
\leaders\hbox{$\m@th \mkern \@dotsep mu\hbox{.}\mkern \@dotsep
mu$}\hfill \nobreak\hb@xt@\@pnumwidth{%
\hfil\normalfont \normalcolor #5}\par}\fi}
\newcommand{\listoffigures}{%
\section*{\listfigurename
\@mkboth{\listfigurename}{\listfigurename}}%
\@starttoc{lof}%
}
\newcommand*{\l@figure}{\@dottedtocline{1}{1.5em}{2.3em}}
\newcommand{\listoftables}{%
\section*{\listtablename
\@mkboth{\listtablename}{\listtablename}}%
\@starttoc{lot}%
}
\let\l@table\l@figure
\newdimen\bibindent
\setlength\bibindent{2zw}
\newenvironment{thebibliography}[1]{%
\global\let\presectionname\relax
\global\let\postsectionname\relax
\section*{\refname\@mkboth{\refname}{\refname}}%
\list{\@biblabel{\@arabic\c@enumiv}}%
{\settowidth\labelwidth{\@biblabel{#1}}%
\leftmargin\labelwidth
\advance\leftmargin\labelsep
\@openbib@code
\usecounter{enumiv}%
\let\p@enumiv\@empty
\renewcommand\theenumiv{\@arabic\c@enumiv}}%
\sloppy
\clubpenalty4000
\@clubpenalty\clubpenalty
\widowpenalty4000%
\sfcode`\.\@m}
{\def\@noitemerr
{\@latex@warning{Empty `thebibliography' environment}}%
\endlist}
\newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em}
\let\@openbib@code\@empty
\newenvironment{theindex}{% 索引を3段組で出力する環境
\if@twocolumn
\onecolumn\@restonecolfalse
\else
\clearpage\@restonecoltrue
\fi
\columnseprule.4pt \columnsep 2zw
\ifx\multicols\@undefined
\def\presectionname{}\def\postsectionname{}%
\twocolumn[\section*{\indexname}]%
\else
\ifdim\textwidth<\fullwidth
\setlength{\evensidemargin}{\oddsidemargin}
\setlength{\textwidth}{\fullwidth}
\setlength{\linewidth}{\fullwidth}
\def\presectionname{}\def\postsectionname{}%
\begin{multicols}{3}[\section*{\indexname}]%
\else
\def\presectionname{}\def\postsectionname{}%
\begin{multicols}{2}[\section*{\indexname}]%
\fi
\fi
\@mkboth{\indexname}{\indexname}%
\plainifnotempty % \thispagestyle{plain}
\parindent\z@
\parskip\z@ \@plus .3\p@\relax
\let\item\@idxitem
\raggedright
\footnotesize\narrowbaselines
}{
\ifx\multicols\@undefined
\if@restonecol\onecolumn\fi
\else
\end{multicols}
\fi
\clearpage
}
\newcommand{\@idxitem}{\par\hangindent 4zw} % 元 40pt
\newcommand{\subitem}{\@idxitem \hspace*{2zw}} % 元 20pt
\newcommand{\subsubitem}{\@idxitem \hspace*{3zw}} % 元 30pt
\newcommand{\indexspace}{\par \vskip 10\p@ \@plus5\p@ \@minus3\p@\relax}
\newcommand\seename{\if@english see\else →\fi}
\newcommand\alsoname{\if@english see also\else →\fi}
\let\footnotes@ve=\footnote
\def\footnote{\inhibitglue\footnotes@ve}
\let\footnotemarks@ve=\footnotemark
\def\footnotemark{\inhibitglue\footnotemarks@ve}
\def\thefootnote{\ifnum\c@footnote>\z@\leavevmode\lower.5ex\hbox{*}\@arabic\c@footnote\fi}
\renewcommand{\footnoterule}{%
\kern-3\p@
\hrule width .4\columnwidth
\kern 2.6\p@}
\long\def\@footnotetext{%
\insert\footins\bgroup
\normalfont\footnotesize
\interlinepenalty\interfootnotelinepenalty
\splittopskip\footnotesep
\splitmaxdepth \dp\strutbox \floatingpenalty \@MM
\hsize\columnwidth \@parboxrestore
\protected@edef\@currentlabel{%
\csname p@footnote\endcsname\@thefnmark
}%
\color@begingroup
\@makefntext{%
\rule\z@\footnotesep\ignorespaces}%
\futurelet\next\fo@t}
\def\fo@t{\ifcat\bgroup\noexpand\next \let\next\f@@t
\else \let\next\f@t\fi \next}
\def\f@@t{\bgroup\aftergroup\@foot\let\next}
\def\f@t#1{#1\@foot}
\def\@foot{\@finalstrut\strutbox\color@endgroup\egroup}
\newcommand\@makefntext[1]{%
\advance\leftskip 3zw
\parindent 1zw
\noindent
\llap{\@makefnmark\hskip0.3zw}#1}
\def\@inhibitglue{%
\futurelet\@let@token\@@inhibitglue}
\def\@@inhibitglue{%
\ifx\@let@token「
\inhibitglue
\else
\ifx\@let@token（
\inhibitglue
\else
\ifx\@let@token『
\inhibitglue
\else
\ifx\@let@token［
\inhibitglue
\fi
\fi
\fi
\fi}
\let\everyparhook=\@inhibitglue
\AtBeginDocument{\everypar{\everyparhook}}
\def\@doendpe{%
\@endpetrue
\def\par{%
\@restorepar\everypar{\everyparhook}\par\@endpefalse}%
\everypar{{\setbox\z@\lastbox}\everypar{\everyparhook}\@endpefalse\everyparhook}}
\def\@item[#1]{%
\if@noparitem
\@donoparitem
\else
\if@inlabel
\indent \par
\fi
\ifhmode
\unskip\unskip \par
\fi
\if@newlist
\if@nobreak
\@nbitem
\else
\addpenalty\@beginparpenalty
\addvspace\@topsep
\addvspace{-\parskip}%
\fi
\else
\addpenalty\@itempenalty
\addvspace\itemsep
\fi
\global\@inlabeltrue
\fi
\everypar{%
\@minipagefalse
\global\@newlistfalse
\if@inlabel
\global\@inlabelfalse
{\setbox\z@\lastbox
\ifvoid\z@
\kern-\itemindent
\fi}%
\box\@labels
\penalty\z@
\fi
\if@nobreak
\@nobreakfalse
\clubpenalty \@M
\else
\clubpenalty \@clubpenalty
\everypar{\everyparhook}%
\fi\everyparhook}%
\if@noitemarg
\@noitemargfalse
\if@nmbrlist
\refstepcounter\@listctr
\fi
\fi
\sbox\@tempboxa{\makelabel{#1}}%
\global\setbox\@labels\hbox{%
\unhbox\@labels
\hskip \itemindent
\hskip -\labelwidth
\hskip -\labelsep
\ifdim \wd\@tempboxa >\labelwidth
\box\@tempboxa
\else
\hbox to\labelwidth {\unhbox\@tempboxa}%
\fi
\hskip \labelsep}%
\ignorespaces}
\def\@afterheading{%
\@nobreaktrue
\everypar{%
\if@nobreak
\@nobreakfalse
\clubpenalty \@M
\if@afterindent \else
{\setbox\z@\lastbox}%
\fi
\else
\clubpenalty \@clubpenalty
\everypar{\everyparhook}%
\fi\everyparhook}}
\def\@gnewline #1{%
\ifvmode
\@nolnerr
\else
\unskip \reserved@e {\reserved@f#1}\nobreak \hfil \break \null
\inhibitglue \ignorespaces
\fi}
\def\小#1{\hbox{$\m@th$%
\csname S@\f@size\endcsname
\fontsize\sf@size\z@
\math@fontsfalse\selectfont
#1}}
\def\上小#1{{\sbox\z@ T\vbox to\ht0{\小{#1}\vss}}}
\def\cmrTeX{%
\ifdim \fontdimen\@ne\font >\z@
T\kern-.25em\lower.5ex\hbox{E}\kern-.125emX\@
\else
T\kern-.1667em\lower.5ex\hbox{E}\kern-.125emX\@
\fi}
\def\cmrLaTeX{%
\ifdim \fontdimen\@ne\font >\z@
L\kern-.32em\上小{A}\kern-.22em\cmrTeX
\else
L\kern-.36em\上小{A}\kern-.15em\cmrTeX
\fi}
\def\sfTeX{T\kern-.1em\lower.4ex\hbox{E}\kern-.07emX\@}
\def\sfLaTeX{L\kern-.25em\上小{A}\kern-.08em\sfTeX}
\def\ptmTeX{%
\ifdim \fontdimen\@ne\font >\z@
T\kern-.12em\lower.37ex\hbox{E}\kern-.02emX\@
\else
T\kern-.07em\lower.37ex\hbox{E}\kern-.05emX\@
\fi}
\def\ptmLaTeX{%
\ifdim \fontdimen\@ne\font >\z@
L\kern-.2em\上小{A}\kern-.1em\ptmTeX
\else
L\kern-.3em\上小{A}\kern-.1em\ptmTeX
\fi}
\def\pncTeX{%
\ifdim \fontdimen\@ne\font >\z@
T\kern-.2em\lower.5ex\hbox{E}\kern-.08emX\@
\else
T\kern-.13em\lower.5ex\hbox{E}\kern-.13emX\@
\fi}
\def\pncLaTeX{%
\ifdim \fontdimen\@ne\font >\z@
L\kern-.3em\上小{A}\kern-.1em\pncTeX
\else
L\kern-.3em\上小{A}\kern-.1em\pncTeX
\fi}
\def\pplTeX{%
\ifdim \fontdimen\@ne\font >\z@
T\kern-.17em\lower.32ex\hbox{E}\kern-.15emX\@
\else
T\kern-.12em\lower.34ex\hbox{E}\kern-.1emX\@
\fi}
\def\pplLaTeX{%
\ifdim \fontdimen\@ne\font >\z@
L\kern-.27em\上小{A}\kern-.12em\pplTeX
\else
L\kern-.3em\上小{A}\kern-.15em\pplTeX
\fi}
\DeclareRobustCommand{\TeX}{%
\def\@tempa{cmr}%
\ifx\f@family\@tempa\cmrTeX
\else
\def\@tempa{ptm}%
\ifx\f@family\@tempa\ptmTeX
\else
\def\@tempa{txr}%
\ifx\f@family\@tempa\ptmTeX
\else
\def\@tempa{pnc}%
\ifx\f@family\@tempa\pncTeX
\else
\def\@tempa{ppl}%
\ifx\f@family\@tempa\pplTeX
\else\sfTeX
\fi
\fi
\fi
\fi
\fi}
\DeclareRobustCommand{\LaTeX}{%
\def\@tempa{cmr}%
\ifx\f@family\@tempa\cmrLaTeX
\else
\def\@tempa{ptm}%
\ifx\f@family\@tempa\ptmLaTeX
\else
\def\@tempa{txr}%
\ifx\f@family\@tempa\ptmLaTeX
\else
\def\@tempa{pnc}%
\ifx\f@family\@tempa\pncLaTeX
\else
\def\@tempa{ppl}%
\ifx\f@family\@tempa\pplLaTeX
\else\sfLaTeX
\fi
\fi
\fi
\fi
\fi}
\DeclareRobustCommand{\LaTeXe}{$\mbox{%
\if b\expandafter\@car\f@series\@nil\boldmath\fi
\LaTeX\kern.15em2\raisebox{-.37ex}{$\textstyle\varepsilon$}}$}
\def\pTeX{p\kern-.05em\TeX}
\def\pLaTeX{p\LaTeX}
\def\pLaTeXe{p\LaTeXe}
\def\AmSTeX{\protect\AmS-\protect\TeX{}}
\DeclareRobustCommand{\BibTeX}{B\kern-.05em\小{I\kern-.025em B}%
\ifx\f@family\cmr\kern-.08em\else\kern-.15em\fi\TeX}
\DeclareRobustCommand{\SliTeX}{%
S\kern-.06emL\kern-.18em\上小{I}\kern -.03em\TeX}
\let\ltx@ifnextchar\@ifnextchar
\def\ProvidesFile#1{%
\begingroup
\catcode`\ 10 %
\ifnum \endlinechar<256 %
\ifnum \endlinechar>\m@ne
\catcode\endlinechar 10 %
\fi
\fi
\@makeother\/%
\@makeother\&%
\ltx@ifnextchar[{\@providesfile{#1}}{\@providesfile{#1}[]}}
\newcommand{\prepartname}{\if@english Part~\else 第\fi}
\newcommand{\postpartname}{\if@english\else 部\fi}
\newcommand{\presectionname}{}% 第
\newcommand{\postsectionname}{}% 節
\newcommand{\paragraphchar}{■} % 元: 存在しなかったマクロ
\newcommand{\contentsname}{\if@english Contents\else 目次\fi}
\newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi}
\newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi}
\newcommand{\refname}{\if@english References\else 参考文献\fi}
\newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi}
\newcommand{\indexname}{\if@english Index\else 索引\fi}
\newcommand{\figurename}{\if@english Fig.~\else 図\fi}
\newcommand{\tablename}{\if@english Table.~\else 表\fi}
\newcommand{\appendixname}{\if@english Appendix~\else 付録\fi}
\newcommand{\abstractname}{\if@english Abstract\else 概要\fi}
\newif\if西暦 \西暦true
\def\西暦{\西暦true}
\def\和暦{\西暦false}
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\def\today{%
\if@english
\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year
\else
\if西暦
\number\year 年
\number\month 月
\number\day 日
\else
平成\number\heisei 年
\number\month 月
\number\day 日
\fi
\fi}
\hyphenation{ado-be post-script ghost-script}
\pagestyle{empty}
\pagenumbering{arabic}
\if@twocolumn
\twocolumn
\sloppy
\flushbottom
\else
\onecolumn
\raggedbottom
\fi
\newcommand{\wadash}{\kern0pt\rule[\iftdir 0zh\else .33zh\fi]{2zw}{.03zh}\kern0pt}
\newcommand{\Frac}[2]{\leavevmode\kern.1em
\raise.5ex\hbox{\the\scriptfont0 #1}\kern-.1em
/\kern-.15em\lower.25ex\hbox{\the\scriptfont0 #2}}
\newcommand{\celcius}{\ensuremath{{^\circ\text{C}}}}
\newcommand{\formal}[1]{$\langle$\kern0pt\textrm{#1}$\rangle$}
%\setlength{\topmargin}{-70truept}
\addtolength{\topmargin}{-25truept}
%\setlength{\headheight}{0truept}
%\setlength{\topskip}{0truept}
%\setlength{\headsep}{0truept}
\addtolength{\textheight}{35truept}
%\setlength{\textheight}{7.4truein}
%\addtolength{\textwidth}{60truept}
%\setlength{\textwidth}{10.6truein}
%\setlength{\marginparsep}{0truept}
%\setlength{\marginparwidth}{0truept}
%\setlength{\oddsidemargin}{-70truept}
%\addtolength{\oddsidemargin}{-30truept}
%\setlength{\evensidemargin}{-70truept}
\addtolength{\abovecaptionskip}{-3em}
\addtolength{\belowcaptionskip}{.5em}
%\addtolength{\voffset}{0truept}
%\addtolength{\hoffset}{0truept}
%\addtolength{\columnsep}{0truept}
\pagestyle{empty}
%{\catcode`\ =\active%
%\gdef\@vobeyspaces{\catcode`\ \active\let \@xobeysp}}
%\begingroup \catcode `|=0 \catcode `[= 1
%\catcode`]=2 \catcode `\{=12 \catcode `\}=12
%\catcode`\\=12 |gdef|@xverbatim#1\end{verbatim}[#1|end[verbatim]|vspace[-7pt]]
%|gdef|@sxverbatim#1\end{verbatim*}[#1|end[verbatim*]|vspace[-7pt]]
%|endgroup
%\def\@verbatim{\trivlist \item\vspace{-4pt}\relax
% \if@minipage\else\vskip\parskip\fi
% \leftskip\@totalleftmargin\rightskip\z@skip
% \parindent\z@\parfillskip\@flushglue\parskip\z@skip
% \par
% \@tempswafalse
% \def\par{\narrowbaselines%
% \if@tempswa
% \leavevmode \null \@@par\penalty\interlinepenalty
% \else
% \@tempswatrue
% \ifhmode\@@par\penalty\interlinepenalty\fi
% \fi}%
% \let\do\@makeother \dospecials
% \obeylines \verbatim@font \@noligs
% \hyphenchar\font\m@ne
% \everypar \expandafter{\the\everypar \unpenalty}%
%\def\verbatim{\@verbatim \frenchspacing\@vobeyspaces \@xverbatim}
%\def\endverbatim{\if@newlist \leavevmode\fi\endtrivlist}
%\def\verbatim@font{\normalfont\ttfamily}
%\@namedef{verbatim*}{\@verbatim\@sxverbatim}
%\expandafter\let\csname endverbatim*\endcsname =\endverbatim
%}
\newcommand{\note}[1]{\kern0pt\textsuperscript{\textdagger}\label{#1}}
\newcommand{\reffig}[1]{第\ref{#1}図}
\newcommand{\FrameWidth}{.9\textwidth}
\newenvironment{FramedVerb}%
{\VerbatimEnvironment\begin{Sbox}\begin{minipage}{\FrameWidth}\begin{center}\begin{BVerbatim}}%
{\end{BVerbatim}\end{center}\end{minipage}\end{Sbox}%
\setlength{\fboxsep}{8pt}%
\fbox{\vbox{\TheSbox\hbox{\strut}}}}
\endinput
% vim: set ft=tex:
%%
%% End of file `onlisp_j.cls'.