[Q] 特定領域に新規申請する場合の調書はありませんか

特定領域の新規申請の調書を作成するためのパッチです.
バージョンは,10/9 に公開された v2.0 用です.

ただし,個人的に対応したものなので従来の特定領域申請とスイッ
チなどの整合性がおかしなところもあるかもしれませんので,使用
される予定の方からの更なるパッチ,情報を期待します.
# 従来の「特定研究」における「調整班」や「計画」との関連がわ
  からない.細かい書き方もわからない.

以下のパッチで,src.tex,kkh.mac,kkhform.mac,kkhgrp.mac の 
4つのファイルが更新されます.
src.tex の「\特定計画」を有効にすれば調書が作成されます.

============================================================
*** src.tex.orig	Tue Oct  9 18:27:36 2001
--- src.tex	Tue Oct  9 18:57:28 2001
***************
*** 16,21 ****
--- 16,22 ----
  %\萌芽
  %\特定
  %\基盤C企画
+ %\特定計画
  %%%%%%%%%%%%%%%%%%%%%%
  %以下は現在のところサポートされていません。
  %\基盤S
***************
*** 238,243 ****
--- 239,245 ----
  %
  % 調整班の研究課題の場合は、以下のコマンドを有効にして下さい。
  %
+ %\総括班
  %\調整班
  %
  %%%%
*** kkh.mac.orig	Tue Oct  9 12:48:36 2001
--- kkh.mac	Tue Oct  9 18:49:45 2001
***************
*** 88,93 ****
--- 88,95 ----
  \newif\if空白チェック \空白チェックfalse
  \newif\if調整班 \調整班false
  \def\調整班{\調整班true}
+ \newif\if総括班 \総括班false
+ \def\総括班{\総括班true}
  \newif\if外国旅費出力変更 \外国旅費出力変更false
  \def\外国旅費出力変更{\外国旅費出力変更true}
  \newif\if若手枠\若手枠false\def\若手枠{\若手枠true}
*** kkhform.mac.orig	Tue Oct  9 12:48:40 2001
--- kkhform.mac	Tue Oct  9 18:57:38 2001
***************
*** 294,299 ****
--- 294,308 ----
  \Xf = 16.1cm
  \Xg = 12.85cm
  \Xh = 14.9cm
+ \if特定計画
+   \Xb = 1.7cm   % 本来は 1.9cm 位だが,\Xl と同じにした
+   \Xc = 4.7cm
+   \Xd = 8.7cm
+   \Xe = 12.85cm  % \Xk
+   \Xf = 14.7cm
+   \Xg = 13.4cm
+   \Xh = 14.7cm   % \Xf
+ \fi
  %
  \XI = 2.9cm
  \Xj = 9.75cm
***************
*** 348,353 ****
--- 357,366 ----
  \Yt = 23.3cm
  \YH = 24.35cm
  \Yw=\Ye
+ \if特定計画
+   \Ys = 23.6cm
+   \Yt = \YH
+ \fi
  \else\if基盤ABC%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  \voffset = 1.765cm
  \XW = 18.55cm
***************
*** 615,621 ****
        \Vrule{\Xac}{\Ycc}{\Ya}
      \fi
  %
!     \Hrule{\Xg}{\Yc}{\XW}
      \if基盤ABC
        \Hrule{\Xb}{\Yd}{\Xf}
      \fi
--- 628,638 ----
        \Vrule{\Xac}{\Ycc}{\Ya}
      \fi
  %
!     \if特定計画
!       \Hrule{\Xh}{\Yc}{\XW}
!     \else
!       \Hrule{\Xg}{\Yc}{\XW}
!     \fi
      \if基盤ABC
        \Hrule{\Xb}{\Yd}{\Xf}
      \fi
***************
*** 628,635 ****
      \fi
      \if特定
        \Hrule{\Xa}{\Yd}{\Xb}
!       \Hrule{\Xc}{\Yd}{\XW}
!     \fi
      \if基盤ABC
       \Hruledot{\Xaa}{\Yd}{\XW}
       \Vruledot{\Xaa}{\Ya}{\Ye}
--- 645,653 ----
      \fi
      \if特定
        \Hrule{\Xa}{\Yd}{\Xb}
