when_exe 0.3.4 → 0.3.5

data/lib/when_exe/region/chinese_calendar.rb

@@ -921,7 +921,11 @@ module When
       }
     ]
 
-    # 清::           時憲暦   1645 - 1911
+    # 清::           時憲暦   1645 - 1664 天聡戊辰元法
+    # 清::           大統暦   1665 - 1668
+    # 清::           時憲暦   1669 - 1725 天聡戊辰元法
+    # 清::           時憲暦   1726 - 1741 康熙甲子元法
+    # 清::           時憲暦   1742 - 1911 雍正癸卯元法
     Chinese1645 = [PatternTableBasedLuniSolar, {
       'origin_of_MSC'=>1645, 'origin_of_LSC'=>2321912,
       'indices'=> _IndicesM1,

data/lib/when_exe/region/chinese_epoch.rb

@@ -598,79 +598,79 @@ module When
 	["[開皇]1"	,	"@F"	,	"name=[文帝];581-02-13^Chinese0523"],	# 甲子 開皇４年から開皇暦を使用
 	["[仁寿]1"	,	""	,	"	     601-01-01"],		# 乙酉 開皇１７年から大業暦を使用
 	["[大業]1"	,	"@A"	,	"name=[煬帝];605-01-01", "618-03-10="],	# 壬辰
-	["[皇泰]1"	,	"@A"	,	"name=[恭帝];618-05-24", "619-04-08"],	# 戊辰 5791-26
+	["[皇泰]1"	,	"@A"	,	"name=[恭帝];618-05-24^ChineseTwin::大業暦", "619-04-08"],	# 戊辰 5791-26
 	[self,
 	  "period:[鄭(王世充)]",
-	  ["[開明]1"	,	"@F"	,	"name=[王世充];619-04-08^Chinese0523", "621-05-09="]	# 丙午 5853-45
+	  ["[開明]1"	,	"@F"	,	"name=[王世充];619-04-08^ChineseTwin::大業暦", "621-05-09="]	# 丙午 5853-45
 	],
 	[self,
-	  "period:[楚(林士弘)]",
-	  ["[太平]1"	,	"@F"	,	"name=[林士弘];616-12-10^Chinese0523", "622-10-21="]	# 壬辰 5712-16
+	  "period:[梁(蕭銑)]",
+	  ["[鳴鳳]1"	,	"@F"	,	"name=[蕭銑];617-10^ChineseTwin::大業暦", "621-10-21="]	# 5761-17
 	],
 	[self,
-	  "period:[楚(朱粲)]",
-	  ["[昌達]1"	,	"@F"	,	"name=[朱粲];618-10^Chinese0523", "619-02?"]	# 5817-22
+	  "period:[梁(梁師都)]",
+	  ["[永隆]1"	,	"@F"	,	"name=[梁師都];617-03^ChineseTwin::大業暦", "628-04-26="] # 5725-9
 	],
 	[self,
-	  "period:[夏(竇建徳)]",
-	  ["[丁丑]1"	,	"@F"	,	"name=[竇建徳];617-01-05^Chinese0523"],		# 丙辰 5718-2
-	  ["[五鳳]1"	,	""	,	"	     618-07", "621-05-09="]		# 5805-54
+	  "period:[梁(沈法興)]",
+	  ["[延康]1"	,	"@F"	,	"name=[沈法興];619-08^ChineseTwin::大業暦", "620-12="]	# 5863-77
 	],
 	[self,
-	  "period:[魏(李密)]",
-	  ["[永平]1"	,	"@F"	,	"name=[李密];617-02-19^Chinese0523", "618-09="]	# 庚子 5720-7
+	  "period:[呉(李子通)]",
+	  ["[明政]1"	,	"@F"	,	"name=[李子通];619-08^ChineseTwin::大業暦", "621-11="]	# 5863-77
 	],
 	[self,
-	  "period:[梁(梁師都)]",
-	  ["[永隆]1"	,	"@F"	,	"name=[梁師都];617-03^Chinese0523", "628-04-26="] # 5725-9
+	  "period:[楚(林士弘)]",
+	  ["[太平]1"	,	"@F"	,	"name=[林士弘];616-12-10^ChineseTwin::大業暦", "622-10-21="]	# 壬辰 5712-16
 	],
 	[self,
-	  "period:[梁(沈法興)]",
-	  ["[延康]1"	,	"@F"	,	"name=[沈法興];619-08^Chinese0523", "620-12="]	# 5863-77
+	  "period:[楚(朱粲)]",
+	  ["[昌達]1"	,	"@F"	,	"name=[朱粲];618-10^ChineseTwin::大業暦", "619-02?"]	# 5817-22
 	],
 	[self,
-	  "period:[梁(蕭銑)]",
-	  ["[鳴鳳]1"	,	"@F"	,	"name=[蕭銑];617-10^Chinese0523", "621-10-21="]	# 5761-17
+	  "period:[夏(竇建徳)]",
+	  ["[丁丑]1"	,	"@F"	,	"name=[竇建徳];617-01-05^ChineseTwin::大業暦"],		# 丙辰 5718-2
+	  ["[五鳳]1"	,	""	,	"	     618-07", "621-05-09="]		# 5805-54
+	],
+	[self,
+	  "period:[漢東(劉黒闥)]",
+	  ["[天造]1"	,	"@F"	,	"name=[劉黒闥];622-01^ChineseTwin::大業暦", "623-01-03="] # 5942-1
+	],
+	[self,
+	  "period:[魏(李密)]",
+	  ["[永平]1"	,	"@F"	,	"name=[李密];617-02-19^ChineseTwin::大業暦", "618-09="]	# 庚子 5720-7
 	],
 	[self,
 	  "period:[許(宇文化及)]",
-	  ["[天寿]1"	,	"@F"	,	"name=[宇文化及];618-09^Chinese0523", "619-02?"] # 5761-17
+	  ["[天寿]1"	,	"@F"	,	"name=[宇文化及];618-09^ChineseTwin::大業暦", "619-02?"] # 5761-17
 	],
 	[self,
 	  "period:[涼(李軌)]",
-	  ["[安楽]1"	,	"@F"	,	"name=[李軌];618-11-04^Chinese0523", "619-05-13="] # 乙巳 5820-28
+	  ["[安楽]1"	,	"@F"	,	"name=[李軌];618-11-04^ChineseTwin::大業暦", "619-05-13="] # 乙巳 5820-28
 	],
 	[self,
 	  "period:[燕(高開道)]",
-	  ["[始興]1"	,	"@F"	,	"name=[高開道];618-12^Chinese0523", "620-10-19="] # 5833-47
+	  ["[始興]1"	,	"@F"	,	"name=[高開道];618-12^ChineseTwin::大業暦", "620-10-19="] # 5833-47
 	],
 	[self,
 	  "period:[乗(高曇晟)]",
-	  ["[法輪]1"	,	"@F"	,	"name=[高曇晟];618-12^Chinese0523", "619-02="]	# 5833-47
-	],
-	[self,
-	  "period:[呉(李子通)]",
-	  ["[明政]1"	,	"@F"	,	"name=[李子通];619-08^Chinese0523", "621-11="]	# 5863-77
+	  ["[法輪]1"	,	"@F"	,	"name=[高曇晟];618-12^ChineseTwin::大業暦", "619-02="]	# 5833-47
 	],
 	[self,
 	  "period:[定楊(劉武周)]",
-	  ["[天興]1"	,	"@F"	,	"name=[劉武周];617-03-17^Chinese0523", "620-04="] # 丁卯 5725-8
+	  ["[天興]1"	,	"@F"	,	"name=[劉武周];617-03-17^ChineseTwin::大業暦", "620-04="] # 丁卯 5725-8
 	],
 	[self,
 	  "period:[西秦(薛挙)]",
-	  ["[秦興]1"	,	"@F"	,	"name=[薛挙];617-04-03^Chinese0523", "618-11-08="] # 癸未 5725-11
-	],
-	[self,
-	  "period:[漢東(劉黒闥)]",
-	  ["[天造]1"	,	"@F"	,	"name=[劉黒闥];622-01^Chinese0523", "623-01-03="] # 5942-1
+	  ["[秦興]1"	,	"@F"	,	"name=[薛挙];617-04-03^ChineseTwin::大業暦", "618-11-08="] # 癸未 5725-11
 	],
 	[self,
 	  "period:[永楽(郭子和)]",
-	  ["[丑平]1"	,	"@F"	,	"name=[郭子和];617-03^Chinese0523", "618-12="]	# 5725-10
+	  ["[丑平]1"	,	"@F"	,	"name=[郭子和];617-03^ChineseTwin::大業暦", "618-12="]	# 5725-10
 	],
 	[self,
 	  "period:[(曹武徹)]",
-	  ["[通聖]1"	,	"@F"	,	"name=[曹武徹];618-^Chinese0523", "618-12="]	# 紀元編による
+	  ["[通聖]1"	,	"@F"	,	"name=[曹武徹];618-^ChineseTwin::大業暦", "618-12="]	# 紀元編による
 	],
 	[self,
 	  "period:[隋(恭帝)]",
@@ -1204,15 +1204,7 @@ module When
 	],
 	["[崇徳]1"	,	"@F"	,	"	     1636-04-11^Chinese0939"],	# 乙酉 陳舜臣 340
 	["[順治]1"	,	"@A"	,	"name=[世祖];1644-01-01", "1645-01^Chinese1645", ""],	# 順治２年から時憲暦を使用
-	["[康熙]1"	,	"@A"	,	"name=[聖祖];1662-01-01"],
-	["[雍正]1"	,	"@A"	,	"name=[世宗];1723-01-01"],
-	["[乾隆]1"	,	"@A"	,	"name=[高宗];1736-01-01"],
-	["[嘉慶]1"	,	"@A"	,	"name=[仁宗];1796-01-01"],
-	["[道光]1"	,	"@A"	,	"name=[宣宗];1821-01-01"],
-	["[咸豊]1"	,	"@A"	,	"name=[文宗];1851-01-01"],
-	["[同治]1"	,	"@A"	,	"name=[穆宗];1862-01-01"],
-	["[光緒]1"	,	"@A"	,	"name=[徳宗];1875-01-01"],
-	["[宣統]1"	,	"@A"	,	"name=[末帝];1909-01-01", "1911-11-12="],
+	["[康熙]1"	,	"@A"	,	"name=[聖祖];1662-01-01", "1723-01-01"],
 	[self,
 	  "period:[周]",
 	  ["[呉三桂]1"	,	"@F"	,	"name=[呉三桂];1673-11-21^Chinese1645"], # 陳舜臣 476
@@ -1223,79 +1215,32 @@ module When
 	  "period:[耿精忠]",
 	  ["[裕民]1"	,	"@F"	,	"name=[耿精忠];1674-10^Chinese1645", "1676-10="]
 	],
+	["[雍正]1"	,	"@A"	,	"name=[世宗];1723-01-01^Chinese1645"],
+	["[乾隆]1"	,	"@A"	,	"name=[高宗];1736-01-01", "1796-01-01"],
 	[self,
 	  "period:[林爽文]",
 	  ["[順天]1"	,	"@F"	,	"name=[林爽文];1786-11^Chinese1645", "1788-01="]
 	],
+	["[嘉慶]1"	,	"@A"	,	"name=[仁宗];1796-01-01^Chinese1645"],
+	["[道光]1"	,	"@A"	,	"name=[宣宗];1821-01-01"],
+	["[咸豊]1"	,	"@A"	,	"name=[文宗];1851-01-01", "1862-01-01"],
+	[self,
+	  "period:[太平天国]",
+	  ["[天暦]2"	,	"@F"	,	"name=[洪秀全];1852-1-1^TenrekiA", "1853-3-1^TenrekiB", "1868-7-1="]
+	],
 	[self,
 	  "period:[大成]",
 	  ["[洪徳]1"	,	"@F"	,	"name=[陳開];1855-08^Chinese1645", "1861-07="]
 	],
-	[self,
-	  "period:[太平天国]",
-	  ["[天暦]2"	,	"@F"	,	"name=[洪秀全];1852-1-1^TenrekiA", "1853-3-1^TenrekiB", "1868-7-1="]
-	]
+	["[同治]1"	,	"@A"	,	"name=[穆宗];1862-01-01^Chinese1645"],
+	["[光緒]1"	,	"@A"	,	"name=[徳宗];1875-01-01"],
+	["[宣統]1"	,	"@A"	,	"name=[末帝];1909-01-01", "1911-11-12="],
       ],
       [self,
 	"period:[中華民国=ja:%%<民国紀元>,ROC=en:Chinese_era_name#The_Republic_of_China_Era]",
 	["[民国=ja:%%<民国紀元>,ROC=en:Chinese_era_name#The_Republic_of_China_Era]1",
-				"@F",		"name=;1912-01-01^Gregorian"]
+				"@F",		"name=;1912-01-01^Gregorian?note=ChineseNotes"]
       ]
     ]]
