% Use with:
% \documentclass[twocolumn]{jarticle}
% \usepackage{ykgnct2e}
%
% or
%
% \documentclass{jarticle}
% \usepackage{multicol,ykgnct2e}
% \multicolsep=0pt
%
%-----------------------------------------------------
% \setgenkou{char}{line} : set char/line and line/page
%                          works only with ASCII-jLaTeX
\newskip\genkoubaseline

{\catcode`\p=12\catcode`\t=12\gdef\@@Eval#1pt{#1}}
\def\@Eval#1#2{\edef#2{\expandafter\@@Eval\the#1}}

\def\setgenkou#1#2{ % #1=char/line, #2=line/page
 \@normalsize
 \@tempcnta=#1\relax\advance\@tempcnta by -1
 \@tempdima=\textwidth
 \advance\@tempdima by -\columnsep
 \divide\@tempdima by 2
 \advance\@tempdima by -1zw
 \divide\@tempdima by \@tempcnta
 \advance\@tempdima by -1zw
 \kanjiskip=\@tempdima plus .05zw minus .05zw
 \xkanjiskip=\kanjiskip
 \mathsurround=\kanjiskip
 \parindent=1zw\advance\parindent by \kanjiskip
 \hfuzz=\parindent
 \advance\hfuzz by 1pt
%
 \@tempcntb=#2\relax\advance\@tempcntb by -1
 \@tempdimb=\textheight\advance\@tempdimb by -1zh
 \divide\@tempdimb by \@tempcntb
 \genkoubaseline=\@tempdimb%% plus 0.02zh minus 0.02zh
 \@Eval\genkoubaseline\gbline
 \let\@@setfontsize=\@setfontsize
 \def\@setfontsize##1##2##3{\@@setfontsize##1##2{\gbline}}
 \def\baselinestretch{1}
 \large\@normalsize
} 
%-------------------------------------------------------------

\oddsidemargin=25mm
\topmargin=25mm
\advance\oddsidemargin by -1in
\advance\topmargin by -1in
\topskip=0pt
\parsep=0pt
\partopsep 0pt
\parskip 0pt
\partopsep 0pt
\headheight 0pt
\headsep 0pt
\footskip 0pt 
\textwidth=160mm
\textheight=242mm
\columnsep=10mm

\setgenkou{22}{50}

\newskip\ykgncttitleheight
\ykgncttitleheight=2\genkoubaseline\advance\ykgncttitleheight by 1zh

\renewcommand{\maketitle}{\par
  \begingroup
  \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
  \endgroup
  \global\let\maketitle\relax
  \global\let\@author\@empty
  \global\let\@title\@empty
  \global\let\title\relax
  \global\let\author\relax
  \global\let\and\relax
  }

\def\@maketitle{%
  \vbox to \ykgncttitleheight{%
    \centering
    {\LARGE \@title \par}}
  \vbox to 2\genkoubaseline{%
    \centering
    {\large 
%      \begin{tabular}[t]{c}
        \@author
%      \end{tabular}
      \par}
    }
  }

\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@
    \begingroup
      #6{%
        \underline{\@hangfrom{\hskip #3\relax\@svsec}%
          \interlinepenalty \@M #8\@@par}}%
    \endgroup
    \csname #1mark\endcsname{#7}%
    \addcontentsline{toc}{#1}{%
      \ifnum #2>\c@secnumdepth \else
        \protect\numberline{\csname the#1\endcsname}%
      \fi
      #7}%
  \else
    \def\@svsechd{%
      #6{\hskip #3\relax
      \underline{\@svsec #8%
      \csname #1mark\endcsname{#7}}}%
      \addcontentsline{toc}{#1}{%
        \ifnum #2>\c@secnumdepth \else
          \protect\numberline{\csname the#1\endcsname}%
        \fi
        #7}}%
  \fi
  \@xsect{#5}}

\def\thesection {\arabic{section}.}
\def\section{\@startsection {section}{1}{\z@}{1sp}{-1zw plus -.2zw}{\bf}}

\def\thesubsection {\arabic{section}.\arabic{subsection}}
\def\subsection{\@startsection {subsection}{2}{\z@}{1sp}{-1zw plus -.2zw}{\bf}}

\def\@listi{\leftmargin\leftmargini
  \parsep \z@ \topsep \z@ \itemsep \z@}
\let\@listI\@listi
\@listi
\def\@listii{\leftmargin\leftmarginii
   \labelwidth\leftmarginii \advance\labelwidth-\labelsep
   \topsep  \z@
   \parsep  \z@
   \itemsep\parsep}

\def\@{\spacefactor3000\space}
\long\def\@makecaption#1#2{%
  \vskip\abovecaptionskip
  \iftdir\sbox\@tempboxa{#1\hskip1zw#2}%
    \else\sbox\@tempboxa{#1\@{ }#2}%
  \fi
  \ifdim \wd\@tempboxa >\hsize
    \iftdir #1\hskip1zw#2\relax\par
      \else #1\@{ }#2\relax\par\fi
  \else
    \global \@minipagefalse
    \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
  \fi
  \vskip\belowcaptionskip}
\def\fnum@figure{{\frenchspacing Fig.~\thefigure.}}
\def\fnum@table{{\frenchspacing Table~\thetable.}}

\pagestyle{empty}