!       \if特定計画\else
!         \Hrule{\Xc}{\Yd}{\XW}
!       \fi\fi
      \if基盤ABC
       \Hruledot{\Xaa}{\Yd}{\XW}
       \Vruledot{\Xaa}{\Ya}{\Ye}
***************
*** 671,682 ****
        \Vrule{\Xaf}{\Ycc}{\Ya}
      \fi
  %
!     \Vrule{\Xh}{\Yb}{\Ya}
      \Vrule{\Xb}{\Ya}{\Ye}
  %
!     \Vrule{\Xc}{\Ya}{\Ye}
!     \Vrule{\Xd}{\Ya}{\Ye}
!     \Vrule{\Xe}{\Ya}{\Ye}
      \if基盤ABC
        \Vrule{\Xah}{\Ya}{\Ye}
      \fi
--- 689,710 ----
        \Vrule{\Xaf}{\Ycc}{\Ya}
      \fi
  %
!     \if特定計画
!       \Vrulethick{\Xh}{\Yb}{\Ya}
!     \else
!       \Vrule{\Xh}{\Yb}{\Ya}
!     \fi
      \Vrule{\Xb}{\Ya}{\Ye}
  %
!     \if特定計画
!       \Vrulethick{\Xc}{\Ya}{\Ye}
!       \Vrulethick{\Xd}{\Ya}{\Ye}
!       \Vrulethick{\Xe}{\Ya}{\Ye}
!     \else
!       \Vrule{\Xc}{\Ya}{\Ye}
!       \Vrule{\Xd}{\Ya}{\Ye}
!       \Vrule{\Xe}{\Ya}{\Ye}
!     \fi
      \if基盤ABC
        \Vrule{\Xah}{\Ya}{\Ye}
      \fi
***************
*** 736,745 ****
      {\if若手AB -17mm\else\if基盤ABC -16mm\else -19.3mm\fi\fi}
      {\XW}{\Ya}{\elevengt\elevenbf
      \if基盤ABC\else\undertext{\fi
      \第1年度\  \if特定 特定領域研究\ \ \else\the\調書種目名\fi
      \if萌芽\Sz1\fi
      研究計画調書\if企画\else\if概要\else (新規)\fi\fi
!     \if概要 概要\fi\if基盤ABC\else}\fi}
    \if概要
      \XYBP{1mm}{-10mm}{\Xg}{\Yd}{\eightrm\eightmin\baselineskip=3.4mm
        注1. この概要の1頁は、研究計画調書の特定-1と同じ様式です。\par
--- 764,774 ----
      {\if若手AB -17mm\else\if基盤ABC -16mm\else -19.3mm\fi\fi}
      {\XW}{\Ya}{\elevengt\elevenbf
      \if基盤ABC\else\undertext{\fi
+     \if特定計画 特定領域研究計画研究\Sz1\Sz1研究計画調書\else
      \第1年度\  \if特定 特定領域研究\ \ \else\the\調書種目名\fi
      \if萌芽\Sz1\fi
      研究計画調書\if企画\else\if概要\else (新規)\fi\fi
!     \if概要 概要\fi\fi\if基盤ABC\else}\fi}
    \if概要
      \XYBP{1mm}{-10mm}{\Xg}{\Yd}{\eightrm\eightmin\baselineskip=3.4mm
        注1. この概要の1頁は、研究計画調書の特定-1と同じ様式です。\par
***************
*** 751,769 ****
         \if若手AB -11.5mm\fi}
         {\Xg}{\Yd}{\eightmin\eightrm\baselineskip=3pt
        \if萌芽\else\if特定\else\kanjiskip=0pt\fi\fi
!       注1. 別\if特定 添\else 途\fi\第1年度
!       \if基盤ABC\the\調書種目名\fi
!       \if萌芽\the\調書種目名\fi
!       \if若手AB\the\調書種目名\fi
!       \if特定 特定領域研究\ \ \fi
!       \if基盤ABC  (一般)\fi
!       \if萌芽\hskip2mm\fi
!       研究計画調書作成・記入要領
!       (\うぐいす 色)を参照してください。\par
!       注2. ※印の欄は研究機関において記入してください。}
    \fi
-   \XYBC{\Xg}{\Yb}{\Xh}{\Yc}{※機関番号}
-   \XYBC{\Xg}{\Yc}{\Xh}{\Ya}{※整理番号}
  %
    \if若手AB
      \XYBC{\Xa}{\Ycc}{\Xab}{\Ya}{若手研究}
--- 780,806 ----
         \if若手AB -11.5mm\fi}
         {\Xg}{\Yd}{\eightmin\eightrm\baselineskip=3pt
        \if萌芽\else\if特定\else\kanjiskip=0pt\fi\fi
!       \if特定計画
!         注.別添特定領域研究計画研究研究計画調書(別紙様式1)
!         作成・記入要領を参照してください。
!       \else
!         注1. 別\if特定 添\else 途\fi\第1年度
!         \if基盤ABC\the\調書種目名\fi
!         \if萌芽\the\調書種目名\fi
!         \if若手AB\the\調書種目名\fi
!         \if特定 特定領域研究\ \ \fi
!         \if基盤ABC  (一般)\fi
!         \if萌芽\hskip2mm\fi
!         研究計画調書作成・記入要領
!         (\うぐいす 色)を参照してください。\par
!         注2. ※印の欄は研究機関において記入してください。\fi}
!   \fi
!   \if特定計画
!     \XYBC{\Xg}{\Yb}{\Xh}{\Ya}{※}
!   \else
!     \XYBC{\Xg}{\Yb}{\Xh}{\Yc}{※機関番号}
!     \XYBC{\Xg}{\Yc}{\Xh}{\Ya}{※整理番号}
    \fi
  %
    \if若手AB
      \XYBC{\Xa}{\Ycc}{\Xab}{\Ya}{若手研究}