-
-    # Chinese Luni-Solar Calendar Series for ChineseNote
-    ChineseLuniSolarSeries = [self, [
-      'namespace:[en=http://en.wikipedia.org/wiki/, ja=http://ja.wikipedia.org/wiki/]',
-      'locale:[=en:, ja=ja:, alias]',
-      'area:[ChineseLuniSolarSeries=, 中国の暦月=]',
-      ['[太初暦]1.01.01',     '@CR',    '1.01.01^Chinese::太初暦',  '85-01-01'], # 西暦が正になるところから開始(実際は-103.01.01)
-      ['[四分暦]85.01.01',    '@CR',   '85.01.01^Chinese::四分暦', '265-01-01'],
-      ['[乾象暦]222.01.01',   '@CR',  '222.01.01^Chinese::乾象暦', '281-01-01'],
-      ['[景初暦]237.01.01',   '@CR',  '237.01.01^Chinese::景初暦', '452-01-01'],
-      ['[元嘉暦]445.01.01',   '@CR',  '445.01.01^Chinese::元嘉暦', '510-01-01'],
-      ['[大明暦]510.01.01',   '@CR',  '510.01.01^Chinese::大明暦', '590-01-01'],
-      ['[三紀暦]384.01.01',   '@CR',  '384.01.01^Chinese::三紀暦', '418-01-01'],
-      ['[玄始暦]412.01.01',   '@CR',  '412.01.01^Chinese::玄始暦', '440-01-01'],
-      ['[玄始暦]452.01.01',   '@CR',  '452.01.01^Chinese::玄始暦', '523-01-01'],
-      ['[正光暦]523.01.01',   '@CR',  '523.01.01^Chinese::正光暦', '566-01-01'],
-      ['[興和暦]540.01.01',   '@CR',  '540.01.01^Chinese::興和暦', '551-01-01'],
-      ['[天保暦]551.01.01',   '@CR',  '551.01.01^Chinese::天保暦', '578-01-01'],
-      ['[天和暦]566.01.01',   '@CR',  '566.01.01^Chinese::天和暦', '579-01-01'],
-      ['[大象暦]579.01.01',   '@CR',  '579.01.01^Chinese::大象暦', '584-01-01'],
-      ['[開皇暦]584.01.01',   '@CR',  '584.01.01^Chinese::開皇暦', '597-01-01'],
-      ['[大業暦]597.01.01',   '@CR',  '597.01.01^Chinese::大業暦', '619-01-01'],
-      ['[麟徳暦]665.01.01',   '@CR',  '665.01.01^Chinese::麟徳暦', '729-01-01'],
-      ['[大衍暦]729.01.01',   '@CR',  '729.01.01^Chinese::大衍暦', '762-01-01'],
-      ['[五紀暦]762.01.01',   '@CR',  '762.01.01^Chinese::五紀暦', '784-01-01'],
-      ['[宣明暦]822.01.01',   '@CR',  '822.01.01^Chinese::宣明暦', '893-01-01']
-    ]]
-
-    # Chinese Solar Calendar Series for ChineseNote
-    ChineseSolarSeries = [self, [
-      'namespace:[en=http://en.wikipedia.org/wiki/, ja=http://ja.wikipedia.org/wiki/]',
-      'locale:[=en:, ja=ja:, alias]',
-      'area:[ChineseSolarSeries=, 中国の節月=]',
-      ['[太初暦]1.01.01',     '@CR',    '1-01-01^Chinese::太初暦(節月)',  '85-01-06'], # 西暦が正になるところから開始(実際は-103.01.15)
-      ['[四分暦]85.01.07',    '@CR',   '85-01-07^Chinese::四分暦(節月)', '264-12-28'],
-      ['[乾象暦]221.12.23',   '@CR',  '221-12-23^Chinese::乾象暦(節月)', '280-12-31'],
-      ['[景初暦]237.01.07',   '@CR',  '237-01-07^Chinese::景初暦(節月)', '451-12-31'],
-      ['[元嘉暦]444.12.22',   '@CR',  '444-12-22^Chinese::元嘉暦(節月)', '509-12-24'],
-      ['[大明暦]509.12.23',   '@CR',  '509-12-23^Chinese::大明暦(節月)', '590-01-08'],
-      ['[三紀暦]384.01.02',   '@CR',  '384-01-02^Chinese::三紀暦(節月)', '418-01-16'],
-      ['[玄始暦]411.12.26',   '@CR',  '411-12-26^Chinese::玄始暦(節月)', '440-01-15'],
-      ['[玄始暦]452.01.02',   '@CR',  '452-01-02^Chinese::玄始暦(節月)', '522-12-29'],
-      ['[正光暦]522.12.29',   '@CR',  '522-12-29^Chinese::正光暦(節月)', '566-01-05'],
-      ['[興和暦]539.12.22',   '@CR',  '539-12-22^Chinese::興和暦(節月)', '550-12-20'],
-      ['[天保暦]550.12.19',   '@CR',  '550-12-19^Chinese::天保暦(節月)', '577-12-21'],
-      ['[天和暦]566.01.05',   '@CR',  '566-01-05^Chinese::天和暦(節月)', '579-01-11'],
-      ['[大象暦]579.01.11',   '@CR',  '579-01-11^Chinese::大象暦(節月)', '584-01-15'],
-      ['[開皇暦]584.01.16',   '@CR',  '584-01-16^Chinese::開皇暦(節月)', '596-12-23'],
-      ['[大業暦]596.12.22',   '@CR',  '596-12-22^Chinese::大業暦(節月)', '618-12-19'],
-      ['[麟徳暦]664.01.01',   '@CR',  '664-01-01^Chinese::麟徳暦(節月)', '729-01-03'], # 年の始めに遡って開始(実際は12.21)
-      ['[大衍暦]729.01.03',   '@CR',  '729-01-03^Chinese::大衍暦(節月)', '761-12-29'],
-      ['[五紀暦]761.12.29',   '@CR',  '761-12-29^Chinese::五紀暦(節月)', '783-12-26'],
-      ['[正元暦]783.12.26',   '@CR',  '783-12-26^Chinese::正元暦(節月)', '807-01-11'],
-      ['[宣明暦]821.01.01',   '@CR',  '821-01-01^Chinese::宣明暦(節月)', '892-12-22']  # 年の始めに遡って開始(実際は12.27)
-    ]]
   end
 end

