zakuro 0.0.2 → 0.1.3

data/lib/zakuro/version/senmyou/stella/solar_location.rb

@@ -0,0 +1,213 @@
+# frozen_string_literal: true
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    #
+    # SolarLocation 入定気演算
+    #
+    # 入定気とは、太陽がどの二十四節気に属するか、またその二十四節気の開始点からどれだけ離れているかを示す
+    #
+    module SolarLocation
+      #
+      # Interval 入気定日加減数（二十四節気の間隔）
+      #
+      module Interval
+        # @return [Hash<Symbol, Remainder>] 一覧
+        LIST = {
+          # 冬至（とうじ）・大雪（たいせつ）
+          touji: Cycle::Remainder.new(day: 14, minute: 4235, second: 5),
+          taisetsu: Cycle::Remainder.new(day: 14, minute: 4235, second: 5),
+          # 小寒（しょうかん）・小雪（しょうせつ）
+          shoukan: Cycle::Remainder.new(day: 14, minute: 5235, second: 5),
+          shousetsu: Cycle::Remainder.new(day: 14, minute: 5235, second: 5),
+          # 大寒（だいかん）・立冬（りっとう）
+          daikan: Cycle::Remainder.new(day: 14, minute: 6235, second: 5),
+          rittou: Cycle::Remainder.new(day: 14, minute: 6235, second: 5),
+          # 立春（りっしゅん）・霜降（そうこう）
+          risshun: Cycle::Remainder.new(day: 14, minute: 7235, second: 5),
+          soukou: Cycle::Remainder.new(day: 14, minute: 7235, second: 5),
+          # 雨水（うすい）・寒露（かんろ）
+          usui: Cycle::Remainder.new(day: 15, minute: 35, second: 5),
+          kanro: Cycle::Remainder.new(day: 15, minute: 35, second: 5),
+          # 啓蟄（けいちつ）・秋分（しゅうぶん）
+          keichitsu: Cycle::Remainder.new(day: 15, minute: 1235, second: 5),
+          shuubun: Cycle::Remainder.new(day: 15, minute: 1235, second: 5),
+          # 春分（しゅんぶん）・白露（はくろ）
+          shunbun: Cycle::Remainder.new(day: 15, minute: 2435, second: 5),
+          hakuro: Cycle::Remainder.new(day: 15, minute: 2435, second: 5),
+          # 清明（せいめい）・処暑（しょしょ）
+          seimei: Cycle::Remainder.new(day: 15, minute: 3635, second: 5),
+          shosho: Cycle::Remainder.new(day: 15, minute: 3635, second: 5),
+          # 穀雨（こくう）・立秋（りっしゅう）
+          kokuu: Cycle::Remainder.new(day: 15, minute: 4835, second: 5),
+          risshuu: Cycle::Remainder.new(day: 15, minute: 4835, second: 5),
+          # 立夏（りっか）・大暑（たいしょ）
+          rikka: Cycle::Remainder.new(day: 15, minute: 5835, second: 5),
+          taisho: Cycle::Remainder.new(day: 15, minute: 5835, second: 5),
+          # 小満（しょうまん）・小暑（しょうしょ）
+          shouman: Cycle::Remainder.new(day: 15, minute: 6835, second: 5),
+          shousho: Cycle::Remainder.new(day: 15, minute: 6835, second: 5),
+          # 芒種（ぼうしゅ）・夏至（げし）
+          boushu: Cycle::Remainder.new(day: 15, minute: 7835, second: 5),
+          geshi: Cycle::Remainder.new(day: 15, minute: 7835, second: 5)
+        }.freeze
+
+        # @return [Array<Remainder>] 索引
+        INDEXES = [
+          LIST[:touji],      #  0
+          LIST[:shoukan],    #  1
+          LIST[:daikan],     #  2
+          LIST[:risshun],    #  3
+          LIST[:usui],       #  4
+          LIST[:keichitsu],  #  5
+          LIST[:shunbun],    #  6
+          LIST[:seimei],     #  7
+          LIST[:kokuu],      #  8
+          LIST[:rikka],      #  9
+          LIST[:shouman],    # 10
+          LIST[:boushu],     # 11
+          LIST[:geshi],      # 12
+          LIST[:shousho],    # 13
+          LIST[:taisho],     # 14
+          LIST[:risshuu],    # 15
+          LIST[:shosho],     # 16
+          LIST[:hakuro],     # 17
+          LIST[:shuubun],    # 18
+          LIST[:kanro],      # 19
+          LIST[:soukou],     # 20
+          LIST[:rittou],     # 21
+          LIST[:shousetsu],  # 22
+          LIST[:taisetsu]    # 23
+        ].freeze
+      end
+
+      #
+      # 入定気を計算する
+      #
+      # * 定気（index）の指定がない場合は、11月の入定気を求める
+      # * 定気（index）の指定がある場合は、大余小余から適切な入定気を再計算する
+      #
+      # @param [SolarTerm] solar_term 入定気
+      #
+      # @return [SolarTerm] 入定気
+      #
+      def self.get(solar_term:)
+        if solar_term.invalid?
+          return calc_first_solar_term(
+            winter_solstice_age: solar_term.remainder
+          )
+        end
+
+        calc_next_solar_term_recursively(
+          solar_term: solar_term
+        )
+      end
+
+      # :reek:TooManyStatements { max_statements: 7 }
+
+      #
+      # 入定気（定気の開始点からの日時）と属する定気を計算する
+      #
+      # @param [Remainder] winter_solstice_age 天正冬至
+      #
+      # @return [SolarTerm] 二十四節気
+      #   SolarTerm.remainder : 入定気（定気の開始点からの日時）
+      #   SolarTerm.index : 定気
+      #
+      def self.calc_first_solar_term(winter_solstice_age:)
+        # 入定気の起算方法
+        # 概要:
+        #  * 太陽の運行による補正値は、二十四節気の気ごとに定められる
+        #  * 11月経朔の前にある気を求め、それから11月経朔との間隔を求める
+        #  * 気ごとの補正値と、気から11月経朔までにかかる補正値を求める
+        # 前提:
+        #  * 11月経朔に関わる二十四節気は、時系列から順に、小雪・大雪・冬至である
+        #  * 小雪〜大雪の間隔は小雪定数で、大雪〜冬至の間隔は大雪定数で決められている（24気損益眺朒（ちょうじく）数のこと）
+        #  * 11月経朔は、この小雪〜冬至の間のいずれかにある
+        # 計算:
+        # 2パターンある
+        #  (a) 大雪〜冬至にある場合
+        #   *「大雪定数 >= 天正閏余」の場合を指す
+        #   * * NOTE 資料では「より大きい（>）」とされるが、大雪そのものの場合は大雪から起算すべき
+        #   * この場合は、大雪〜経朔の間隔を求める
+        #  (b) 小雪〜大雪にある場合
+        #   *「大雪定数 < 天正閏余」の場合を指す
+        #   * この場合は、小雪〜経朔の間隔を求める
+
+        # NOTE: 上記パターンとは別に、稀だが立冬のパターンも存在する
+        # この場合は比較方法はそのままに立冬〜経朔の間隔を求める
+
+        rest = winter_solstice_age.clone
+        # 大雪（23）/小雪（22）/立冬（21）
+        [23, 22, 21].each do |index|
+          solar_term = prev_solar_term(winter_solstice_age: rest, index: index)
+
+          if solar_term.invalid?
+            rest = solar_term.remainder
+            next
+          end
+
+          return solar_term
+        end
+
+        # 立冬（21）を超える天正閏余は成立し得ない（1朔望月をはるかに超えることになる）
+        raise ArgumentError.new, 'invalid winster solstice age'
+      end
+      private_class_method :calc_first_solar_term
+
+      #
+      # 入気定日加減数で入定気を遡る
+      #
+      # @param [Remainder] winter_solstice_age 天正冬至
+      # @param [Integer] index 二十四節気の連番
+      #
+      # @return [SolarTerm] 二十四節気
+      #   SolarTerm.remainder : 入定気（定気の開始点からの日時）
+      #   SolarTerm.index : 定気（範囲外であれば-1とする）
+      #
+      def self.prev_solar_term(winter_solstice_age:, index:)
+        interval = Interval::INDEXES[index]
+        if winter_solstice_age > interval
+          # 入定気が確定しない（さらに前の定気まで遡れる）
+          return Cycle::SolarTerm.new(
+            remainder: winter_solstice_age.sub(interval),
+            index: -1
+          )
+        end
+
+        # 入定気が確定する
+        Cycle::SolarTerm.new(
+          remainder: interval.sub(winter_solstice_age),
+          index: index
+        )
+      end
+      private_class_method :prev_solar_term
+
+      # :reek:TooManyStatements { max_statements: 8 }
+
+      #
+      # 次の二十四節気を計算する
+      #
+      # @param [SolarTerm] solar_term 今回の二十四節気
+      #
+      # @return [SolarTerm] 次回の二十四節気
+      #
+      def self.calc_next_solar_term_recursively(solar_term:)
+        remainder = solar_term.remainder
+        index = solar_term.index
+        interval = Interval::INDEXES[index]
+        return solar_term if remainder < interval
+
+        remainder.sub!(interval)
+        index += 1
+        index = 0 if index >= Interval::INDEXES.size
+        calc_next_solar_term_recursively(
+          solar_term: Cycle::SolarTerm.new(remainder: remainder, index: index)
+        )
+      end
+      private_class_method :calc_next_solar_term_recursively
+    end
+  end
+end

