% Copyright 1994 NEC Corporation, Tokyo, Japan.
%
% Permission to use, copy, modify, distribute and sell this software
% and its documentation for any purpose is hereby granted without
% fee, provided that the above copyright notice appear in all copies
% and that both that copyright notice and this permission notice
% appear in supporting documentation, and that the name of NEC
% Corporation not be used in advertising or publicity pertaining to
% distribution of the software without specific, written prior
% permission.  NEC Corporation makes no representations about the
% suitability of this software for any purpose.  It is provided "as
% is" without express or implied warranty.
%
% NEC CORPORATION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
% INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN 
% NO EVENT SHALL NEC CORPORATION BE LIABLE FOR ANY SPECIAL, INDIRECT OR
% CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF 
% USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR 
% OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR 
% PERFORMANCE OF THIS SOFTWARE. 

% $Id: canna.sty,v 1.6 1994/03/24 12:33:23 kuma Exp $

% enumerate 環境の再定義
%
% LaTeX の enumerate 環境を以下の観点から定義し直す。
%
% (1) 番号を丸カッコで囲むようにする。
% (2) リストの本文で段落のはじめはインデントするようにする。
% (3) \enumerate というのは打ちにくいので \bango で入れられるようにす
%     る。同様に \itemize に対して \pochi を使えるようにする。また、
%     \item はちょっと目障りなので \x でもいいようにする。
%

\def\enumerate{\ifnum \@enumdepth >3 \@toodeep\else
      \advance\@enumdepth \@ne 
      \edef\@enumctr{enum\romannumeral\the\@enumdepth}\list
      {\csname label\@enumctr\endcsname}{\usecounter
        {\@enumctr}
	\listparindent\parindent \parsep\parskip \itemsep\z@
	\def\makelabel##1{\hss\llap{##1}}}\fi}

\def\itemize{\ifnum \@itemdepth >3 \@toodeep\else \advance\@itemdepth \@ne
\edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
\list{\csname\@itemitem\endcsname}{
\listparindent\parindent \parsep\parskip \itemsep\z@
\def\makelabel##1{\hss\llap{##1}}}\fi}

\let\bango =\enumerate
\let\pochi =\itemize
\let\x =\item

\def\labelenumi{(\theenumi)}
\def\labelenumii{(\theenumii)}
\def\labelenumiii{(\theenumiii)}
\def\labelenumiv{(\theenumiv)}


% インデントの大きさを一文字分にする。
%
%

\settowidth{\parindent}{あ}

% 文書のサイズをレターサイズではなく、A4 サイズに合わせる
%
%

\setlength{\oddsidemargin}{5mm}
\setlength{\textwidth}{153mm}
\setlength{\textheight}{230mm}
\setlength{\topmargin}{-5mm}

% 段落間のスペースを与える
%
%

\setlength{\parskip}{1ex plus 0.2ex}

 \gdef\IDX#1#2{{#1}\index{#2$$$#1$$$}}
% \gdef\IDXX#1#2{{\sf\dg #1}\index{#2$$$#1$$$}}
 \gdef\IDXAS#1#2{\index{#2$$$#1$$$}}
% \gdef\IDXC#1#2#3{{#1}\index{#3a#2$$$CIDX #1$$$}}
% \gdef\IDXCAS#1#2#3{\index{#3a#2$$$CIDX #1$$$}}

% HIDX など対応

\gdef\HIDX#1#2#3{\IDX{#1}{#2}}
\gdef\HIDXAS#1#2#3{\IDXAS{#1}{#2}}
\gdef\hptar#1{}
\gdef\hpref#1{}

% キーボードの説明がしやすいように
\def\CTRL{\fbox{CTRL}}
\def\SHIFT{\fbox{SHIFT}}
\def\TAB{\fbox{TAB}}
\def\BS{\fbox{BS}}
\def\DEL{\fbox{DEL}}
\def\ESC{\fbox{ESC}}
\def\XFER{\fbox{XFER}}
\def\NFER{\fbox{NFER}}
\def\SPACE{\fbox{SPACE}}
\def\INS{\fbox{INS}}
\def\HELP{\fbox{HELP}}
\def\RETURN{\fbox{RETURN}}

\newlength{\reversefboxsep}
\setlength{\reversefboxsep}{0.1em}
\setcounter{secnumdepth}{5}

\newenvironment{nquote}[1]%
{\list{}{\leftmargin=#1}\item[]}%
{\endlist}

%namelist environment (Nelson H. F. Beebe)
%form: \begin{namelist}{width}
\newcommand{\namelistlabel}[1]{\mbox{#1}\hfil}
\newenvironment{namelist}[1]{%
\begin{list}{}
  {\let\makelabel\namelistlabel
  \settowidth{\labelwidth}{#1}
  \setlength{\leftmargin}{1.1\labelwidth}}
}{%
\end{list}}

\hfuzz 5pt

%
%	ページ途中で改ページするとき、ページの下方に空白をとる
%
\raggedbottom

%
%	図表目次の番号と見出しの間隔を広くする
%
%\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}} % オリジナル(jbook.sty)
\def\l@figure{\@dottedtocline{1}{1.5em}{3.3em}}
\def\l@table{\@dottedtocline{1}{1.5em}{3.3em}}

%
% ASCII 版 TeX と NTT 版の違いの吸収
%
\newif\ifASCII
\ifx\gtfam\undefined
\ASCIIfalse
\else
\ASCIItrue
\fi

\ifASCII 
\def\dg{\gt}
\def\dm{\mc}
\fi