***************
*** 780,795 ****
    \fi
  %
    \if特定
!     \XYBC{\Xa}{\Ya}{\Xb}{\Yd}{特定領域研究}
!     \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16mm{\twelverm (1)\hfil (2)}}
!     \XYBC{\Xb}{\Ya}{\Xc}{\Ye}
!       {\vbox{\kinto{30mm}{審査希望領域及び}\vskip2mm
!       \par\kinto{30mm}{研究項目番号}}}
!     \XYBC{\Xc}{\Ya}{\Xd}{\Yd}{\kinto{19mm}{領域番号}}
!     \XYBC{\Xd}{\Ya}{\Xe}{\Yd}{\kinto{38mm}{領域略称名}}
!     \XYBC{\Xe}{\Ya}{\Xf}{\Yd}{\kinto{23mm}{研究項目番号}}
! 
        \XYBC{\Xf}{\Ya}{\XW}{\Yd}{計画・公募}
    \else
      \XYBC{\Xa}{\Ya}{\Xb}{\Ye}{\vbox{\hsize=2zw審査希望部門}}
      \XYBC{\Xb}{\Ya}{\Xc}{\Yd}{部}
--- 817,840 ----
    \fi
  %
    \if特定
!     \if特定計画
!       \XYBC{\Xa}{\Ya}{\Xb}{\Yd}{\kinto{12mm}{研究}}
!       \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 12mm{\twelverm (1)\hfil (2)}}
!       \XYBC{\Xb}{\Ya}{\Xc}{\Ye}
!         {\hbox{\vbox{\hbox{研究計画}\hbox{・総括班}\hbox{・調整班}}}}
!       \XYBC{\Xc}{\Ya}{\Xd}{\Ye}{計画研究の研究項目}
!       \XYBC{\Xe}{\Ya}{\Xf}{\Ye}{整理No}
!     \else
!       \XYBC{\Xa}{\Ya}{\Xb}{\Yd}{特定領域研究}
!       \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16mm{\twelverm (1)\hfil (2)}}
!       \XYBC{\Xb}{\Ya}{\Xc}{\Ye}
!         {\vbox{\kinto{30mm}{審査希望領域及び}\vskip2mm
!         \par\kinto{30mm}{研究項目番号}}}
!       \XYBC{\Xc}{\Ya}{\Xd}{\Yd}{\kinto{19mm}{領域番号}}
!       \XYBC{\Xd}{\Ya}{\Xe}{\Yd}{\kinto{38mm}{領域略称名}}
!       \XYBC{\Xe}{\Ya}{\Xf}{\Yd}{\kinto{23mm}{研究項目番号}}
        \XYBC{\Xf}{\Ya}{\XW}{\Yd}{計画・公募}