data/lib/zakuro/version/senmyou/stella/solar_orbit.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
-require_relative '../base/solar_term'
+require_relative '../cycle/solar_term'
 
 # :nodoc:
 module Zakuro
@@ -13,79 +13,6 @@ module Zakuro
       # @return [Integer] 統法（1日=8400分）
       DAY = 8400
 
-      #
-      # Interval 入気定日加減数（二十四節気の間隔）
-      #
-      module Interval
-        # @return [Hash<Symbol, Remainder>] 一覧
-        LIST = {
-          # 冬至（とうじ）・大雪（たいせつ）
-          touji: Remainder.new(day: 14, minute: 4235, second: 5),
-          taisetsu: Remainder.new(day: 14, minute: 4235, second: 5),
-          # 小寒（しょうかん）・小雪（しょうせつ）
-          shoukan: Remainder.new(day: 14, minute: 5235, second: 5),
-          shousetsu: Remainder.new(day: 14, minute: 5235, second: 5),
-          # 大寒（だいかん）・立冬（りっとう）
-          daikan: Remainder.new(day: 14, minute: 6235, second: 5),
-          rittou: Remainder.new(day: 14, minute: 6235, second: 5),
-          # 立春（りっしゅん）・霜降（そうこう）
-          risshun: Remainder.new(day: 14, minute: 7235, second: 5),
-          soukou: Remainder.new(day: 14, minute: 7235, second: 5),
-          # 雨水（うすい）・寒露（かんろ）
-          usui: Remainder.new(day: 15, minute: 35, second: 5),
-          kanro: Remainder.new(day: 15, minute: 35, second: 5),
-          # 啓蟄（けいちつ）・秋分（しゅうぶん）
-          keichitsu: Remainder.new(day: 15, minute: 1235, second: 5),
-          shuubun: Remainder.new(day: 15, minute: 1235, second: 5),
-          # 春分（しゅんぶん）・白露（はくろ）
-          shunbun: Remainder.new(day: 15, minute: 2435, second: 5),
-          hakuro: Remainder.new(day: 15, minute: 2435, second: 5),
-          # 清明（せいめい）・処暑（しょしょ）
-          seimei: Remainder.new(day: 15, minute: 3635, second: 5),
-          shosho: Remainder.new(day: 15, minute: 3635, second: 5),
-          # 穀雨（こくう）・立秋（りっしゅう）
-          kokuu: Remainder.new(day: 15, minute: 4835, second: 5),
-          risshuu: Remainder.new(day: 15, minute: 4835, second: 5),
-          # 立夏（りっか）・大暑（たいしょ）
-          rikka: Remainder.new(day: 15, minute: 5835, second: 5),
-          taisho: Remainder.new(day: 15, minute: 5835, second: 5),
-          # 小満（しょうまん）・小暑（しょうしょ）
-          shouman: Remainder.new(day: 15, minute: 6835, second: 5),
-          shousho: Remainder.new(day: 15, minute: 6835, second: 5),
-          # 芒種（ぼうしゅ）・夏至（げし）
-          boushu: Remainder.new(day: 15, minute: 7835, second: 5),
-          geshi: Remainder.new(day: 15, minute: 7835, second: 5)
-        }.freeze
-
-        # @return [Array<Remainder>] 索引
-        INDEXES = [
-          LIST[:touji],      #  0
-          LIST[:shoukan],    #  1
-          LIST[:daikan],     #  2
-          LIST[:risshun],    #  3
-          LIST[:usui],       #  4
-          LIST[:keichitsu],  #  5
-          LIST[:shunbun],    #  6
-          LIST[:seimei],     #  7
-          LIST[:kokuu],      #  8
-          LIST[:rikka],      #  9
-          LIST[:shouman],    # 10
-          LIST[:boushu],     # 11
-          LIST[:geshi],      # 12
-          LIST[:shousho],    # 13
-          LIST[:taisho],     # 14
-          LIST[:risshuu],    # 15
-          LIST[:shosho],     # 16
-          LIST[:hakuro],     # 17
-          LIST[:shuubun],    # 18
-          LIST[:kanro],      # 19
-          LIST[:soukou],     # 20
-          LIST[:rittou],     # 21
-          LIST[:shousetsu],  # 22
-          LIST[:taisetsu]    # 23
-        ].freeze
-      end
-
       #
       # 24気損益眺朒（ちょうじく）数
       #
