zakuro 0.1.4 → 0.1.5

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

@@ -1,169 +0,0 @@
-# frozen_string_literal: true
-
-# :nodoc:
-module Zakuro
-  # :nodoc:
-  module Senmyou
-    #
-    # SolarAverage 常気（太陽軌道平均）
-    #
-    class SolarAverage
-      # @return [Remainder] 気策（24分の1年）
-      SOLAR_TERM_AVERAGE = Cycle::Remainder.new(day: 15, minute: 1835, second: 5)
-
-      #
-      # 初期化
-      #
-      # @param [Integer] western_year 西暦年
-      #
-      def initialize(western_year:)
-        @solar_term = SolarAverage.first_solar_term(western_year: western_year)
-      end
-
-      #
-      # 冬至から数えた1年データの月ごとに二十四節気を割り当てる
-      #
-      # @param [Array<Month>] annual_range 1年データ
-      #
-      # @return [Array<Month>] 1年データ
-      #
-      def set(annual_range:)
-        # 次月と比較しながら当月の二十四節気を決める
-        # NOTE: 最後の月は処理できない（=計算外の余分な月が最後に必要である）
-        annual_range.each_cons(2) do |(current_month, next_month)|
-          set_solar_term(
-            current_month: current_month,
-            next_month: next_month
-          )
-        end
-
-        annual_range
-      end
-
-      #
-      # 計算開始する二十四節気を求める
-      #
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [SolarTerm] 二十四節気
-      #
-      def self.first_solar_term(western_year:)
-        # 天正冬至
-        winter_solstice = WinterSolstice.calc(western_year: western_year)
-
-        # 二十四節気（冬至）
-        solar_term = Cycle::SolarTerm.new(index: 0, remainder: winter_solstice)
-
-        first_solar_term_index = SolarAverage.calc_fist_solar_term_index(western_year: western_year)
-
-        # 対象の二十四節気まで戻す
-        solar_term.prev_by_index(first_solar_term_index)
-
-        solar_term
-      end
-
-      #
-      # 計算開始する二十四節気番号を求める
-      #
-      # * 前提として入定気は冬至の手前にある
-      # * 例えば、定気が大雪であれば入定気は大雪の範囲内にある
-      # * 入定気は、定気の開始位置に重複しない限り、常に定気より後にある
-      # * 基本的に定気の一つ前から起算すれば、当時から求めた11月(閏10/閏11月)に二十四節気を割り当てられる
-      #
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [Integer] 二十四節気番号
-      #
-      def self.calc_fist_solar_term_index(western_year:)
-        # 天正閏余
-        winter_solstice_age = \
-          WinterSolstice.calc_moon_age(western_year: western_year)
-
-        # 入定気を求める
-        solar_location = SolarLocation.get(
-          solar_term: Cycle::SolarTerm.new(remainder: winter_solstice_age)
-        )
-
-        solar_term_index = solar_location.index
-
-        # 入定気の一つ後の二十四節気まで戻す（ただし11月経朔が二十四節気上にある場合は戻さない）
-        solar_term_index += 1 unless solar_location.remainder == Cycle::Remainder.new(total: 0)
-
-        solar_term_index
-      end
-
-      # :reek:TooManyStatements { max_statements: 7 }
-
-      #
-      # 月内（当月朔日から当月末日（来月朔日の前日）の間）に二十四節気があるか
-      # @note 大余60で一巡するため 以下2パターンがある
-      #   * current_month <= next_month : (二十四節気) >= current_month && (二十四節気) < next_month
-      #   * current_month > next_month  : (二十四節気) >= current_month || (二十四節気) < next_month
-      #
-      # @param [Remainder] solar_term 二十四節気
-      # @param [Remainder] current_month 月初
-      # @param [Remainder] next_month 月末
-      #
-      # @return [True] 対象の二十四節気がある
-      # @return [False] 対象の二十四節気がない
-      #
-      def self.in_solar_term?(solar_term:, current_month:, next_month:)
-        # 大余で比較する
-        target_time = solar_term.day
-        current_month_time = current_month.day
-        next_month_time = next_month.day
-        current_month_over = (target_time >= current_month_time)
-        next_month_under = (target_time < next_month_time)
-
-        return current_month_over && next_month_under if current_month_time <= next_month_time
-
-        current_month_over || next_month_under
-      end
-
-      private
-
-      # :reek:TooManyStatements { max_statements: 8 }
-
-      #
-      # 二十四節気を設定する
-      #
-      # @param [Month] current_month 当月
-      # @param [Month] next_month 次月
-      #
-      def set_solar_term(current_month:, next_month:)
-        # 安全策として無限ループは回避する
-        # * 最大試行回数：4回（設定なし => 設定あり => 設定あり => 設定なし）
-        # * 閏月は1回しか設定しない
-        # * 最大2回設定する（中気・節気）
-        (0..3).each do |_index|
-          in_range = SolarAverage.in_solar_term?(
-            solar_term: @solar_term.remainder, current_month: current_month.remainder,
-            next_month: next_month.remainder
-          )
-
-          # 範囲外
-          unless in_range
-            # 1つ以上設定されていれば切り上げる（一つ飛ばしで二十四節気を設定することはない）
-            break unless current_month.empty_solar_term?
-
-            next_solar_term
-            next
-          end
-
-          current_month.add_term(term: @solar_term.clone)
-          next_solar_term
-
-          # 宣明暦は最大2つまで
-          break if current_month.solar_term_size == 2
-        end
-      end
-
-      #
-      # 次の二十四節気に移る
-      #
-      def next_solar_term
-        @solar_term.next_term!
-      end
-    end
-  end
-end

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

