/***************************************
*                                      *
*              頭割り計算              *
*                                      *
*                                      *
***************************************/

#include <iostream>
#include "snaps.h"
#include "kisosu.h"
#include "econ.h"
#include "cntl.h"
#include "file_open.h"

void Atamawari()
{
	// 変数宣言
	int nendo;
	int nenrei;
	int seido;
	int shinkyu;
	int kubun;
	int taishou;
	int tokubetu_shurui;
	int sotai_nendo;
	int seibetu;
	int shikyu_keitai;
	int kikan;
	int noufu_joutai;
	
	#define SHIHARAIOKURE 2
	
	// 計算用領域のクリア
	for( nendo = SHONENDO ; nendo <= SAISHUNENDO ; nendo++ )
	{
		sotai_nendo = nendo - SHONENDO;
		for( seido = SUM ; seido <= SHIGAKU ; seido++ )
		{
			for( shinkyu = SUM ; shinkyu <= OLD ; shinkyu++ )
			{
				for( kubun = SUM ; kubun <= IZOKU ; kubun++ )
				{
					for( taishou = SUM ; taishou <= TOKUBETU ; taishou++ )
					{
						for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
						{
							for( nenrei = NENREI_SUM ; nenrei <= MAX_JUKYU ; nenrei++ )
							{
								for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
								{
									Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan] = 0.;
									Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan] = 0.;
									Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan] = 0.;
									if( taishou == KYOSHUTU )
									{
										Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][kikan] = 0.;
									}
								}
							}
						}
					}
				}
			}
		}
		for( seido = SUM ; seido <= NORIN ; seido++ )
		{
			for( nenrei = NENREI_SUM ; nenrei <= MAX_JUKYU ; nenrei++ )
			{
				for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
				{
					Kyoshutukin[seido][sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
					Kyoshutukin_Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
				}
			}
		}
		for( nenrei = NENREI_SUM ; nenrei <= MAX_JUKYU ; nenrei++ )
		{
			for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
			{
				Tanka[sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
				Tanka_Kokko[sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
			}
		}
		
		for( tokubetu_shurui = SUM ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
		{
			for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
			{
				for( nenrei = NENREI_SUM ; nenrei <= MAX_JUKYU ; nenrei++ )
				{
					for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
					{
						Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan] = 0.;
						Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan] = 0.;
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan] = 0.;
					}
				}
			}
		}
	}
	
	// 各年分の計算
	for( nendo = SHONENDO ; nendo <= SAISHUNENDO ; nendo++ )
	{
		sotai_nendo = nendo - SHONENDO;
		
		for( nenrei = UNDER_63 ; nenrei <= MAX_JUKYU ; nenrei++ )
		{
			// 国民年金
			for( seibetu = OTOKO ; seibetu <= ONNA ; seibetu++ )
			{
				// 老齢・新法・拠出金対象
				// 前半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
				 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
				 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				// 後半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
				 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
				
				Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
				 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
				
				// 老齢・旧法・拠出金対象
				// 前半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][ZENHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * ( 1. - tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_KASAAGE] )
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * ( 1. - tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_GONEN] ) )
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][ZENHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE] )
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] ) )
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				// 後半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][KOUHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE] )
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] ) )
				  * ( 16 - tuki[sotai_nendo] ) / 12.;
				
				if( nendo == SAISHUNENDO )
				{
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
						  + Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
					    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE] )
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
					    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] ) )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
				}
				else
				{
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
					    * ( 1. - tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_KASAAGE] )
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
					    * ( 1. - tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_GONEN] ) )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
				}
				
				// 老齢・新法・特別国庫対象
				for( noufu_joutai = MENJO_ZENHAN ; noufu_joutai <= MENJO_KOUHAN ; noufu_joutai++ )
				{
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][TOKUBETU][KIHON][ZENHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][ZENHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][TOKUBETU][KIHON][ZENHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][ZENHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][TOKUBETU][KIHON][KOUHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][KOUHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][TOKUBETU][KIHON][KOUHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][KOUHAN]
					 += Rorei_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][noufu_joutai] * ( 16 - tuki[sotai_nendo] ) / 12.;
				}
				// 老齢・旧法・特別国庫対象
				// 前半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][TOKUBETU][KIHON][ZENHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				    * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_KASAAGE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASAMENJO]
				    * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_KASAMENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROFUKU_SHITASASAE]
				    * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_SHITASASAE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_GONEN] )
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][ZENHAN]
				 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				for( tokubetu_shurui = TOKUBETU_KASAAGE ; tokubetu_shurui <= TOKUBETU_GONEN ; tokubetu_shurui++ )
				{
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][KIHON][ZENHAN]
					 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][tokubetu_shurui + 3]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][tokubetu_shurui]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
				}
				
				Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][TOKUBETU][KIHON][ZENHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASAMENJO]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAMENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROFUKU_SHITASASAE]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_SHITASASAE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] )
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][ZENHAN]
				 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				  * ( tuki[sotai_nendo] - 4 ) / 12.;
				
				for( tokubetu_shurui = TOKUBETU_KASAAGE ; tokubetu_shurui <= TOKUBETU_GONEN ; tokubetu_shurui++ )
				{
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][KIHON][ZENHAN]
					 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][tokubetu_shurui + 3]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][tokubetu_shurui]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
				}
				
				
				// 後半
				Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][TOKUBETU][KIHON][KOUHAN]
				 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASAMENJO]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAMENJO]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROFUKU_SHITASASAE]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_SHITASASAE]
						+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
				    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] )
				  * ( 16 - tuki[sotai_nendo] ) / 12.;
				
				Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][KOUHAN]
				 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
				  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				  * ( 16 - tuki[sotai_nendo] ) / 12.;
				
				for( tokubetu_shurui = TOKUBETU_KASAAGE ; tokubetu_shurui <= TOKUBETU_GONEN ; tokubetu_shurui++ )
				{
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][KIHON][KOUHAN]
					 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][tokubetu_shurui + 3]
						* tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][tokubetu_shurui]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
				}
				
				if( nendo == SAISHUNENDO )
				{
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][TOKUBETU][KIHON][KOUHAN]
					 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
					    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
					    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAAGE]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASAMENJO]
					    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_KASAMENJO]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
					    * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_GONEN] )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][KOUHAN]
					 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					for( tokubetu_shurui = TOKUBETU_KASAAGE ; tokubetu_shurui <= TOKUBETU_GONEN ; tokubetu_shurui++ )
					{
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][KIHON][KOUHAN]
						 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][tokubetu_shurui + 3]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][tokubetu_shurui]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
				}
				else
				{
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][TOKUBETU][KIHON][KOUHAN]
					 += ( Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
					    * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
					    * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_KASAAGE]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASAMENJO]
					    * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_KASAMENJO]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROFUKU_SHITASASAE]
					    * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_SHITASASAE]
							+ Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN]
					    * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_GONEN] )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][KIHON][KOUHAN]
					 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][MENJO]
					  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					for( tokubetu_shurui = TOKUBETU_KASAAGE ; tokubetu_shurui <= TOKUBETU_GONEN ; tokubetu_shurui++ )
					{
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][KIHON][KOUHAN]
						 += Rorei_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][tokubetu_shurui + 3]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][tokubetu_shurui]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
				}
				
				for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
				{
					// 障害・新法・拠出金対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += ( Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
					    + Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					    * ( 1. - tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE] ) )
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += ( Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
					    + Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE] ) )
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += ( Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
							+ Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE] ) )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					if( nendo == SAISHUNENDO )
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += ( Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
								+ Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						    * ( 1. - tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE] ) )
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					else
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += ( Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
								+ Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						    * ( 1. - tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE] ) )
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					
					// 障害・旧法・拠出金対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					// 障害・新法・特別国庫対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_20MAE][shikyu_keitai][ZENHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_20MAE][shikyu_keitai][ZENHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_20MAE][shikyu_keitai][KOUHAN]
					 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					if( nendo == SAISHUNENDO )
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_20MAE][shikyu_keitai][KOUHAN]
						 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_20MAE]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					else
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_20MAE][shikyu_keitai][KOUHAN]
						 += Shogai_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_20MAE]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					
					// 障害・旧法・特別国庫対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				    * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				    * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][ZENHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				    * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
					 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					if( nendo == SAISHUNENDO )
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					    * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
						 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					else
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					    * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
						 += Shogai_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					
					// 遺族・新法・拠出金対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Izoku_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Izoku_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Izoku_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Izoku_New[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					// 遺族・旧法・拠出金対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					// 遺族・旧法・特別国庫対象
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][TOKUBETU][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][ZENHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][TOKUBETU][shikyu_keitai][KOUHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
					 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
					  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
				    * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					if( nendo == SAISHUNENDO )
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
						 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					    * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
					else
					{
						Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][TOKUBETU][shikyu_keitai][KOUHAN]
						 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
						  * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][TOKUBETU_MENJO][shikyu_keitai][KOUHAN]
						 += Izoku_Old[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][MENJO]
						  * tokubetu_kokko_wariai[nendo + 1 - ( SHONENDO - 1 )][TOKUBETU_MENJO]
					    * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
				}
				
				// 振替加算（老齢）
				for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
				{
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROREI] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROREI] * ( tuki[sotai_nendo] - 4 ) / 12.;
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROREI] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][ROREI] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					// 振替加算（障害）
					// 前半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][KIHON][ZENHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][SHOGAI] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][KIHON][ZENHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][SHOGAI] * ( tuki[sotai_nendo] - 4 ) / 12.;
					// 後半
					Kyufu_Nendomatu[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][KIHON][KOUHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][SHOGAI] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[KOKUNEN][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][KIHON][KOUHAN]
					 += FurikaeKasan[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][SHOGAI] * ( 16 - tuki[sotai_nendo] ) / 12.;
				}
				
				// 被用者年金
				for( seido = KOUNEN ; seido <= SHIGAKU ; seido++ )
				{
					// 老齢・新法・拠出金対象
					// 前半
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += Rorei_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += Rorei_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
					// 後半
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += Rorei_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += Rorei_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					// 老齢・旧法・拠出金対象
					// 前半
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += ( Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN] )
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KAKYU][ZENHAN]
					 += Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KAKYU_NOUFU]
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][ZENHAN]
					 += ( Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN] )
					  * ( tuki[sotai_nendo] - 4 ) / 12.;
					
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KAKYU][ZENHAN]
					 += Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KAKYU_NOUFU]
						* ( tuki[sotai_nendo] - 4 ) / 12.;
					
					// 後半
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += ( Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN] )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KAKYU][KOUHAN]
					 += Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KAKYU_NOUFU]
						* ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KIHON][KOUHAN]
					 += ( Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][NOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KASANOUFU]
							+ Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][GONEN] )
					  * ( 16 - tuki[sotai_nendo] ) / 12.;
					
					Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][ROREI][KYOSHUTU][KAKYU][KOUHAN]
					 += Rorei_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][KAKYU_NOUFU]
						* ( 16 - tuki[sotai_nendo] ) / 12.;
					
					for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
					{
						// 障害・新法・拠出金対象
						// 前半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += ( Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
						    + Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai] )
						  * ( tuki[sotai_nendo] - 4 ) / 12.;
						
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += ( Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
						    + Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai] )
						  * ( tuki[sotai_nendo] - 4 ) / 12.;
						
						// 後半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += ( Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
							  + Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai] )
							* ( 16 - tuki[sotai_nendo] ) / 12.;
						
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += ( Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][IPPAN][shikyu_keitai]
							  + Shogai_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][HATACHIMAE][shikyu_keitai] )
							* ( 16 - tuki[sotai_nendo] ) / 12.;
						
						// 障害・旧法・拠出金対象
						// 前半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Shogai_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Shogai_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
						// 後半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Shogai_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][SHOGAI][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Shogai_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						// 遺族・新法・拠出金対象
						// 前半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Izoku_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( tuki[sotai_nendo] - 4 ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Izoku_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( tuki[sotai_nendo] - 4 ) / 12.;
						
						// 後半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Izoku_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( 16 - tuki[sotai_nendo] ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][NEW][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Izoku_New[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai] * ( 16 - tuki[sotai_nendo] ) / 12.;
						
						// 遺族・旧法・拠出金対象
						// 前半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Izoku_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][ZENHAN]
						 += Izoku_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( tuki[sotai_nendo] - 4 ) / 12.;
						
						// 後半
						Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Izoku_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
						Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][OLD][IZOKU][KYOSHUTU][shikyu_keitai][KOUHAN]
						 += Izoku_Old[seido][sotai_nendo][nenrei - NENREI_SUM][seibetu][shikyu_keitai][NOUFU] * ( 16 - tuki[sotai_nendo] ) / 12.;
					}
				}
			}
			
			// 給付費の集計
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = KYOSHUTU ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
								  Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
								   *= Cut_ritu[sotai_nendo][( shikyu_keitai == KAKYU ? UNDER_63  - UNDER_63 : nenrei - UNDER_63 )];
								  Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
								   *= Cut_ritu[sotai_nendo][( shikyu_keitai == KAKYU ? UNDER_63  - UNDER_63 : nenrei - UNDER_63 )];
									if( taishou == KYOSHUTU )
									{
									  Kyufu_Nendomatu[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][shikyu_keitai][kikan]
										 += Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									  Kyufu_Nendomatu[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][SUM][kikan]
										 += Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									  Kyufu_Nendomatu[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][SUM][SUM]
										 += Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								  	Kyufu_Nendomatu_P[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][shikyu_keitai][kikan]
								  	 += Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								  	Kyufu_Nendomatu_P[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][SUM][kikan]
								  	 += Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								  	Kyufu_Nendomatu_P[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][SUM][SUM]
								  	 += Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									}
									Kyufu_Nendomatu[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][taishou][shikyu_keitai][SUM]
								   += Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								  Kyufu_Nendomatu_P[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][taishou][shikyu_keitai][SUM]
								   += Kyufu_Nendomatu_P[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			for( tokubetu_shurui = TOKUBETU_MENJO ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
			{
				for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
				{
					for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
					{
						Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
						 *= Cut_ritu[sotai_nendo][( shikyu_keitai == KAKYU ? UNDER_63  - UNDER_63 : nenrei - UNDER_63 )];
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
						 *= Cut_ritu[sotai_nendo][( shikyu_keitai == KAKYU ? UNDER_63  - UNDER_63 : nenrei - UNDER_63 )];
						
						Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][SUM][shikyu_keitai][kikan]
						 += Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
						Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][SUM][shikyu_keitai][kikan]
						 += Tokubetukokko_Nendomatu_P[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
					}
				}
			}
		}
	}
	
	// 給付水準調整
	for( nendo = SHONENDO + 1 ; nendo <= SAISHUNENDO ; nendo++ )
	{
		sotai_nendo = nendo - SHONENDO;
		
		for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
		{
			for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = KYOSHUTU ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
									if( nenrei == UNDER_64 )
									{
										if( nendo == 2013 )
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE + ( kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] + 1.0 / 100 ) * 6. ) / 12.
											 + ( Kyufu_Nendomatu[seido][sotai_nendo][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											   + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan] )
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
										else
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE + kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] * 6. ) / 12.
											 + ( Kyufu_Nendomatu[seido][sotai_nendo][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											   + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan] )
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
									}
									else if( nenrei <= 67 )
									{
										if( nendo == 2013 )
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE + ( kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] + 1.0 / 100 ) * 6. ) / 12.
											 + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
										else
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE + kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] * 6. ) / 12.
											 + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
									}
									else
									{
										if( nendo == 2013 )
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE
											   + ( kaiteiritu[nendo - ECON_SHONENDO][( shikyu_keitai == KAKYU ? UNDER_67 - UNDER_67 : nenrei - UNDER_67 )]
											   + 1.0 / 100 ) * 6. ) / 12.
											 + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
										else
										{
											Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 = Kyufu_Nendomatu_P[seido][sotai_nendo - 1][nenrei - 1 - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( SHIHARAIOKURE
											   + kaiteiritu[nendo - ECON_SHONENDO][( shikyu_keitai == KAKYU ? UNDER_67 - UNDER_67 : nenrei - UNDER_67 )] * 6. ) / 12.
											 + Kyufu_Nendomatu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
											 * ( 6. - SHIHARAIOKURE ) / 12.;
										}
									}
								}
								if( taishou == KYOSHUTU )
								{
									Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][ZENHAN]
									 = Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][ZENHAN]
									 * Kokko_Wariai[nendo - 1 - ( SHONENDO - 1 )];
									
									Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][KOUHAN]
									 = Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][KOUHAN]
									 * Kokko_Wariai[nendo - ( SHONENDO - 1 )];
								}
							}
						}
					}
				}
				
				for( tokubetu_shurui = SUM ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
				{
					for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
					{
						for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
						{
							if( nenrei == UNDER_64 )
							{
								if( nendo == 2013 )
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE + ( kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] + 1.0 / 100 ) * 6. ) / 12.
									 + ( Tokubetukokko_Nendomatu[sotai_nendo][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									   + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan] )
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
								else
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE + kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] * 6. ) / 12.
									 + ( Tokubetukokko_Nendomatu[sotai_nendo][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									   + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan] )
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
							}
							else if( nenrei <= 67 )
							{
								if( nendo == 2013 )
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE + ( kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] + 1.0 / 100 ) * 6. ) / 12.
									 + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
								else
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE + kaiteiritu[nendo - ECON_SHONENDO][UNDER_67 - UNDER_67] * 6. ) / 12.
									 + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
							}
							else
							{
								if( nendo == 2013 )
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE
									   + ( kaiteiritu[nendo - ECON_SHONENDO][( shikyu_keitai == KAKYU ? UNDER_67 - UNDER_67 : nenrei - UNDER_67 )]
									   + 1.0 / 100 ) * 6. ) / 12.
									 + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
								else
								{
									Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 = Tokubetukokko_Nendomatu_P[sotai_nendo - 1][nenrei - 1 - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( SHIHARAIOKURE
									   + kaiteiritu[nendo - ECON_SHONENDO][( shikyu_keitai == KAKYU ? UNDER_67 - UNDER_67 : nenrei - UNDER_67 )] * 6. ) / 12.
									 + Tokubetukokko_Nendomatu[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
									 * ( 6. - SHIHARAIOKURE ) / 12.;
								}
							}
						}
					}
				}
			}
		}
	}
	
	// 給付費の集計（年度前後半別）
	for( nendo = SHONENDO + 1 ; nendo <= SAISHUNENDO ; nendo++ )
	{
		sotai_nendo = nendo - SHONENDO;
		for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
		{
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = KYOSHUTU ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
									Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][SUM][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									Kyufu[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][kubun][taishou][SUM][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = KYOSHUTU ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
								  Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][SUM][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									Kyufu[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][kubun][SUM][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++)
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = SUM ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
									Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][SUM][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									Kyufu[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][SUM][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++)
				{
					for( kubun = SUM ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = SUM ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
									Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][SUM][kubun][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									Kyufu[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][SUM][kubun][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = SUM ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = SUM ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = SUM ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
								for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
								{
								  Kyufu[SUM][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
									Kyufu[SUM][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan]
									 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][kikan];
								}
							}
						}
					}
				}
			}
			
			for( seido = KOKUNEN ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = NEW ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = ROREI ; kubun <= IZOKU ; kubun++ )
					{
						for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
						{
							for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
							{
								Kokko[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][SUM][kikan]
								 += Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][kikan];
							}
						}
					}
				}
			}
			
			for( seido = SUM ; seido <= SHIGAKU ; seido++ )
			{
				for( shinkyu = SUM ; shinkyu <= OLD ; shinkyu++ )
				{
					for( kubun = SUM ; kubun <= IZOKU ; kubun++ )
					{
						for( taishou = SUM ; taishou <= TOKUBETU ; taishou++ )
						{
							for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
							{
							  Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][SUM]
								 = Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][ZENHAN]
								 + Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][KOUHAN];
								
								Kyufu[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][SUM]
								 += Kyufu[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][taishou][shikyu_keitai][SUM];
								
								if( taishou == KYOSHUTU )
								{
									Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][SUM]
									 = Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][ZENHAN]
									 + Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][KOUHAN];
									
									Kokko[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][shinkyu][kubun][shikyu_keitai][SUM]
									 += Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][shinkyu][kubun][shikyu_keitai][SUM];
								}
							}
						}
					}
				}
			}
			
			for( tokubetu_shurui = TOKUBETU_MENJO ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
			{
				for( shikyu_keitai = KIHON ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
				{
					for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
					{
						Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][SUM][kikan]
						 += Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
						Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][tokubetu_shurui][SUM][kikan]
						 += Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
						Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan]
						 += Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
					}
				}
			}
			
			for( tokubetu_shurui = TOKUBETU_MENJO ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
			{
				for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
				{
					for( kikan = ZENHAN ; kikan <= KOUHAN ; kikan++ )
					{
						Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][SUM][shikyu_keitai][kikan]
						 += Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
						Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][SUM][shikyu_keitai][kikan]
						 += Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][kikan];
					}
				}
			}
		}
		
		for( tokubetu_shurui = SUM ; tokubetu_shurui <= TOKUBETU_20MAE ; tokubetu_shurui++ )
		{
			for( shikyu_keitai = SUM ; shikyu_keitai <= KAKYU ; shikyu_keitai++ )
			{
				for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
				{
					Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][SUM]
					 = Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][ZENHAN]
					 + Tokubetukokko[sotai_nendo][nenrei - NENREI_SUM][tokubetu_shurui][shikyu_keitai][KOUHAN];
				}
				Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][tokubetu_shurui][shikyu_keitai][SUM]
				 = Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][tokubetu_shurui][shikyu_keitai][ZENHAN]
				 + Tokubetukokko[sotai_nendo][NENREI_SUM - NENREI_SUM][tokubetu_shurui][shikyu_keitai][KOUHAN];
			}
		}
	}
	
	for( nendo = SHONENDO + 1 ; nendo <= SAISHUNENDO ; nendo++ )
	{
		sotai_nendo = nendo - SHONENDO;
		
		// 拠出金の按分
		for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
		{
			for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
			{
				if( SanteiTaishou[SUM][sotai_nendo][SUM] > 0. )
				{
					Tanka[sotai_nendo][nenrei - NENREI_SUM][kikan]
					 = Kyufu[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][KYOSHUTU][SUM][kikan]
					 / SanteiTaishou[SUM][sotai_nendo][SUM] / 12.;
					
					Tanka_Kokko[sotai_nendo][nenrei - NENREI_SUM][kikan]
					 = Kokko[SUM][sotai_nendo][nenrei - NENREI_SUM][SUM][SUM][SUM][kikan]
					 / SanteiTaishou[SUM][sotai_nendo][SUM] / 12.;
				}
				else
				{
					Tanka[sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
					Tanka_Kokko[sotai_nendo][nenrei - NENREI_SUM][kikan] = 0.;
				}
				
				for( seido = SUM ; seido <= NORIN ; seido++ )
				{
					Kyoshutukin[seido][sotai_nendo][nenrei - NENREI_SUM][kikan]
					 = SanteiTaishou[seido][sotai_nendo][SUM] * Tanka[sotai_nendo][nenrei - NENREI_SUM][kikan] * 12;
					
					Kyoshutukin_Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][kikan]
					 = Kyoshutukin[seido][sotai_nendo][nenrei - NENREI_SUM][kikan] * K_Wariai[seido][sotai_nendo + 1];
				}
			}
		}
		
		for( seido = SUM ; seido <= NORIN ; seido++ )
		{
			for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
			{
				for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
				{
					Kyoshutukin[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][kikan] += Kyoshutukin[seido][sotai_nendo][nenrei - NENREI_SUM][kikan];
					Kyoshutukin_Kokko[seido][sotai_nendo][NENREI_SUM - NENREI_SUM][kikan] += Kyoshutukin_Kokko[seido][sotai_nendo][nenrei - NENREI_SUM][kikan];
				}
			}
		}
		
		for( nenrei = UNDER_64 ; nenrei <= MAX_JUKYU ; nenrei++ )
		{
			for( kikan = SUM ; kikan <= KOUHAN ; kikan++ )
			{
				Tanka[sotai_nendo][NENREI_SUM - NENREI_SUM][kikan] += Tanka[sotai_nendo][nenrei - NENREI_SUM][kikan];
				Tanka_Kokko[sotai_nendo][NENREI_SUM - NENREI_SUM][kikan] += Tanka_Kokko[sotai_nendo][nenrei - NENREI_SUM][kikan];
			}
		}
	}
}
