%%% Package Version 2002 V5.0                       2002.10.31
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%  Format for 科研費調書 2002
%%%%%%%  File ID: kkhgrp.mac
%%%%%%%  Contact: kakenhi-macro@yukawa.kyoto-u.ac.jp
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 下で定義されたバージョン番号をdisplayに表示します。
% パッチを加えた時には、a ==> z の順でalphabetを最後に足して下さい。
\def\Version{2002 V5.0}
% 共通ソースファイル用、種目選択コマンドの設定
%
\newif\ifPlain\Plaintrue
\expandafter\ifx\csname @latexerr\endcsname\relax\Plaintrue\else\Plainfalse\fi
\newif\ifLaTeXe\LaTeXefalse
\expandafter\ifx\csname PackageError\endcsname\relax\LaTeXefalse
\else\LaTeXetrue\fi
%
\newif\if基盤ＡＢＣ\基盤ＡＢＣfalse
\newif\if基盤ＡＢＣor基盤ＡＢ海外\基盤ＡＢＣor基盤ＡＢ海外false
\newif\if基盤ＡＢＣor基盤Ｓ\基盤ＡＢＣor基盤Ｓfalse
\def\基盤ＡＢＣ一般{\基盤ＡＢＣtrue
  \基盤ＡＢＣor基盤ＡＢ海外true\基盤ＡＢＣor基盤Ｓtrue
  \調書種目名={基盤研究\hskip-0.5zw（Ａ\BKh ・\hskip-0.4zwＢ
   \BKh ・\hskip-0.4zwＣ）}
   \調書種目略名={基盤Ａ\BKh\SHIKAKU\hskip-0.4zwＢ\BKh
   \SHIKAKU\hskip-0.4zwＣ\BKh （一般）$\!\!$}
}
%
\newif\if若手ＡＢ\若手ＡＢfalse
\newif\if若手or萌芽or基盤Ｓ\若手or萌芽or基盤Ｓfalse
\def\若手ＡＢ{\若手ＡＢtrue\若手or萌芽or基盤Ｓtrue
  \調書種目名={若手研究（Ａ\BKh ・\hskip-0.4zwＢ）}%
  \調書種目略名={若手（Ａ\BKh ・\hskip-0.4zwＢ）}
}
%
\newif\if萌芽\萌芽false
\def\萌芽{\萌芽true\若手or萌芽or基盤Ｓtrue
    \調書種目名={萌芽研究}\調書種目略名={萌芽}
}
%
\newif\if特定\特定false
\newif\if特定or基盤Ｓ\特定or基盤Ｓfalse
\def\特定{\特定true\特定or基盤Ｓtrue
  \調書種目名={\vbox{\hbox to \hsize{\hfil\kinto{20mm}{特定領域研究}\hfil}\par
               \hbox to \hsize{\hfil\kinto{16mm}{領域略称名}\hfil}}}
  \調書種目略名={特定}
}
%
\newif\if特定計画\特定計画false
\def\特定計画{\特定計画true\特定true\特定or基盤Ｓtrue
  \調書種目略名={特定}
}
%
\newif\if企画\企画false
\def\基盤Ｃ企画{\企画true
  \調書種目名={基盤研究（Ｃ）}\調書種目略名={基盤Ｃ（企画調査）}
}
%
\newif\if基盤ＡＢ海外\基盤ＡＢ海外false
\def\基盤ＡＢ海外{\基盤ＡＢ海外true\基盤ＡＢＣor基盤ＡＢ海外true
  \調書種目名={基盤研究\hskip-0.5zw（Ａ\BKh ・\hskip-0.4zwＢ）}
  \調書種目略名={基盤Ａ\BKh\SHIKAKU\hskip-0.4zwＢ\BKh （海外）$\!\!$}
}
%
\newif\if基盤Ｓ\基盤Ｓfalse
\def\基盤Ｓ{\基盤Ｓtrue\基盤ＡＢＣor基盤Ｓtrue\特定or基盤Ｓtrue
  \若手or萌芽or基盤Ｓtrue
  \調書種目名={基盤研究（Ｓ）}
  \調書種目略名={基盤Ｓ}
}
%
\newif\if基盤Ｓ研究者調書\基盤Ｓ研究者調書false
\def\基盤Ｓ研究者調書{\基盤Ｓ研究者調書true
  \調書種目名={基盤研究（Ｓ）}
  \調書種目略名={基盤Ｓ}
}
%
\newif\if予算Ａ\予算Ａfalse \def\予算Ａ{\予算Ａtrue}
\newif\if予算Ｂ\予算Ｂfalse \def\予算Ｂ{\予算Ｂtrue}
\newif\if予算Ｃ\予算Ｃfalse \def\予算Ｃ{\予算Ｃtrue}
%
\newif\if重複予算Ｃ\重複予算Ｃfalse \def\重複予算Ｃ{\重複予算Ｃtrue}
\newif\if重複予算Ａ\重複予算Ａfalse \def\重複予算Ａ{\重複予算Ａtrue}
\newif\if重複予算Ｂ\重複予算Ｂfalse \def\重複予算Ｂ{\重複予算Ｂtrue}
%
\newtoks\調書種目名
\newtoks\調書種目略名
%
\def\InputMacro#1{\ifPlain\input #1.mac\relax
  \else\documentstyle[#1]{lkkh}
    \ifLaTeXe\input lkkh_2e.sty\fi
  \fi}