@@ -1,213 +0,0 @@
-# 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,213 +0,0 @@
-# frozen_string_literal: true
-
-require_relative '../cycle/solar_term'
-
-# :nodoc:
-module Zakuro
-  # :nodoc:
-  module Senmyou
-    #
-    # SolarOrbit 太陽軌道
-    #
-    module SolarOrbit
-      # @return [Integer] 統法（1日=8400分）
-      DAY = 8400
-
-      #
-      # 24気損益眺朒（ちょうじく）数
-      #
-      module Adjustment
-        #
-        # Item 24気損益眺朒（ちょうじく）数
-        #
-        class Item
-          # @return [Integer] 眺朒（ちょうじく）積
-          attr_reader :stack
-          # @return [Integer] 眺朒（ちょうじく）数
-          attr_reader :per_term
-          # @return [Integer] 毎日差
-          attr_reader :per_day
-
-          #
-          # 初期化
-          #
-          # @param [Integer] stack 眺朒（ちょうじく）積
-          # @param [Integer] per_term 眺朒（ちょうじく）数
-          # @param [Integer] per_day 毎日差
-          #
-          def initialize(stack:, per_term:, per_day:)
-            @stack = stack
-            @per_term = per_term
-            @per_day = per_day
-          end
-
-          #
-          # 文字化
-          #
-          # @return [String] 文字
-          #
-          def to_s
-            "stack:#{@stack}, per_term:#{@per_term}, per_day:#{@per_day}"
-          end
-        end
-
-        # @return [Array<Item>] 24気損益眺朒（ちょうじく）数
-        LIST = {
-          touji: Item.new(stack: 0.0, per_term: +33.4511, per_day: -0.3695),        # 冬至（とうじ）
-          shoukan: Item.new(stack: +449.0, per_term: +28.0389, per_day: -0.3606),   # 小寒（しょうかん）
-          daikan: Item.new(stack: +823.0, per_term: +22.6998, per_day: -0.3519),    # 大寒（だいかん）
-          risshun: Item.new(stack: +1122.0, per_term: +17.8923, per_day: -0.4068),  # 立春（りっしゅん）
-          usui: Item.new(stack: +1346.0, per_term: +11.7966, per_day: -0.3998),     # 雨水（うすい）
-          keichitsu: Item.new(stack: +1481.0, per_term: +5.7986, per_day: -0.3998), # 啓蟄（けいちつ）
-          shunbun: Item.new(stack: +1526.0, per_term: -0.2433, per_day: -0.3779),   # 春分（しゅんぶん）
-          seimei: Item.new(stack: +1481.0, per_term: -6.1254, per_day: -0.3634),    # 清明（せいめい）
-          kokuu: Item.new(stack: +1346.0, per_term: -12.2048, per_day: -0.2987),    # 穀雨（こくう）
-          rikka: Item.new(stack: +1122.0, per_term: -16.9060, per_day: -0.2919),    # 立夏（りっか）
-          shouman: Item.new(stack: +823.0, per_term: -21.5362, per_day: -0.2854),   # 小満（しょうまん）
-          boushu: Item.new(stack: +449.0, per_term: -26.0498, per_day: -0.2854),    # 芒種（ぼうしゅ）
-          geshi: Item.new(stack: 0.0, per_term: -30.3119, per_day: +0.2854),        # 夏至（げし）
-          shousho: Item.new(stack: -449.0, per_term: -25.8126, per_day: +0.2919),   # 小暑（しょうしょ）
-          taisho: Item.new(stack: -823.0, per_term: -21.2454, per_day: +0.2987),    # 大暑（たいしょ）
-          risshuu: Item.new(stack: -1122.0, per_term: -17.0296, per_day: +0.3634),  # 立秋（りっしゅう）
-          shosho: Item.new(stack: -1346.0, per_term: -11.4744, per_day: +0.3779),   # 処暑（しょしょ）
-          hakuro: Item.new(stack: -1481.0, per_term: -5.6429, per_day: +0.3779),    # 白露（はくろ）
-          shuubun: Item.new(stack: -1526.0, per_term: +0.1432, per_day: +0.3998),   # 秋分（しゅうぶん）
-          kanro: Item.new(stack: -1481.0, per_term: +6.1488, per_day: +0.4068),     # 寒露（かんろ）
-          soukou: Item.new(stack: -1346.0, per_term: +12.6336, per_day: +0.3519),   # 霜降（そうこう）
-          rittou: Item.new(stack: -1122.0, per_term: +17.8043, per_day: +0.3606),   # 立冬（りっとう）
-          shousetsu: Item.new(stack: -823.0, per_term: +23.0590, per_day: +0.3695), # 小雪（しょうせつ）
-          taisetsu: Item.new(stack: -449.0, per_term: +28.4618, per_day: +0.3695)   # 大雪（たいせつ）
-        }.freeze
-      end
-
-      #
-      # 太陽の運行による補正値を算出する
-      #
-      # @param [SolarTerm] solar_term 入定気
-      #
-      # @return [Integer] 補正値
-      #
-      def self.calc_sun_orbit_value(solar_term:)
-        remainder = solar_term.remainder
-
-        adjustment = specify_solar_term_adjustment(index: solar_term.index)
-        # 損益率/眺朒（ちょうじく）数
-        # パラメータ:
-        #  a: 眺朒（ちょうじく）数の初日の値
-        #  b: 損益率初日の値
-        #  c: 損益率の毎日の差
-        #  n: 定気の日から数えた日数
-
-        day_stack = calc_day_stack(remainder: remainder, adjustment: adjustment)
-
-        month_stack = calc_month_stack(stack: adjustment.stack, day: remainder.day,
-                                       per_term: adjustment.per_term, per_day:
-                                       adjustment.per_day)
-
-        # 冬至であれば眺朒数がプラスになり続けて損益率が「益」で、小雪であればマイナスの眺朒数がプラスされ続けて「損」
-        month_stack + day_stack
-      end
-
-      #
-      # 損益率を求める
-      #
-      # @param [Remainder] remainder 入定気
-      # @param [Adjustment::Item] adjustment 24気損益眺朒（ちょうじく）数
-      #
-      # @return [Integer] 損益率
-      #
-      def self.calc_day_stack(remainder:, adjustment:)
-        per_term = adjustment.per_term
-        per_day = adjustment.per_day
-        sign, ratio = calc_ratio(day: remainder.day, per_term: per_term, per_day: per_day)
-
-        calc_day_stack_from_ratio(sign: sign, ratio: ratio,
-                                  minute: remainder.minute)
-      end
-      private_class_method :calc_day_stack
-
-      #
-      # 24気損益眺朒（ちょうじく）数を特定する
-      #
-      # @param [Integer] index 連番（二十四節気）
-      #
-      # @return [Adjustment::Item] 24気損益眺朒（ちょうじく）数
-      #
-      def self.specify_solar_term_adjustment(index:)
-        key = Cycle::SolarTerm::ORDER[index]
-        Adjustment::LIST[key].clone
-      end
-      private_class_method :specify_solar_term_adjustment
-
-      # :reek:TooManyStatements { max_statements: 6 }
-
-      #
-      # 大余に対応する損益率を求める
-      #   損益率 = b + n * c
-      #
-      # @param [Integer] day 大余
-      # @param [Integer] per_term 眺朒（ちょうじく）数
-      # @param [Integer] per_day 毎日差
-      #
-      # @return [Integer] 正負
-      # @return [Integer] 大余に対応する損益率
-      #
-      def self.calc_ratio(day:, per_term:, per_day:)
-        ratio = per_term + day * per_day
-        sign = 1
-        if ratio.negative?
-          sign = -1
-          ratio *= sign
-        end
-        # 小数点以下は無視する
-        ratio = ratio.floor
-
-        [sign, ratio]
-      end
-      private_class_method :calc_ratio
-
-      #
-      # 小余を含めた損益率を求める
-      #
-      # @param [Integer] sign 正負（大余に対応する損益率）
-      # @param [Integer] ratio 大余に対応する損益率
-      # @param [Integer] minute 小余
-      #
-      # @return [Integer] 小余を含めた損益率
-      #
-      def self.calc_day_stack_from_ratio(sign:, ratio:, minute:)
-        minute_stack = ratio * minute
-        day_stack = (minute_stack / DAY).floor
-        # 四捨五入
-        # NOTE 資料では「この余りが4200をこえていれば切り上げる」とあり「>=」とした
-        # 1612年の7月（慶長17年7月）が境界値4200だが、繰り上げを行なっていたため
-        day_stack += 1 if minute_stack % DAY >= (DAY / 2)
-        day_stack *= sign
-
-        day_stack
-      end
-      private_class_method :calc_day_stack_from_ratio
-
-      # :reek:LongParameterList { max_params: 4 }
-
-      #
-      # 眺朒（ちょうじく）数を求める
-      #   眺朒（ちょうじく）数 = a + (n * b) + (1/2)n(n-1)c
-      #
-      # @param [Integer] stack 眺朒（ちょうじく）積
-      # @param [Integer] day 大余
-      # @param [Integer] per_term 眺朒（ちょうじく）数
-      # @param [Integer] per_day 毎日差f
-      #
-      # @return [Integer] 眺朒（ちょうじく）数
-      #
-      def self.calc_month_stack(stack:, day:, per_term:, per_day:)
-        month_stack = stack + day * per_term + \
-                      (1 / 2.0) * (day * (day - 1) * per_day)
-        # 切り捨て（プラスマイナスに関わらず小数点以下切り捨て）
-        month_stack.negative? ? month_stack.ceil : month_stack.floor
-      end
-      private_class_method :calc_month_stack
-    end
-  end
-end