+     \fi
    \else
      \XYBC{\Xa}{\Ya}{\Xb}{\Ye}{\vbox{\hsize=2zw審査希望部門}}
      \XYBC{\Xb}{\Ya}{\Xc}{\Yd}{部}
***************
*** 1010,1022 ****
      }\hfil}}
    \fi
  
      \if特定
        \XYBC{\Xa}{\Yt}{\Xwa}{\YH}{\the\調書種目名}
      \else
        \XYBC{\Xa}{\Yt}{\Xw}{\YH}{\the\調書種目名}
      \fi
!       \XYBC{\Xw}{\Yt}{\Xx}{\YH}{\kinto{16mm}{研究機関名}}
!       \XYBC{\Xy}{\Yt}{\Xz}{\YH}{\kinto{23mm}{研究代表者氏名}}
    \fi
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    \if枠のみ\else
--- 1055,1069 ----
      }\hfil}}
    \fi
  
+   \if特定計画\else
      \if特定
        \XYBC{\Xa}{\Yt}{\Xwa}{\YH}{\the\調書種目名}
      \else
        \XYBC{\Xa}{\Yt}{\Xw}{\YH}{\the\調書種目名}
      \fi
!     \XYBC{\Xw}{\Yt}{\Xx}{\YH}{\kinto{16mm}{研究機関名}}
!     \XYBC{\Xy}{\Yt}{\Xz}{\YH}{\kinto{23mm}{研究代表者氏名}}
!   \fi
    \fi
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    \if枠のみ\else
***************
*** 1055,1070 ****
      \if基盤ABC
        \XYBC{\Xad}{\Ycc}{\Xae}{\Ya}{\hbox to 14mm{\hskip-0.7mm\Maru\hfil}}
      \fi
!     \if特定
        \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16.5mm{\hskip0mm\Maru\hfil}}
!     \fi
    \else
      \if基盤ABC
        \XYBC{\Xad}{\Ycc}{\Xae}{\Ya}{\hbox to 14mm{\hfil\Maru\hskip-0.5mm}}
      \fi
!     \if特定
        \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16.5mm{\hfil\Maru\hskip0mm}}
!     \fi
    \fi
  \fi
  %
--- 1102,1121 ----
      \if基盤ABC
        \XYBC{\Xad}{\Ycc}{\Xae}{\Ya}{\hbox to 14mm{\hskip-0.7mm\Maru\hfil}}
      \fi
!     \if特定\if特定計画
!       \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 12.5mm{\hskip0mm\Maru\hfil}}
!     \else
        \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16.5mm{\hskip0mm\Maru\hfil}}
!     \fi\fi
    \else
      \if基盤ABC
        \XYBC{\Xad}{\Ycc}{\Xae}{\Ya}{\hbox to 14mm{\hfil\Maru\hskip-0.5mm}}
      \fi
!     \if特定\if特定計画
!       \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 12.5mm{\hfil\Maru\hskip0mm}}
!     \else
        \XYBC{\Xa}{\Yd}{\Xb}{\Ye}{\hbox to 16.5mm{\hfil\Maru\hskip0mm}}
!     \fi\fi
    \fi
  \fi
  %
***************
*** 1080,1094 ****
    \fi\fi
  %
    \if特定
!     \if計画研究\XYBC{\Xf}{\Yd}{\XW}{\Ye}{計画}\fi
!     \if若手枠\XYBC{\Xf}{\Yd}{\XW}{\Ye}{若手}\fi
!     \if一般枠\XYBC{\Xf}{\Yd}{\XW}{\Ye}{一般}\fi
    \fi
  %
    \if特定
!     \XYBC{\Xc}{\Yd}{\Xd}{\Ye}{\twelverm\the\領域番号}
!     \XYBC{\Xd}{\Yd}{\Xe}{\Ye}{\twelvemin\the\領域略称名}
!     \XYBC{\Xe}{\Yd}{\Xf}{\Ye}{\twelverm\the\研究項目番号}
    \else
      \XYBC{\Xb}{\Yd}{\Xc}{\Ye}{\twelvemin\the\部}
      \XYBC{\Xc}{\Yd}{\Xd}{\Ye}{\twelvemin\the\分科}