data/lib/when_exe/region/chinese_twin.rb

@@ -0,0 +1,798 @@
+# -*- coding: utf-8 -*-
+=begin
+  Copyright (C) 2011-2014 Takashi SUGA
+
+  You may use and/or modify this file according to the license described in the LICENSE.txt file included in this archive.
+=end
+
+module When
+
+  class TM::CalendarEra
+
+    # Chinese Luni-Solar Calendar Series for ChineseNote
+    ChineseLuniSolarSeries = [self, [
+      'namespace:[en=http://en.wikipedia.org/wiki/, ja=http://ja.wikipedia.org/wiki/]',
+      'locale:[=en:, ja=ja:, alias]',
+      'area:[ChineseLuniSolarSeries=, 中国の暦月=]',
+      ['[太初暦]1.01.01',      '@CR',   '1-01-01^ChineseTwin::太初暦',    '85-01-01'], # 西暦が正になるところから開始(実際は-103.01.01)
+      ['[四分暦]85.01.01',     '@CR',  '85-01-01^ChineseTwin::四分暦',    '265-01-01'],
+      ['[乾象暦]222.01.01',    '@CR', '222-01-01^ChineseTwin::乾象暦',    '281-01-01'],
+      ['[景初暦]237.01.01',    '@CR', '237-01-01^ChineseTwin::景初暦',    '452-01-01'],
+      ['[元嘉暦]445.01.01',    '@CR', '445-01-01^ChineseTwin::元嘉暦',    '510-01-01'],
+      ['[大明暦]510.01.01',    '@CR', '510-01-01^ChineseTwin::大明暦',    '590-01-01'],
+      ['[三紀暦]384.01.01',    '@CR', '384-01-01^ChineseTwin::三紀暦',    '418-01-01'],
+      ['[玄始暦]412.01.01',    '@CR', '412-01-01^ChineseTwin::玄始暦',    '440-01-01'],
+      ['[玄始暦]452.01.01',    '@CR', '452-01-01^ChineseTwin::玄始暦',    '523-01-01'],
+      ['[正光暦]523.01.01',    '@CR', '523-01-01^ChineseTwin::正光暦',    '566-01-01'],
+      ['[興和暦]540.01.01',    '@CR', '540-01-01^ChineseTwin::興和暦',    '551-01-01'],
+      ['[天保暦]551.01.01',    '@CR', '551-01-01^ChineseTwin::天保暦',    '578-01-01'],
+      ['[天和暦]566.01.01',    '@CR', '566-01-01^ChineseTwin::天和暦',    '579-01-01'],
+      ['[大象暦]579.01.01',    '@CR', '579-01-01^ChineseTwin::大象暦',    '584-01-01'],
+      ['[開皇暦]584.01.01',    '@CR', '584-01-01^ChineseTwin::開皇暦',    '597-01-01'],
+      ['[大業暦]597.01.01',    '@CR', '597-01-01^ChineseTwin::大業暦',    '619-01-01'],
+      ['[戊寅暦]619.01.01',    '@CR', '619-01-01^ChineseTwin::戊寅暦',    '645-01-01'],
+      ['[平朔戊寅暦]645.01.01','@CR', '645-01-01^ChineseTwin::平朔戊寅暦','665-01-01'],
+      ['[麟徳暦]665.01.01',    '@CR', '665-01-01^ChineseTwin::麟徳暦',    '729-01-01'],
+      ['[大衍暦]729.01.01',    '@CR', '729-01-01^ChineseTwin::大衍暦',    '762-01-01'],
+      ['[五紀暦]762.01.01',    '@CR', '762-01-01^ChineseTwin::五紀暦',    '784-01-01'],
+      ['[正元暦]784.01.01',    '@CR', '784-01-01^ChineseTwin::正元暦',    '807-01-01'],
+      ['[宣明暦]822.01.01',    '@CR', '822-01-01^ChineseTwin::宣明暦',    '893-01-01'],
+      ['[崇玄暦]893.01.01',    '@CR', '893-01-01^ChineseTwin::崇玄暦',    '956-01-01'],
+      ['[授時暦]1281.01.01',   '@CR','1281-01-01^ChineseTwin::授時暦',   '1368-01-01'],
+      ['[大統暦]1368.01.01',   '@CR','1368-01-01^ChineseTwin::大統暦',   '1645-01-01']
+    ]]
+
+    # Chinese Solar Calendar Series for ChineseNote
+    ChineseSolarSeries = [self, [
+      'namespace:[en=http://en.wikipedia.org/wiki/, ja=http://ja.wikipedia.org/wiki/]',
+      'locale:[=en:, ja=ja:, alias]',
+      'area:[ChineseSolarSeries=, 中国の節月=]',
+      ['[太初暦]1.01.01',     '@CR',    '1-01-01^ChineseTwin::太初暦(節月)',  '85-01-06'], # 西暦が正になるところから開始(実際は-103.01.15)
+      ['[四分暦]85.01.07',    '@CR',   '85-01-07^ChineseTwin::四分暦(節月)', '264-12-28'],
+      ['[乾象暦]221.12.23',   '@CR',  '221-12-23^ChineseTwin::乾象暦(節月)', '280-12-31'],
+      ['[景初暦]237.01.07',   '@CR',  '237-01-07^ChineseTwin::景初暦(節月)', '451-12-31'],
+      ['[元嘉暦]444.12.22',   '@CR',  '444-12-22^ChineseTwin::元嘉暦(節月)', '509-12-24'],
+      ['[大明暦]509.12.23',   '@CR',  '509-12-23^ChineseTwin::大明暦(節月)', '590-01-08'],
+      ['[三紀暦]384.01.02',   '@CR',  '384-01-02^ChineseTwin::三紀暦(節月)', '418-01-16'],
+      ['[玄始暦]411.12.26',   '@CR',  '411-12-26^ChineseTwin::玄始暦(節月)', '440-01-15'],
+      ['[玄始暦]452.01.02',   '@CR',  '452-01-02^ChineseTwin::玄始暦(節月)', '522-12-29'],
+      ['[正光暦]522.12.29',   '@CR',  '522-12-29^ChineseTwin::正光暦(節月)', '566-01-05'],
+      ['[興和暦]539.12.22',   '@CR',  '539-12-22^ChineseTwin::興和暦(節月)', '550-12-20'],
+      ['[天保暦]550.12.19',   '@CR',  '550-12-19^ChineseTwin::天保暦(節月)', '577-12-21'],
+      ['[天和暦]566.01.05',   '@CR',  '566-01-05^ChineseTwin::天和暦(節月)', '579-01-11'],
+      ['[大象暦]579.01.11',   '@CR',  '579-01-11^ChineseTwin::大象暦(節月)', '584-01-15'],
+      ['[開皇暦]584.01.16',   '@CR',  '584-01-16^ChineseTwin::開皇暦(節月)', '596-12-23'],
+      ['[大業暦]596.12.22',   '@CR',  '596-12-22^ChineseTwin::大業暦(節月)', '618-12-19'],
+      ['[戊寅暦]618.12.19',   '@CR',  '618-12-19^ChineseTwin::戊寅暦(節月)', '664-12-21'],
+      ['[麟徳暦]664.12.21',   '@CR',  '664-12-21^ChineseTwin::麟徳暦(節月)', '729-01-03'],
+      ['[大衍暦]729.01.03',   '@CR',  '729-01-03^ChineseTwin::大衍暦(節月)', '761-12-29'],
+      ['[五紀暦]761.12.29',   '@CR',  '761-12-29^ChineseTwin::五紀暦(節月)', '783-12-26'],
+      ['[正元暦]783.12.26',   '@CR',  '783-12-26^ChineseTwin::正元暦(節月)', '807-01-11'],
+      ['[宣明暦]821.01.01',   '@CR',  '821-01-01^ChineseTwin::宣明暦(節月)', '892-12-22'],  # 年の始めに遡って開始(実際は12.27)
+      ['[崇玄暦]892.12.22',   '@CR',  '892-12-22^ChineseTwin::崇玄暦(節月)', '956-01-15'],
+      ['[授時暦]1280.01.01',  '@CR', '1280-01-01^ChineseTwin::授時暦(節月)','1367-12-24'],
+      ['[大統暦]1367.12.24',  '@CR', '1367-12-24^ChineseTwin::大統暦(節月)','1644-12-24']
+    ]]
+  end
+
+  module CalendarTypes
+
+    _chinese_common ={
+      'day_epoch'                => 2188871 + 55.06,   # 暦元天正冬至のユリウス日
+      'year_epoch'               => 1281,              # 暦元の西暦年
+      'year_length'              => 365.2425,          # 暦元の冬至年 / 日
+      'lunation_length'          => 29.530593,         # 朔実(朔望月)
+      'lunation_shift'           => 20.185,            # 閏應(暦元前経朔から暦元天正冬至までの日数)
+      'lunar_mean_motion'        => 13.36875,          # 月平行(恒星天に対する月の平均運動 / 日)
+      'anomalistic_month_length' => 27.5546,           # 転終(近点月)
+      'anomalistic_month_shift'  => 13.1904,           # 転應(暦元前近/遠地点通過から暦元天正冬至までの日数)
+      'anomaly_method'           => 'a',               # (経朔-定朔)の計算方法(a:差分, b:微分, c:幾何学的補正)
+      'lunar_unit'               =>  27.5546 / (84*4), # 太陰遅速計算用招差法定数の時間の単位(限)
+      'solar_weight'             => 0,                 # (経朔-定朔)の計算で用いる実行差での太陽盈縮の重み(0:非考慮,1:考慮)
+      's'                        => [                  # 太陽盈縮計算用招差法定数
+        [  0       ... 88.909225,   0,       [0, +513_3200, -2_4600, -31]],
+        [ 88.909225...182.62125,  182.62125, [0, +487_0600, -2_2100, -27]],
+        [182.62125 ...276.333275, 182.62125, [0, -487_0600, +2_2100, +27]],
+        [276.333275.. 365.2425,   365.2425,  [0, -513_3200, +2_4600, +31]]
+      ],
+      'm'                       => [                   # 太陰遅速計算用招差法定数
+        [  0... 82,   0, [          +0, +1111_0000, -2_8100, -325       ]],
+        [ 82... 86,  84, [+5_4293_4424,         +0, -1_9292,   -0, +1484]],
+        [ 86...168, 168, [          +0, +1111_0000, -2_8100, -325       ]],
+        [168...250, 168, [          -0, -1111_0000, +2_8100, +325       ]],
+        [250...254, 252, [-5_4293_4424,         -0, +1_9292,   +0, -1484]],
+        [254.. 336, 336, [          -0, -1111_0000, +2_8100, +325       ]]
+      ]
+    }
+
+    ChineseTwin = [{}, When::BasicTypes::M17n, ChineseSolar.twin('ChineseTwin', [
+      "namespace:[en=http://en.wikipedia.org/wiki/, ja=http://ja.wikipedia.org/wiki/]",
+      "locale:[=ja:, en=en:, alias]",
+      "area:[中国,China]",
+
+      [ChineseLuniSolar,
+        'name:[黄帝暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1228331',
+        'intercalary_month:12'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[顓頊暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1171396&longitude_shift=-1/8',
+        'time_basis:+00,+#{P:12}',
+        'intercalary_month:9'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[夏暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1328411',
+        'intercalary_month:12'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[殷暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1149071',
+        'intercalary_month:12'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[周暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1128251',
+        'intercalary_month:12'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[魯暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1048991',
+        'intercalary_month:12'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[太初暦]',
+        'formula:MeanLunation?year_length=562120/1539&lunation_length=2392/81&day_epoch=1683431'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[四分暦]',
+        'formula:MeanLunation?year_length=1461/4&lunation_length=27759/940&day_epoch=1662611'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[乾象暦]',
+        'formula:MeanLunation?year_length=215130/589&lunation_length=43026/1457&day_epoch=-898129'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[景初暦]',
+        'formula:MeanLunation?year_length=673150/1843&lunation_length=134630/4559&day_epoch=+330191'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[三紀暦]',
+        'formula:MeanLunation?year_length=895220/2451&lunation_length=179044/6063&day_epoch=-28760989'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[玄始暦]',
+        'formula:MeanLunation?year_length=2629759/7200&lunation_length=2629759/89052&day_epoch=-20568349'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[元嘉暦]',
+        'formula:MeanLunation?year_length=111035/304&lunation_length=22207/752&day_epoch=-200089&longitude_shift=-1/12' # 春分の1ヶ月前
+      ],
+
+      [ChineseLuniSolar,
+        'name:[大明暦]',
+        'formula:MeanLunation?year_length=14423804/39491&lunation_length=116321/3939&day_epoch=-17080189'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[正光暦]',
+        'formula:MeanLunation?year_length=2213377/6060&lunation_length=2213377/74952&day_epoch=-59357929'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[興和暦]',
+        'formula:MeanLunation?year_length=6158017/16860&lunation_length=6158017/208530&day_epoch=-105462049'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[天保暦]',
+        'formula:MeanLunation?year_length=8641687/23660&lunation_length=8641687/292635&day_epoch=-38447089'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[天和暦]',
+        'formula:MeanLunation?year_length=8568631/23460&lunation_length=8568631/290160&day_epoch=-317950249'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[大象暦]',
+        'formula:MeanLunation?year_length=4745247/12992&lunation_length=1581749/53563&day_epoch=-13244449'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[開皇暦]',
+        'formula:MeanLunation?year_length=37605463/102960&lunation_length=5372209/181920&day_epoch=-1506155749'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[大業暦]',
+        'formula:MeanLunation?year_length=15573963/42640&lunation_length=33783/1144&day_epoch=-519493909'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[戊寅暦]',
+        'time_basis:+00,+#{P:00}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -58077529,
+            'year_length'              =>  '3456675/9464', # 365.0 + 2315/9464(度法)
+            'lunation_length'          =>  '384075/13006', #  29.0 + 6901/13006(日法)
+            'anomalistic_month_length' =>  '99775/3621',   #  27.0 + 16064/28968 (798200(暦周)/28968(暦法))
+            'rissei'                   =>  'a',
+            'method'                   =>  'C',
+            's'                        => [
+              #(先後數) 盈縮數
+              [    0.0,     0], # 冬至
+              [    0.0,  +896], # 大寒
+              [    0.0, +1294], # 小寒
+              [    0.0, +1694], # 立春
+              [    0.0, +1922], # 啓蟄
+              [    0.0, +2263], # 雨水
+              [    0.0, +2713], # 春分
+              [    0.0, +2213], # 清明
+              [    0.0, +1758], # 穀雨
+              [    0.0, +1403], # 立夏
+              [    0.0,  +848], # 小満
+              [    0.0,     0], # 芒種
+              [    0.0,  -739], # 夏至
+              [    0.0, -1365], # 小暑
+              [    0.0, -1821], # 大暑
+              [    0.0, -2109], # 立秋
+              [    0.0, -2149], # 処暑
+              [    0.0, -2491], # 白露
+              [    0.0, -2946], # 秋分
+              [    0.0, -2264], # 寒露
+              [    0.0, -1639], # 霜降
+              [    0.0, -1069], # 立冬
+              [    0.0,  -556], # 小雪
+              [    0.0,  -100]  # 大雪
+            ],          
+            'm'                       => [
+              #(変日差)   盈縮積分の差分(9037=章歳(676)+章月(8361))
+              [13006.0, -11341226.0/9037], #   １日
+              [13006.0, -10053632.0/9037], #   ２日
+              [13006.0,  -8557946.0/9037], #   ３日
+              [13006.0,  -6841146.0/9037], #   ４日
+              [13006.0,  -4903257.0/9037], #   ５日
+              [13006.0,  -2978403.0/9037], #   ６日
+              [13006.0,  -1053445.0/9037], #   ７日
+              [13006.0,  +1092498.0/9037], #   ８日
+              [13006.0,  +3238489.0/9037], #   ９日
+              [13006.0,  +5163376.0/9037], #   10日
+              [13006.0,  +6880164.0/9037], #   11日
+              [13006.0,  +8388868.0/9037], #   12日
+              [13006.0,  +9884554.0/9037], #   13日
+              [13006.0, +11172149.0/9037], #   14日
+              [13006.0, +10742961.0/9037], #   15日
+              [13006.0,  +9455368.0/9037], #   16日
+              [13006.0,  +7959678.0/9037], #   17日
+              [13006.0,  +6242886.0/9037], #   18日
+              [13006.0,  +4526094.0/9037], #   19日
+              [13006.0,  +2601205.0/9037], #   20日
+              [13006.0,   +663312.0/9037], #   21日
+              [13006.0,  -1482690.0/9037], #   22日
+              [13006.0,  -3407578.0/9037], #   23日
+              [13006.0,  -5332465.0/9037], #   24日
+              [13006.0,  -7036252.0/9037], #   25日
+              [13006.0,  -8753044.0/9037], #   26日
+              [13006.0, -10040638.0/9037], #   27日
+              [ 7212.4,  -6229880.0/9037]  #   28日
+            ]
+         }]
+        }
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[平朔戊寅暦]',
+        'formula:MeanLunation?year_length=3456675/9464&lunation_length=384075/13006&day_epoch=-58077529'
+      ],
+
+      [ChineseLuniSolar,
+        'name:[麟徳暦]',
+        'time_basis:+00,+#{P:00}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -96608689,
+            'year_length'              => '122357/335',
+            'lunation_length'          =>  '39571/1340',
+            'anomalistic_month_length' =>  '443077/16080', # 27.0 + (743.0+1.0/12)/1340,
+          # 'rissei'                   =>  'B',
+            'method'                   =>  '#{Method:A}',
+            's'                        => [
+              # 消息總  盈朒積    立成b    立成c
+              [    0.0,     0,  +3.9546, -0.0372], # 冬至
+              [ -722.0,   +54,  +3.4091, -0.0372], # 大寒
+              [-1340.0,  +100,  +2.8636, -0.0372], # 小寒
+              [-1854.0,  +138,  +2.3181, +0.0372], # 立春
+              [-2368.0,  +176,  +2.8636, +0.0372], # 啓蟄
+              [-2986.0,  +222,  +3.4091, +0.0372], # 雨水
+              [-3708.0,  +276,  -3.7220, +0.0329], # 春分
+              [-2986.0,  +222,  -3.2086, +0.0329], # 清明
+              [-2368.0,  +176,  -2.6952, +0.0329], # 穀雨
+              [-1854.0,  +138,  -2.1818, -0.0329], # 立夏
+              [-1340.0,  +100,  -2.6952, -0.0329], # 小満
+              [ -722.0,   +54,  -3.2086, -0.0329], # 芒種
+              [    0.0,     0,  -3.7220, +0.0329], # 夏至
+              [ +722.0,   -54,  -3.2086, +0.0329], # 小暑
+              [+1340.0,  -100,  -2.6952, +0.0329], # 大暑
+              [+1854.0,  -138,  -2.1818, -0.0329], # 立秋
+              [+2368.0,  -176,  -2.6952, -0.0329], # 処暑
+              [+2986.0,  -222,  -3.2086, -0.0329], # 白露
+              [+3708.0,  -276,  +3.9546, -0.0372], # 秋分
+              [+2986.0,  -222,  +3.4091, -0.0372], # 寒露
+              [+2368.0,  -176,  +2.8636, -0.0372], # 霜降
+              [+1854.0,  -138,  +2.3181, +0.0372], # 立冬
+              [+1340.0,  -100,  +2.8636, +0.0372], # 小雪
+              [ +722.0,   -54,  +3.4091, +0.0372], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 増減率
+              [1340.0,   -134],                    #   １日
+              [1340.0,   -117],                    #   ２日
+              [1340.0,    -99],                    #   ３日
+              [1340.0,    -78],                    #   ４日
+              [1340.0,    -56],                    #   ５日
+              [1340.0,    -33],                    #   ６日
+              [1191.0,     -9],                    #   ７日
+              [ 149.0,      0],                    #   ７日
+              [1340.0,    +14],                    #   ８日
+              [1340.0,    +38],                    #   ９日
+              [1340.0,    +62],                    #   10日
+              [1340.0,    +85],                    #   11日
+              [1340.0,   +104],                    #   12日
+              [1340.0,   +121],                    #   13日
+              [1042.0,   +102],                    #   14日
+              [ 298.0,    +29],                    #   14日
+              [1340.0,   +128],                    #   15日
+              [1340.0,   +115],                    #   16日
+              [1340.0,    +95],                    #   17日
+              [1340.0,    +74],                    #   18日
+              [1340.0,    +52],                    #   19日
+              [1340.0,    +28],                    #   20日
+              [ 892.0,     +4],                    #   21日
+              [ 448.0,      0],                    #   21日
+              [1340.0,    -20],                    #   22日
+              [1340.0,    -44],                    #   23日
+              [1340.0,    -68],                    #   24日
+              [1340.0,    -89],                    #   25日
+              [1340.0,   -108],                    #   26日
+              [1340.0,   -125],                    #   27日
+              [ 743.0+1.0/12, -71]                 #   28日
+            ]
+         }]
+        },
+        'doyo'   => (Rational( 4,15) +  244) / 1340
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[大衍暦]',
+        'time_basis:+00,+#{P:03}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -35412747829,
+            'year_length'              => '1110343/3040',
+            'lunation_length'          =>   '89773/3040',
+            'anomalistic_month_length' =>  '6701279/243200', # 27.0 +(1685.0+79.0/80)/3040,
+          # 'rissei'                   =>  'C',
+            's'                        => [
+              # 先後數  朓朒積    立成b    立成c
+              [    0.0,     0, +13.4524, -0.1886], # 冬至
+              [-2353.0,  +176, +10.5564, -0.1634], # 大寒
+              [-4198.0,  +314,  +8.0408, -0.1446], # 小寒
+              [-5588.0,  +418,  +5.8160, -0.1318], # 立春
+              [-6564.0,  +491,  +3.7987, -0.1240], # 雨水
+              [-7152.0,  +535,  +1.9265, -0.1240], # 啓蟄
+              [-7366.0,  +551,  -0.2048, -0.1178], # 春分
+              [-7152.0,  +535,  -1.9968, -0.1190], # 清明
+              [-6564.0,  +491,  -3.7956, -0.1240], # 穀雨
+              [-5588.0,  +418,  -5.6626, -0.1324], # 立夏
+              [-4198.0,  +314,  -7.6555, -0.1436], # 小満
+              [-2353.0,  +176,  -9.9405, -0.1436], # 芒種
+              [    0.0,     0, -12.0819, +0.1436], # 夏至
+              [+2353.0,  -176,  -9.7018, +0.1324], # 小暑
+              [+4198.0,  -314,  -7.5450, +0.1240], # 大暑
+              [+5588.0,  -418,  -5.5634, +0.1190], # 立秋
+              [+6564.0,  -491,  -3.7038, +0.1178], # 処暑
+              [+7152.0,  -535,  -1.8954, +0.1178], # 白露
+              [+7366.0,  -551,  +0.1783, +0.1240], # 秋分
+              [+7152.0,  -535,  +2.0042, +0.1318], # 寒露
+              [+6564.0,  -491,  +3.8950, +0.1446], # 霜降
+              [+5588.0,  -418,  +5.9214, +0.1634], # 立冬
+              [+4198.0,  -314,  +8.1610, +0.1886], # 小雪
+              [+2353.0,  -176, +10.9010, +0.1886], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 損益率
+              [3040.0,   +297],                    #   １日
+              [3040.0,   +259],                    #   ２日
+              [3040.0,   +220],                    #   ３日
+              [3040.0,   +180],                    #   ４日
+              [3040.0,   +139],                    #   ５日
+              [3040.0,    +97],                    #   ６日
+              [2701.0,    +48],                    #   ７日
+              [ 339.0,     -6],                    #   ７日
+              [3040.0,    -64],                    #   ８日
+              [3040.0,   -106],                    #   ９日
+              [3040.0,   -148],                    #   10日
+              [3040.0,   -189],                    #   11日
+              [3040.0,   -229],                    #   12日
+              [3040.0,   -267],                    #   13日
+              [2363.0,   -231],                    #   14日
+              [ 677.0,    -66],                    #   14日
+              [3040.0,   -289],                    #   15日
+              [3040.0,   -250],                    #   16日
+              [3040.0,   -211],                    #   17日
+              [3040.0,   -171],                    #   18日
+              [3040.0,   -130],                    #   19日
+              [3040.0,    -87],                    #   20日
+              [2024.0,    -36],                    #   21日
+              [1016.0,    +18],                    #   21日
+              [3040.0,    +73],                    #   22日
+              [3040.0,   +116],                    #   23日
+              [3040.0,   +157],                    #   24日
+              [3040.0,   +198],                    #   25日
+              [3040.0,   +237],                    #   26日
+              [3040.0,   +276],                    #   27日
+              [1686.0,   +165]                     #   28日
+            ]
+         }]
+        },
+        'doyo'   => (Rational(13,30) +  531) / 3040
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[五紀暦]',
+        'time_basis:+00,+#{P:06}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -96608689,
+            'year_length'              => '122357/335',
+            'lunation_length'          =>  '39571/1340',
+            'anomalistic_month_length' =>  '1366156/49580', # 27.0 + (743.0+5.0/37)/1340,
+          # 'rissei'                   =>  'C',
+            's'                        => [
+              # 先後數  朓朒積    立成b    立成c
+              [    0.0,     0,  +5.9668, -0.0843], # 冬至
+              [-1037.0,   +78,  +4.6652, -0.0721], # 大寒
+              [-1850.0,  +139,  +3.5656, -0.0653], # 小寒
+              [-2463.0,  +185,  +2.5583, -0.0590], # 立春
+              [-2893.0,  +217,  +1.6375, -0.0532], # 雨水
+              [-3152.0,  +236,  +0.8384, -0.0532], # 啓蟄
+              [-3246.0,  +243,  -0.0972, -0.0505], # 春分
+              [-3152.0,  +236,  -0.8480, -0.0534], # 清明
+              [-2893.0,  +217,  -1.6517, -0.0561], # 穀雨
+              [-2463.0,  +185,  -2.5057, -0.0584], # 立夏
+              [-1850.0,  +139,  -3.3781, -0.0643], # 小満
+              [-1037.0,   +78,  -4.3954, -0.0643], # 芒種
+              [    0.0,     0,  -5.3592, +0.0643], # 夏至
+              [+1037.0,   -78,  -4.2877, +0.0584], # 小暑
+              [+1850.0,  -139,  -3.3459, +0.0561], # 大暑
+              [+2463.0,  -185,  -2.4475, +0.0534], # 立秋
+              [+2893.0,  -217,  -1.5966, +0.0505], # 処暑
+              [+3152.0,  -236,  -0.8185, +0.0505], # 白露
+              [+3246.0,  -243,  +0.0858, +0.0532], # 秋分
+              [+3152.0,  -236,  +0.8505, +0.0590], # 寒露
+              [+2893.0,  -217,  +1.6943, +0.0653], # 霜降
+              [+2463.0,  -185,  +2.6205, +0.0721], # 立冬
+              [+1850.0,  -139,  +3.6007, +0.0843], # 小雪
+              [+1037.0,   -78,  +4.8330, +0.0843], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 損益率
+              [1340.0,   -135],                    #   １日
+              [1340.0,   -117],                    #   ２日
+              [1340.0,    -99],                    #   ３日
+              [1340.0,    -78],                    #   ４日
+              [1340.0,    -56],                    #   ５日
+              [1340.0,    -33],                    #   ６日
+              [1191.0,     -8],                    #   ７日
+              [ 149.0,     +1],                    #   ７日
+              [1340.0,    +14],                    #   ８日
+              [1340.0,    +38],                    #   ９日
+              [1340.0,    +62],                    #   10日
+              [1340.0,    +85],                    #   11日
+              [1340.0,   +103],                    #   12日
+              [1340.0,   +118],                    #   13日
+              [1042.0,   +105],                    #   14日
+              [ 298.0,    +30],                    #   14日
+              [1340.0,   +128],                    #   15日
+              [1340.0,   +115],                    #   16日
+              [1340.0,    +95],                    #   17日
+              [1340.0,    +74],                    #   18日
+              [1340.0,    +52],                    #   19日
+              [1340.0,    +28],                    #   20日
+              [ 892.0,     +6],                    #   21日
+              [ 448.0,     -3],                    #   21日
+              [1340.0,    -20],                    #   22日
+              [1340.0,    -42],                    #   23日
+              [1340.0,    -65],                    #   24日
+              [1340.0,    -89],                    #   25日
+              [1340.0,   -109],                    #   26日
+              [1340.0,   -125],                    #   27日
+              [ 743.0+5.0/37, -75]                 #   28日
+            ]
+         }]
+        },
+        'doyo'   => (Rational( 4,15) +  244) / 1340
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[正元暦]',
+        'time_basis:+00,+#{P:06}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -145149709,
+            'year_length'              => '399943/1095',       # 365.0 + 268/1095(通法)
+            'lunation_length'          =>  '32336/1095',       #  29.0 + 581/1095
+            'anomalistic_month_length' =>  '301720132/10950000', #  27.0 + 607.0132(轉終日)/1095 (301720132(轉終分)/10950000)
+            'rissei'                   =>  'c',
+            'method'                   =>  'C',
+            's'                        => [
+              # 先後數  朓朒積
+              [    0.0,     0], # 冬至
+              [ -848.0,   +63], # 大寒
+              [-1512.0,  +113], # 小寒
+              [-2013.0,  +150], # 立春
+              [-2364.0,  +176], # 雨水
+              [-2576.0,  +192], # 啓蟄
+              [-2653.0,  +198], # 春分
+              [-2576.0,  +192], # 清明
+              [-2364.0,  +176], # 穀雨
+              [-2013.0,  +150], # 立夏
+              [-1512.0,  +113], # 小満
+              [ -848.0,   +63], # 芒種
+              [    0.0,     0], # 夏至
+              [ +848.0,   -63], # 小暑
+              [+1512.0,  -113], # 大暑
+              [+2013.0,  -150], # 立秋
+              [+2364.0,  -176], # 処暑
+              [+2576.0,  -192], # 白露
+              [+2653.0,  -198], # 秋分
+              [+2576.0,  -192], # 寒露
+              [+2364.0,  -176], # 霜降
+              [+2013.0,  -150], # 立冬
+              [+1512.0,  -113], # 小雪
+              [ +848.0,   -63], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 損益率
+              [1095.0,  -110], #   １日
+              [1095.0,   -96], #   ２日
+              [1095.0,   -81], #   ３日
+              [1095.0,   -64], #   ４日
+              [1095.0,   -46], #   ５日
+              [1095.0,   -27], #   ６日
+              [ 973.0,    -7], #   ７日
+              [ 122.0,    +1], #   ７日
+              [1095.0,   +12], #   ８日
+              [1095.0,   +31], #   ９日
+              [1095.0,   +51], #   10日
+              [1095.0,   +68], #   11日
+              [1095.0,   +85], #   12日
+              [1095.0,   +96], #   13日
+              [ 851.0,   +87], #   14日
+              [ 244.0,   +25], #   14日
+              [1095.0,  +107], #   15日
+              [1095.0,   +94], #   16日
+              [1095.0,   +78], #   17日
+              [1095.0,   +61], #   18日
+              [1095.0,   +42], #   19日
+              [1095.0,   +23], #   20日
+              [ 729.0,    +5], #   21日
+              [ 366.0,    -2], #   21日
+              [1095.0,   -16], #   22日
+              [1095.0,   -35], #   23日
+              [1095.0,   -53], #   24日
+              [1095.0,   -71], #   25日
+              [1095.0,   -88], #   26日
+              [1095.0,  -102], #   27日
+              [ 607.0,   -68], #   28日
+              [ 366.0,   -42]  #   28日
+            ]
+         }]
+        }
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[宣明暦]',
+        'time_basis:+00,+#{P:06}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -2580308749,
+            'year_length'              => '3068055/8400',
+            'lunation_length'          =>  '248057/8400',
+            'anomalistic_month_length' =>  '23145819/840000', # 27.0 + 4658.19 / 8400,
+          # 'rissei'                   =>  'C',
+            's'                        => [
+              # 先後數  朓朒数    立成b    立成c
+              [     0.0,     0, +33.4511, -0.3695], # 冬至
+              [ -6000.0,  +449, +28.0389, -0.3606], # 大寒
+              [-11000.0,  +823, +22.6998, -0.3519], # 小寒
+              [-15000.0, +1122, +17.8923, -0.4068], # 立春
+              [-18000.0, +1346, +11.7966, -0.3998], # 雨水
+              [-19800.0, +1481,  +5.7986, -0.3998], # 啓蟄
+              [-20400.0, +1526,  -0.2433, -0.3779], # 春分
+              [-19800.0, +1481,  -6.1254, -0.3634], # 清明
+              [-18000.0, +1346, -12.2048, -0.2987], # 穀雨
+              [-15000.0, +1122, -16.9060, -0.2919], # 立夏
+              [-11000.0,  +823, -21.5362, -0.2854], # 小満
+              [ -6000.0,  +449, -26.0498, -0.2854], # 芒種
+              [     0.0,     0, -30.3119, +0.2854], # 夏至
+              [ +6000.0,  -449, -25.8126, +0.2919], # 小暑
+              [+11000.0,  -823, -21.2454, +0.2987], # 大暑
+              [+15000.0, -1122, -17.0296, +0.3634], # 立秋
+              [+18000.0, -1346, -11.4744, +0.3779], # 処暑
+              [+19800.0, -1481,  -5.6429, +0.3779], # 白露
+              [+20400.0, -1526,  +0.1432, +0.3998], # 秋分
+              [+19800.0, -1481,  +6.1488, +0.4068], # 寒露
+              [+18000.0, -1346, +12.6336, +0.3519], # 霜降
+              [+15000.0, -1122, +17.8043, +0.3606], # 立冬
+              [+11000.0,  -823, +23.0590, +0.3695], # 小雪
+              [ +6000.0,  -449, +28.4618, +0.3695], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 損益率
+              [ 8400.0,   +830],                    # 進１日
+              [ 8400.0,   +726],                    #   ２日
+              [ 8400.0,   +606],                    #   ３日
+              [ 8400.0,   +471],                    #   ４日
+              [ 8400.0,   +337],                    #   ５日
+              [ 8400.0,   +202],                    #   ６日
+              [ 7465.0,    +53],                    #   ７日
+              [  935.0,     -7],                    #   ７日
+              [ 8400.0,    -82],                    #   ８日
+              [ 8400.0,   -224],                    #   ９日
+              [ 8400.0,   -366],                    #   10日
+              [ 8400.0,   -509],                    #   11日
+              [ 8400.0,   -643],                    #   12日
+              [ 8400.0,   -748],                    #   13日
+              [ 6529.095, -646],                    #   14日
+              [ 8400.0,   -830],                    # 退１日
+              [ 8400.0,   -726],                    #   ２日
+              [ 8400.0,   -598],                    #   ３日
+              [ 8400.0,   -464],                    #   ４日
+              [ 8400.0,   -329],                    #   ５日
+              [ 8400.0,   -195],                    #   ６日
+              [ 7465.0,    -53],                    #   ７日
+              [  935.0,     +7],                    #   ７日
+              [ 8400.0,    +82],                    #   ８日
+              [ 8400.0,   +225],                    #   ９日
+              [ 8400.0,   +366],                    #   10日
+              [ 8400.0,   +501],                    #   11日
+              [ 8400.0,   +628],                    #   12日
+              [ 8400.0,   +740],                    #   13日
+              [ 6529.095, +646]                     #   14日
+            ]
+         }]
+        },
+        'doyo'   => (Rational( 1, 2) + 1468) / 8400
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[崇玄暦]',
+        'time_basis:+00,+#{P:06}',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, {
+            'formula'                  => f,
+            'day_epoch'                => -19701911689,
+            'year_length'              => '4930801/13500',     # 365.0+3301/13500(通法)
+            'lunation_length'          =>  '398663/13500',     #  29.0+7163/13500
+            'anomalistic_month_length' =>  '37198697/1350000', #  27.0+7486.97(轉終日)/13500
+            'rissei'                   =>  'c',
+            's'                        => [
+              # 盈縮分     朓朒積
+              [     0*1.35,     0], # 冬至
+              [ -7740*1.35,  +782], # 大寒
+              [-13809*1.35, +1395], # 小寒
+              [-18381*1.35, +1857], # 立春
+              [-21631*1.35, +2185], # 雨水
+              [-23608*1.35, +2385], # 啓蟄
+              [-24268*1.35, +2452], # 春分
+              [-23608*1.35, +2385], # 清明
+              [-21631*1.35, +2185], # 穀雨
+              [-18381*1.35, +1857], # 立夏
+              [-13809*1.35, +1395], # 小満
+              [ -7740*1.35,  +782], # 芒種
+              [     0*1.35,     0], # 夏至
+              [ +7740*1.35,  -782], # 小暑
+              [+13809*1.35, -1395], # 大暑
+              [+18381*1.35, -1857], # 立秋
+              [+21631*1.35, -2185], # 処暑
+              [+23608*1.35, -2385], # 白露
+              [+24268*1.35, -2452], # 秋分
+              [+23608*1.35, -2385], # 寒露
+              [+21631*1.35, -2185], # 霜降
+              [+18381*1.35, -1857], # 立冬
+              [+13809*1.35, -1395], # 小雪
+              [ +7740*1.35,  -782], # 大雪
+            ],
+            'm'                       => [
+              #(変日差) 損益率
+              [13500.0,  +1319], #   １日
+              [13500.0,  +1150], #   ２日
+              [13500.0,   +978], #   ３日
+              [13500.0,   +799], #   ４日
+              [13500.0,   +617], #   ５日
+              [13500.0,   +431], #   ６日
+              [11996.75,  +213], #   ７日
+              [ 1503.25,   -27], #   ７日
+              [13500.0,   -285], #   ８日
+              [13500.0,   -471], #   ９日
+              [13500.0,   -650], #   10日
+              [13500.0,   -840], #   11日
+              [13500.0,  -1017], #   12日
+              [13500.0,  -1185], #   13日
+              [10493.5,  -1032], #   14日
+              [ 3006.5,   -293], #   14日
+              [13500.0,  -1284], #   15日
+              [13500.0,  -1110], #   16日
+              [13500.0,   -941], #   17日
+              [13500.0,   -757], #   18日
+              [13500.0,   -578], #   19日
+              [13500.0,   -386], #   20日
+              [ 8990.25,  -160], #   21日
+              [ 4509.75,   +80], #   21日
+              [13500.0,   +324], #   22日
+              [13500.0,   +516], #   23日
+              [13500.0,   +697], #   24日
+              [13500.0,   +879], #   25日
+              [13500.0,  +1053], #   26日
+              [13500.0,  +1223], #   27日
+              [ 7487.0,   +737]  #   28日
+            ]
+         }]
+        }
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[授時暦]',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, _chinese_common.merge({
+            'formula'                  => f,
+            'year_delta'               => 1,   # 冬至年の変化率 / (10^(-6)日/年)
+            'year_span'                => 100  # 冬至年の改訂周期 / 年
+         })]
+        }
+       }
+      ],
+
+      [ChineseLuniSolar,
+        'name:[大統暦]',
+        {'formula'=>['12S', '1L'].map {|f| [
+          Ephemeris::ChineseTrueLunation, _chinese_common.merge({
+            'formula'                  => f,
+            'year_delta'               => 0,   # 冬至年の変化率 / (10^(-6)日/年)
+            'year_span'                => 1    # 冬至年の改訂周期 / 年
+         })]
+        }
+       }
+      ]
+    ])]
+  end
+end