@@ -153,118 +80,10 @@ module Zakuro
         }.freeze
       end
 
-      #
-      # 二十四節気 と 補正値 を計算する
-      #
-      # @param [SolarTerm] solar_term 二十四節気
-      #
-      # @return [SolarTerm] 二十四節気
-      # @return [Integer] 補正値
-      #
-      def self.calc_term_and_orbit_value(solar_term:)
-        remainder = calc_solar_term_by_remainder(
-          solar_term: solar_term
-        )
-        value = calc_sun_orbit_value(
-          solar_term: remainder
-        )
-        [remainder, value]
-      end
-
-      # :reek:ControlParameter and :reek:BooleanParameter
-
-      #
-      # 二十四節気を計算する
-      #
-      # @param [SolarTerm] solar_term 二十四節気
-      #
-      # @return [SolarTerm] 二十四節気
-      #
-      def self.calc_solar_term_by_remainder(solar_term:)
-        if solar_term.index.negative?
-          return calc_first_solar_term(
-            winter_solstice_age: solar_term.remainder
-          )
-        end
-
-        calc_next_solar_term_recursively(
-          solar_term: solar_term
-        )
-      end
-
-      # :reek:TooManyStatements { max_statements: 8 }
-
-      #
-      # 入定気（定気の開始点からの日時）と属する定気を計算する
-      #
-      # @param [Remainder] winter_solstice_age 天正冬至
-      #
-      # @return [SolarTerm] 二十四節気
-      #   SolarTerm.remainder : 入定気（定気の開始点からの日時）
-      #   SolarTerm.index : 定気
-      #
-      def self.calc_first_solar_term(winter_solstice_age:)
-        # 入定気の起算方法
-        # 概要:
-        #  * 太陽の運行による補正値は、二十四節気の気ごとに定められる
-        #  * 11月経朔の前にある気を求め、それから11月経朔との間隔を求める
-        #  * 気ごとの補正値と、気から11月経朔までにかかる補正値を求める
-        # 前提:
-        #  * 11月経朔に関わる二十四節気は、時系列から順に、小雪・大雪・冬至である
-        #  * 小雪〜大雪の間隔は小雪定数で、大雪〜冬至の間隔は大雪定数で決められている（24気損益眺朒（ちょうじく）数のこと）
-        #  * 11月経朔は、この小雪〜冬至の間のいずれかにある
-        # 計算:
-        # 2パターンある
-        #  (a) 大雪〜冬至にある場合
-        #   *「大雪定数 >= 天正閏余」の場合を指す
-        #   * * NOTE 資料では「より大きい（>）」とされるが、大雪そのものの場合は大雪から起算すべき
-        #   * この場合は、大雪〜経朔の間隔を求める
-        #  (b) 小雪〜大雪にある場合
-        #   *「大雪定数 < 天正閏余」の場合を指す
-        #   * この場合は、小雪〜経朔の間隔を求める
-        taisetsu = 23
-        taisetsu_interval = Interval::INDEXES[taisetsu]
-
-        if winter_solstice_age > taisetsu_interval
-          # (b)
-          shousetsu = 22
-          diff = winter_solstice_age.sub(taisetsu_interval)
-
-          return SolarTerm.new(remainder: Interval::INDEXES[shousetsu].sub(diff),
-                               index: shousetsu)
-        end
-        # (a)
-        SolarTerm.new(remainder: taisetsu_interval.sub(winter_solstice_age),
-                      index: taisetsu)
-      end
-
-      # :reek:TooManyStatements { max_statements: 8 }
-
-      #
-      # 次の二十四節気を計算する
-      #
-      # @param [SolarTerm] solar_term 今回の二十四節気
-      #
-      # @return [SolarTerm] 次回の二十四節気
-      #
-      def self.calc_next_solar_term_recursively(solar_term:)
-        remainder = solar_term.remainder
-        index = solar_term.index
-        interval = Interval::INDEXES[index]
-        return solar_term if remainder < interval
-
-        remainder.sub!(interval)
-        index += 1
-        index = 0 if index >= Interval::INDEXES.size
-        calc_next_solar_term_recursively(
-          solar_term: SolarTerm.new(remainder: remainder, index: index)
-        )
-      end
-
       #
       # 太陽の運行による補正値を算出する
       #