--- 1131,1160 ----
    \fi\fi
  %
    \if特定
!     \if特定計画
!       \XYBC{\Xb}{\Ya}{\Xc}{\Ye}%
!         {\hbox{\vbox{\phantom{\hbox{研究計画}}%
!         \if総括班    
!           \hbox{\nagamaru{\phantom{・総括班}}}\hbox{\phantom{・調整班}}%
!         \fi\if調整班
!           \hbox{\phantom{・総括班}}\hbox{\nagamaru{\phantom{・調整班}}}%
!         \fi
!       }}}
!     \else
!       \if計画研究\XYBC{\Xf}{\Yd}{\XW}{\Ye}{計画}\fi\fi
!       \if若手枠\XYBC{\Xf}{\Yd}{\XW}{\Ye}{若手}\fi
!       \if一般枠\XYBC{\Xf}{\Yd}{\XW}{\Ye}{一般}\fi
    \fi
  %
    \if特定
!     \if特定計画
!       \XYBC{\Xd}{\Ya}{\Xe}{\Ye}{\twelverm\the\研究項目番号}
! %      \XYBC{\Xf}{\Ya}{\XW}{\Ye}{\twelverm\the\領域番号}
!     \else
!       \XYBC{\Xc}{\Yd}{\Xd}{\Ye}{\twelverm\the\領域番号}
!       \XYBC{\Xd}{\Yd}{\Xe}{\Ye}{\twelvemin\the\領域略称名}
!       \XYBC{\Xe}{\Yd}{\Xf}{\Ye}{\twelverm\the\研究項目番号}
!     \fi
    \else
      \XYBC{\Xb}{\Yd}{\Xc}{\Ye}{\twelvemin\the\部}
      \XYBC{\Xc}{\Yd}{\Xd}{\Ye}{\twelvemin\the\分科}
***************
*** 1148,1158 ****
     \XY{\if特定\Xaa\else\Xa\fi}{\Yr}{\vbox{\研究組織}}
     \分担者合計計算
    \fi
!   \if特定
!     \XYBC{\Xwa}{\Yt}{\Xw}{\YH}{\twelvemin\the\領域略称名}
    \fi
-   \XYBC{\Xx}{\Yt}{\Xy}{\YH}{\twelvemin\the\研究機関名}
-   \XYBC{\Xz}{\Yt}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
  %
      \if基盤ABC
        \if広領域
--- 1214,1226 ----
     \XY{\if特定\Xaa\else\Xa\fi}{\Yr}{\vbox{\研究組織}}
     \分担者合計計算
    \fi
!   \if特定計画\else
!     \if特定
!       \XYBC{\Xwa}{\Yt}{\Xw}{\YH}{\twelvemin\the\領域略称名}
!     \fi
!     \XYBC{\Xx}{\Yt}{\Xy}{\YH}{\twelvemin\the\研究機関名}
!     \XYBC{\Xz}{\Yt}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
    \fi
  %
      \if基盤ABC
        \if広領域
***************
*** 1525,1530 ****
--- 1593,1601 ----
   \Yh = 1.7cm
   \Yi =25.4cm
   \YH =26.4cm
+  \if特定計画
+    \Yi = \YH
+  \fi
  \fi
  \else\if基盤ABC
  \voffset = -0.034cm
***************
*** 1742,1752 ****
         \XYBC{\Xk}{\Yg}{\Xl}{\Yh}{\kinto{10mm}{金額}}
         \XYBC{\Xm}{\Yg}{\XW}{\Yh}{\kinto{10mm}{金額}}
  %
!        \if特定
           \XYBC{\Xa}{\Yi}{\Xn}{\YH}{\the\調書種目名}
           \XYBC{\Xo}{\Yi}{\Xp}{\YH}{研究機関名}
           \XYBC{\Xq}{\Yi}{\Xr}{\YH}{研究代表者氏名}
!        \fi
      \fi
  %
    \fi
--- 1813,1823 ----
         \XYBC{\Xk}{\Yg}{\Xl}{\Yh}{\kinto{10mm}{金額}}
         \XYBC{\Xm}{\Yg}{\XW}{\Yh}{\kinto{10mm}{金額}}
  %