%
\def\msg#1{\message{★科研費マクロ \Version : #1★}}
%
% 読み込みマクロファイルの設定
%
\def\SetForm{%
 \def\QUIT{\relax}
 \if特定
    \msg{特定\if特定計画 計画\fi} \InputMacro{kkhform}
 \else\if基盤ＡＢＣ
    \msg{基盤ＡＢＣ一般}          \InputMacro{kkhform}
 \else\if企画
    \msg{基盤Ｃ企画}              \InputMacro{kkhform}
 \else\if萌芽
    \msg{萌芽}                    \InputMacro{kkhform}
 \else\if若手ＡＢ
    \msg{若手ＡＢ}                \InputMacro{kkhform}
 \else\if基盤ＡＢ海外
    \msg{基盤ＡＢ海外}            \InputMacro{kkhform}
 \else\if基盤Ｓ
    \msg{基盤Ｓ}                  \InputMacro{kkhform}
 \else\if基盤Ｓ研究者調書
    \msg{基盤Ｓ研究者調書}        \InputMacro{kkhform}
 \else
    \msg{種目が選ばれていません！}\InputMacro{kkhform}
    \def\QUIT{\msg{種目が選ばれていません！}\ifPlain\end\else\enddocument\fi}
\fi\fi\fi\fi\fi\fi\fi\fi
}
%
% ページ出力コマンドの設定
%
\def\OutputPages{%
 \ifPlain\else\begin{document}\fi
 \QUIT
 \if基盤Ｓ研究者調書\else
 \CheckSpaces\fi
%
 \if特定
  \調書基盤１頁\調書特定２頁\調書特定３頁
  \調書基盤３頁\調書基盤５頁\調書基盤６頁\調書基盤７頁
  \調書基盤９頁\調書基盤９頁\調書基盤９頁
  \if特定計画\else\調書特定概要１頁\調書特定概要２頁\fi
  \研究組織表\研究組織表\研究組織表
 \else\if基盤ＡＢＣ
  \調書基盤１頁\調書基盤２頁\調書基盤３頁\調書基盤４頁
  \調書基盤５頁\調書基盤６頁\調書基盤７頁\調書基盤８頁
  \調書基盤９頁\調書基盤９頁
 \else\if企画
  \調書基盤Ｃ企画１頁\調書基盤Ｃ企画２頁
  \調書基盤Ｃ企画３頁\調書基盤Ｃ企画４頁
 \else\if萌芽
  \調書基盤１頁\調書基盤２頁\調書基盤３頁\調書基盤７頁
 \else\if若手ＡＢ
  \調書基盤１頁\調書基盤２頁\調書基盤３頁
  \調書基盤５頁\調書基盤７頁\調書若手６頁\調書若手７頁
 \else\if基盤ＡＢ海外
  \調書基盤１頁\調書基盤２頁\調書基盤３頁\調書基盤４頁
  \調書基盤５頁\調書基盤６頁\調書基盤７頁\調書基盤８頁
  \調書基盤９頁\調書基盤９頁
  \調書基盤１１頁\調書基盤１２頁
 \else\if基盤Ｓ
  \調書基盤１頁\調書特定２頁\調書特定３頁\調書基盤３頁
  \調書基盤４頁\調書基盤５頁\調書基盤６頁\調書基盤７頁\調書基盤８頁
 \else\if基盤Ｓ研究者調書
  \調書基盤Ｓ研究者調書１\調書基盤Ｓ研究者調書１\調書基盤Ｓ研究者調書１
  \調書基盤Ｓ研究者調書２
 \else\relax
 \fi\fi\fi\fi\fi\fi\fi\fi
 \if基盤Ｓ研究者調書\else\申請カード\fi
 \msg{}
 \if基盤Ｓ\message{研究者調書は別のソースファイルで研究者毎に処理して下さい。}\fi
\end{document}
}
% Do not touch the following comments. They are NOT comments at all !
%%debug_tool
%%\def\基盤ＡＢＣ一般{}        %%%ABC_K
%%\def\若手ＡＢ{}              %%%WAKAB
%%\def\萌芽{}                  %%%HOUGA
%%\def\特定{}                  %%%TOKUT
%%\def\基盤Ｃ企画{}            %%%CKIKA
%%\def\特定計画{}              %%%TOKUK
%%\def\基盤ＡＢ海外{}          %%%KAIGA
%%\def\基盤Ｓ{}                %%%KBANS
%%end_of_debug_tool
\openin1=benchcompile.fileset
\ifeof1\closein1
\else\closein1
\input benchcompile.fileset
\fi
% end of kkhgrp.mac