-      # @param [SolarTerm] solar_term 二十四節気
+      # @param [SolarTerm] solar_term 入定気
       #
       # @return [Integer] 補正値
       #
@@ -302,10 +121,8 @@ module Zakuro
         per_day = adjustment.per_day
         sign, ratio = calc_ratio(day: remainder.day, per_term: per_term, per_day: per_day)
 
-        day_stack = calc_day_stack_from_ratio(sign: sign, ratio: ratio,
-                                              minute: remainder.minute)
-
-        day_stack
+        calc_day_stack_from_ratio(sign: sign, ratio: ratio,
+                                  minute: remainder.minute)
       end
       private_class_method :calc_day_stack
 
@@ -317,7 +134,7 @@ module Zakuro
       # @return [Adjustment::Item] 24気損益眺朒（ちょうじく）数
       #
       def self.specify_solar_term_adjustment(index:)
-        key = SolarTerm::ORDER[index]
+        key = Cycle::SolarTerm::ORDER[index]
         Adjustment::LIST[key].clone
       end
       private_class_method :specify_solar_term_adjustment
@@ -388,9 +205,7 @@ module Zakuro
         month_stack = stack + day * per_term + \
                       (1 / 2.0) * (day * (day - 1) * per_day)
         # 切り捨て（プラスマイナスに関わらず小数点以下切り捨て）
-        month_stack = month_stack.negative? ? month_stack.ceil : month_stack.floor
-
-        month_stack
+        month_stack.negative? ? month_stack.ceil : month_stack.floor
       end
       private_class_method :calc_month_stack
     end