!        \if特定\if特定計画\else
           \XYBC{\Xa}{\Yi}{\Xn}{\YH}{\the\調書種目名}
           \XYBC{\Xo}{\Yi}{\Xp}{\YH}{研究機関名}
           \XYBC{\Xq}{\Yi}{\Xr}{\YH}{研究代表者氏名}
!        \fi\fi
      \fi
  %
    \fi
***************
*** 1768,1778 ****
          \else\旅費等の明細\fi
        }}
  %
!       \if特定
          \XYBC{\Xn}{\Yi}{\Xo}{\YH}{\twelvemin\the\領域略称名}
          \XYBC{\Xp}{\Yi}{\Xq}{\YH}{\twelvemin\the\研究機関名}
          \XYBC{\Xr}{\Yi}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
!       \fi
      \fi
    \fi
    \vfil\break
--- 1839,1849 ----
          \else\旅費等の明細\fi
        }}
  %
!       \if特定\if特定計画\else
          \XYBC{\Xn}{\Yi}{\Xo}{\YH}{\twelvemin\the\領域略称名}
          \XYBC{\Xp}{\Yi}{\Xq}{\YH}{\twelvemin\the\研究機関名}
          \XYBC{\Xr}{\Yi}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
!       \fi\fi
      \fi
    \fi
    \vfil\break
***************
*** 1851,1859 ****
          \Vrule{\Xd}{\Yc}{\YH}
          \Vrule{\Xe}{\Yc}{\YH}}
  %
!       \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
!       \XYBC{\Xb}{\Yc}{\Xc}{\YH}{\kinto{19mm}{研究機関名}}
!       \XYBC{\Xd}{\Yc}{\Xe}{\YH}{\kinto{27mm}{研究代表者氏名}}
      \fi
  %
      \XYBP{\Xa}{\Ya}{\XW}{\Yb}{\vskip2mm\hskip2mm
--- 1922,1930 ----
          \Vrule{\Xd}{\Yc}{\YH}
          \Vrule{\Xe}{\Yc}{\YH}}
  %
!         \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
!         \XYBC{\Xb}{\Yc}{\Xc}{\YH}{\kinto{19mm}{研究機関名}}
!         \XYBC{\Xd}{\Yc}{\Xe}{\YH}{\kinto{27mm}{研究代表者氏名}}
      \fi
  %
      \XYBP{\Xa}{\Ya}{\XW}{\Yb}{\vskip2mm\hskip2mm
***************
*** 2079,2084 ****
--- 2150,2158 ----
   \Yc=24.85cm
   \YH=25.7cm
  \fi
+ \if特定計画
+  \Yc = \YH
+ \fi
  \SEThoffset
  \advance\hsize by -\hoffset
  \advance\vsize by -\voffset
***************
*** 2172,2184 ****
     $\hfil}}}
  
    \if若手AB\else
!     \if特定
!      \XYBC{\Xa}{\Yc}{\Xf}{\YH}{\the\調書種目名}
!     \else
!      \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
      \fi
-     \XYBC{\Xb}{\Yc}{\Xc}{\YH}{研究機関名}
-     \XYBC{\Xd}{\Yc}{\Xe}{\YH}{研究代表者氏名}
    \fi
  \fi
  
--- 2246,2260 ----
     $\hfil}}}
  
    \if若手AB\else
!     \if特定計画\else
!       \if特定
!        \XYBC{\Xa}{\Yc}{\Xf}{\YH}{\the\調書種目名}
!       \else
!        \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
!       \fi
!       \XYBC{\Xb}{\Yc}{\Xc}{\YH}{研究機関名}
!       \XYBC{\Xd}{\Yc}{\Xe}{\YH}{研究代表者氏名}
      \fi
    \fi
  \fi
  
***************
*** 2196,2206 ****
      \if特定 20cm\else 20.8cm\fi
      {\XM=5mm\YM=5mm\XYBP{\Xa}{\Yb}{\XW}{\YH}{\box\研究経過box}}
  %
!     \if若手AB\else
!       \XYBC{\Xc}{\Yc}{\Xd}{\YH}{\twelvemin\the\研究機関名}
!       \XYBC{\Xe}{\Yc}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
      \fi
-     \if特定\XYBC{\Xf}{\Yc}{\Xb}{\YH}{\twelvemin\the\領域略称名}\fi
    \fi
    \vfil\break
  }}
--- 2272,2284 ----
      \if特定 20cm\else 20.8cm\fi
      {\XM=5mm\YM=5mm\XYBP{\Xa}{\Yb}{\XW}{\YH}{\box\研究経過box}}
  %
!     \if特定計画\else
!       \if若手AB\else
!         \XYBC{\Xc}{\Yc}{\Xd}{\YH}{\twelvemin\the\研究機関名}
!         \XYBC{\Xe}{\Yc}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
!       \fi
!       \if特定\XYBC{\Xf}{\Yc}{\Xb}{\YH}{\twelvemin\the\領域略称名}\fi
      \fi
    \fi
    \vfil\break
  }}
***************
*** 2311,2316 ****
--- 2389,2397 ----
  \Yb = 3.15cm
  \Yc = 24.30cm
  \YH = 25.35cm
+ \if特定計画
+  \Yc = \YH
+ \fi
  \else\if基盤ABC
  \voffset = -0.085cm
  \XW = 18.4cm
***************
*** 2484,2494 ****
        $\hfill}
    \fi
      \if萌芽\else
!       \if特定
          \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
          \XYBC{\Xc}{\Yc}{\Xd}{\YH}{研究機関名}
          \XYBC{\Xe}{\Yc}{\Xf}{\YH}{研究代表者氏名}
!       \else
          \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
          \XYBC{\Xb}{\Yc}{\Xc}{\YH}{研究機関名}
          \XYBC{\Xd}{\Yc}{\Xe}{\YH}{研究代表者氏名}
--- 2565,2575 ----
        $\hfill}
    \fi
      \if萌芽\else
!       \if特定\if特定計画\else
          \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
          \XYBC{\Xc}{\Yc}{\Xd}{\YH}{研究機関名}
          \XYBC{\Xe}{\Yc}{\Xf}{\YH}{研究代表者氏名}
!       \fi\else
          \XYBC{\Xa}{\Yc}{\Xb}{\YH}{\the\調書種目名}
          \XYBC{\Xb}{\Yc}{\Xc}{\YH}{研究機関名}
          \XYBC{\Xd}{\Yc}{\Xe}{\YH}{研究代表者氏名}
***************
*** 2531,2541 ****
      }
    \fi
    \if萌芽\else
!     \if特定
        \XYBC{\Xb}{\Yc}{\Xc}{\YH}{\twelvemin\the\領域略称名}
        \XYBC{\Xd}{\Yc}{\Xe}{\YH}{\twelvemin\the\研究機関名}
        \XYBC{\Xf}{\Yc}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
!     \else
        \YA=\Yc\YB=\YH
        \XYBC{\Xc}{\YA}{\Xd}{\YB}{\twelvemin\the\研究機関名}
        \XYBC{\Xe}{\YA}{\XW}{\YB}{\twelvemin\the\研究代表者氏名}
--- 2612,2622 ----
      }
    \fi
    \if萌芽\else
!     \if特定\if特定計画\else
        \XYBC{\Xb}{\Yc}{\Xc}{\YH}{\twelvemin\the\領域略称名}
        \XYBC{\Xd}{\Yc}{\Xe}{\YH}{\twelvemin\the\研究機関名}
        \XYBC{\Xf}{\Yc}{\XW}{\YH}{\twelvemin\the\研究代表者氏名}
!     \fi\else
        \YA=\Yc\YB=\YH
        \XYBC{\Xc}{\YA}{\Xd}{\YB}{\twelvemin\the\研究機関名}
        \XYBC{\Xe}{\YA}{\XW}{\YB}{\twelvemin\the\研究代表者氏名}
*** kkhgrp.mac.orig	Tue Oct  9 12:48:44 2001
--- kkhgrp.mac	Tue Oct  9 18:56:57 2001
***************
*** 41,46 ****
--- 41,51 ----
    \調書種目略名={特定}
  }
  %
+ \newif\if特定計画\特定計画false
+ \def\特定計画{\特定計画true\特定true
+   \調書種目略名={特定}
+ }
+ %
  \newif\if企画\企画false
  \def\基盤C企画{\企画true
    \調書種目名={基盤研究(C)}\調書種目略名={基盤C(企画調査)}


nomura@cc.kshosen.ac.jp