zakuro 0.1.0 → 0.1.5

data/lib/zakuro/version/senmyou/range/annual_range.rb

@@ -1,184 +1,111 @@
 # frozen_string_literal: true
 
 require_relative '../../../output/logger'
-require_relative '../base/remainder'
-require_relative '../monthly/initialized_month'
-require_relative '../base/solar_term'
+require_relative '../cycle/remainder'
+require_relative '../cycle/solar_term'
+require_relative '../../../calculation/monthly/initialized_month'
 require_relative '../monthly/lunar_phase'
-require_relative '../stella/solar_orbit'
-require_relative '../stella/solar_average'
-require_relative '../stella/lunar_orbit'
+require_relative '../stella/lunar/location'
+require_relative '../stella/lunar/value'
+require_relative '../stella/solar/average'
+require_relative '../stella/solar/location'
+require_relative '../stella/solar/value'
+require_relative '../stella/origin/lunar_age'
+require_relative '../stella/origin/average_november'
 
 # :nodoc:
 module Zakuro
   # :nodoc:
   module Senmyou
-    #
-    # AnnualRange 年間範囲
-    #
-    module AnnualRange
-      # @return [Logger] ロガー
-      LOGGER = Logger.new(location: 'annual_range')
-
-      # :reek:TooManyStatements { max_statements: 6 }
-
-      #
-      # 11月定朔（冬至が含まれる月の1日：補正済）を求める
-      #
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [Remainder] 11月定朔
-      #
-      def self.calc_last_november_1st(western_year:)
-        # 天正閏余
-        winter_solstice_age = \
-          WinterSolstice.calc_moon_age(western_year: western_year)
-        # 11月経朔
-        november_1st = \
-          WinterSolstice.calc_averaged_last_november_1st(western_year: western_year)
-        # 11月定朔
-
-        # 補正
-        correction_value = correction_value_on_last_november_1st(
-          winter_solstice_age: winter_solstice_age,
-          western_year: western_year
-        )
-
-        result = november_1st.add(Remainder.new(day: 0, minute: correction_value,
-                                                second: 0))
-        # 進朔
-        result.up_on_new_moon!
-        result
-      end
-
-      # :reek:TooManyStatements { max_statements: 6 }
-
-      #
-      # 一覧取得する
+    # :nodoc:
+    module Range
       #
-      #   * 対象年に対して、前年11月-当年11月までを出力する
-      #   * 対象年（西暦）と計算年（元号x年）の紐付けは行わない
+      # AnnualRange 年間範囲
       #
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [Array<Month>] 1年データ
-      #
-      def self.collect_annual_range_after_last_november_1st(western_year:)
-        annual_range = initialized_annual_range(western_year: western_year)
-
-        apply_big_and_small_of_the_month(annual_range: annual_range)
+      module AnnualRange
+        # @return [Output::Logger] ロガー
+        LOGGER = Output::Logger.new(location: 'annual_range')
 
-        SolarAverage.set_solar_terms_into_annual_range(western_year: western_year,
-                                                       annual_range: annual_range)
+        # :reek:TooManyStatements { max_statements: 6 }
 
-        # 月間隔を取得するためだけの末尾要素を削除
-        annual_range.pop
-
-        adjust_leap_month(annual_range: annual_range)
-
-        annual_range
-      end
+        #
+        # 一覧取得する
+        #
+        #   * 対象年に対して、前年11月-当年11月までを出力する
+        #   * 対象年（西暦）と計算年（元号x年）の紐付けは行わない
+        #
+        # @param [Context] context 暦コンテキスト
+        # @param [Integer] western_year 西暦年
+        #
+        # @return [Array<Month>] 1年データ
+        #
+        def self.get(context:, western_year:)
+          annual_range = initialized_annual_range(context: context, western_year: western_year)
 
-      #
-      # 11月定朔の補正値を求める
-      #
-      # @param [Remainder] winter_solstice_age 天正閏余
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [Integer] 補正値
-      #
-      def self.correction_value_on_last_november_1st(winter_solstice_age:, western_year:)
-        # 補正
-        solar_term = SolarTerm.new(
-          remainder: winter_solstice_age
-        )
-        solar_term = \
-          SolarOrbit.calc_solar_term_by_remainder(
-            solar_term: solar_term
-          )
+          apply_big_and_small_of_the_month(annual_range: annual_range)
 
-        moon_remainder, is_forward = LunarOrbit.calc_moon_point(
-          remainder: winter_solstice_age, western_year: western_year
-        )
+          solar_average = Solar::Average.new(western_year: western_year)
+          solar_average.set(annual_range: annual_range)
 
-        SolarOrbit.calc_sun_orbit_value(solar_term: solar_term) +
-          LunarOrbit.calc_moon_orbit_value(remainder_month: moon_remainder,
-                                           is_forward: is_forward)
-      end
-      private_class_method :correction_value_on_last_november_1st
+          # 月間隔を取得するためだけの末尾要素を削除
+          annual_range.pop
 
-      #
-      # 1年データを取得する
-      #
-      # @param [Integer] western_year 西暦年
-      #
-      # @return [Array<Month>] 1年データ
-      #
-      def self.initialized_annual_range(western_year:)
-        result = []
-        lunar_phase = LunarPhase.new(western_year: western_year)
-
-        is_last_year = true
-
-        monthes = [11, 12] + [*1..12]
-
-        monthes.each do |month|
-          LOGGER.debug('---', "month: #{month}", "is_last_year: #{is_last_year}")
-
-          adjusted = lunar_phase.next_month
-
-          result.push(
-            InitializedMonth.new(month_label: MonthLabel.new(number: month),
-                                 first_day: FirstDay.new(remainder: adjusted),
-                                 is_last_year: is_last_year, phase_index: 0)
-          )
-          is_last_year = false if month == 12
+          initialize_month_label(annual_range: annual_range)
         end
-        result
-      end
-      private_class_method :initialized_annual_range
 
-      #
-      # 1年データの各月に月の大小を設定する
-      #
-      # @param [Array<Month>] annual_range 1年データ
-      #
-      def self.apply_big_and_small_of_the_month(annual_range:)
-        annual_range.each_with_index do |range, index|
-          # 最後は比較対象がないためスキップする（=計算外の余分な月が最後に必要である）
-          next if index == annual_range.size - 1
-
-          next_month = annual_range[index + 1]
-          range.eval_many_days(next_month_day: next_month.remainder.day)
+        #
+        # 1年データを取得する
+        #
+        # @param [Context] context 暦コンテキスト
+        # @param [Integer] western_year 西暦年
+        #
+        # @return [Array<Month>] 1年データ
+        #
+        def self.initialized_annual_range(context:, western_year:)
+          result = []
+          lunar_phase = Monthly::LunarPhase.new(western_year: western_year)
+
+          # 14ヶ月分を生成する（閏年で最大13ヶ月 + 末月の大小/二十四節気を求めるために必要な月）
+          (0..13).each do |_index|
+            adjusted = lunar_phase.next_month
+
+            result.push(
+              Calculation::Monthly::InitializedMonth.new(
+                context: context,
+                month_label: Calculation::Monthly::MonthLabel.new,
+                first_day: Calculation::Monthly::FirstDay.new(remainder: adjusted),
+                phase_index: 0
+              )
+            )
+          end
+
+          result
         end
-      end
-      private_class_method :apply_big_and_small_of_the_month
-
-      # :reek:TooManyStatements { max_statements: 10 }
-
-      #
-      # 閏月が存在した場合に以降の月を1つずつ減らす
-      # @example 7,8,9 と続く月の8月が閏の場合、7, 閏7, 8 となる
-      #
-      # @param [Array<Month>] annual_range 1年データ
-      #
-      def self.adjust_leap_month(annual_range:)
-        # 閏による月の再調整を行う
-        leaped = false
-        annual_range.each_with_index do |month, index|
-          month.eval_leaped
-          # NOTE: 初回閏月（閏11月）は前回月が存在しないため調整外
-          leaped = true if month.leaped? && !index.zero?
-
-          next unless leaped
-
-          # NOTE: 常気法では閏月は2-3年に一度のため、1年に二度発生しない前提
-
-          # 閏の分だけ1ヶ月ずらす
-          month.back_to_last_month
+        private_class_method :initialized_annual_range
+
+        #
+        # 1年データの各月に月の大小を設定する
+        #
+        # @param [Array<Month>] annual_range 1年データ
+        #
+        def self.apply_big_and_small_of_the_month(annual_range:)
+          # NOTE: 最後の月は処理できない（=計算外の余分な月が最後に必要である）
+          annual_range.each_cons(2) do |(current_month, next_month)|
+            current_month.eval_many_days(next_month_day: next_month.remainder.day)
+          end
+        end
+        private_class_method :apply_big_and_small_of_the_month
+
+        #
+        # 月表示情報を更新する
+        #
+        # @param [Array<Month>] annual_range 1年データ
+        #
+        def self.initialize_month_label(annual_range:)
+          annual_range.each(&:rename_month_label_by_solar_term)
         end
+        private_class_method :initialize_month_label
       end
-      private_class_method :adjust_leap_month
     end
   end
 end

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

@@ -1,9 +1,10 @@
 # frozen_string_literal: true
 
 require 'date'
-require_relative '../abstract_version'
 require_relative '../../era/western'
-require_relative 'summary/single'
+require_relative '../abstract_version'
+require_relative '../context'
+require_relative '../../calculation/summary/single'
 
 # :nodoc:
 module Zakuro
@@ -18,16 +19,21 @@ module Zakuro
       # @return [True] リリースあり
       RELEASE = true
 
+      # @return [String] 暦クラス名
+      VERSION_NAME = 'Senmyou'
+
       #
       # 西暦日から和暦日に変換する
       #
       # @param [Date] western_date 西暦日
       #
-      # @return [Result::SingleDay] 和暦日
+      # @return [Result::Single] 和暦日
       #
       def self.to_japan_date(western_date:)
         date = Western::Calendar.create(date: western_date)
-        Single.get(date: date)
+
+        context = Context.new(version_name: VERSION_NAME)
+        Calculation::Summary::Single.get(context: context, date: date)
       end
     end
   end

data/lib/zakuro/version/senmyou/stella/lunar/adjustment.rb

@@ -0,0 +1,237 @@
+# frozen_string_literal: true
+
+require_relative '../../const/number'
+
+# :nodoc:
+module Zakuro
+  # :nodoc:
+  module Senmyou
+    # :nodoc:
+    module Lunar
+      #
+      # Adjustment 補正値情報
+      #
+      module Adjustment
+        # @return [Integer] 遠/近の地点での中間
+        HALF_DAYS = [7].freeze
+
+        #
+        # Row 行情報
+        #
+        class Row
+          # @return [True] 進（遠地点より数える）
+          # @return [False] 退（近地点より数える）
+          attr_reader :forward
+          # @return [Integer] 入暦（1-14）
+          attr_reader :day
+          # @return [Range] 小余範囲
+          attr_reader :range
+          # @return [Value] 補正値
+          attr_reader :value
+
+          #
+          # 初期化
+          #
+          # @param [True, False] forward 進（遠地点より数える）/退（近地点より数える）
+          # @param [Integer] day 入暦（1-14）
+          # @param [Range] range 小余範囲
+          # @param [Value] value 補正値
+          #
+          def initialize(forward:, day:, range:, value:)
+            @forward = forward
+            @day = day
+            @range = range
+            @value = value
+          end
+
+          # :reek:ControlParameter
+
+          #
+          # 一致するか
+          #
+          # @param [True, False] forward 進（遠地点より数える）/退（近地点より数える）
+          # @param [Integer] day 入暦（1-14）
+          # @param [Integer] minute 小余
+          #
+          # @return [True] 一致
+          # @return [False] 不一致
+          #
+          def match?(forward:, day:, minute:)
+            return false unless @forward == forward
+
+            return false unless @day == day
+
+            return false unless @range.include?(minute: minute)
+
+            true
+          end
+
+          #
+          # 分母を返す
+          #
+          # @return [Integer] 分母
+          #
+          def denominator
+            @range.denominator
+          end
+        end
+
+        #
+        # Range 小余範囲
+        #
+        class Range
+          # @return [Integer] 下限
+          MIN = 0
+          # @return [Integer] 上限
+          MAX = Const::Number::Cycle::DAY
+          # @return [Integer] 遠/近の地点での中間
+          HALF = 7465
+          # @return [Integer] 各地点の最後
+          LAST = 6529
+
+          # @return [Integer] 下限
+          attr_reader :min
+          # @return [Integer] 上限
+          attr_reader :max
+
+          #
+          # 初期化
+          #
+          # @param [Integer] min 下限
+          # @param [Integer] max 上限
+          #
+          def initialize(min: MIN, max: MAX)
+            @min = min
+            @max = max
+          end
+
+          #
+          # 含まれるか
+          #
+          # @param [Integer] minute 小余
+          #
+          # @return [True] 含まれる
+          # @return [False] 含まれない
+          #
+          def include?(minute:)
+            minute >= @min && minute <= @max
+          end
+
+          #
+          # 分母を返す
+          #
+          # @return [Integer] 分母
+          #
+          def denominator
+            @max - @min
+          end
+        end
+
+        #
+        # Value 補正値
+        #
+        class Value
+          # @return [Integer] 損益率
+          attr_reader :per
+          # @return [Integer] 眺朒（ちょうじく）積
+          attr_reader :stack
+
+          #
+          # 初期化
+          #
+          # @param [Integer] per 損益率
+          # @param [Integer] stack 眺朒（ちょうじく）積
+          #
+          def initialize(per:, stack:)
+            @per = per
+            @stack = stack
+          end
+
+          #
+          # 文字化
+          #
+          # @return [String] 文字
+          #
+          def to_s
+            "per:#{@per}, stack:#{@stack}"
+          end
+        end
+
+        # rubocop:disable Layout/LineLength
+
+        #
+        # @return [Array<Row>] 月の補正値情報
+        #
+        LIST = [
+          Row.new(forward: true, day: 1, range: Range.new, value: Value.new(per: +830, stack: 0)),
+          Row.new(forward: true, day: 2, range: Range.new, value: Value.new(per: +726, stack: +830)),
+          Row.new(forward: true, day: 3, range: Range.new, value: Value.new(per: +606, stack: +1556)),
+          Row.new(forward: true, day: 4, range: Range.new, value: Value.new(per: +471, stack: +2162)),
+          Row.new(forward: true, day: 5, range: Range.new, value: Value.new(per: +337, stack: +2633)),
+          Row.new(forward: true, day: 6, range: Range.new, value: Value.new(per: +202, stack: +2970)),
+          Row.new(forward: true, day: 7, range: Range.new(max: Range::HALF), value: Value.new(per: +53, stack: +3172)),
+          Row.new(forward: true, day: 7, range: Range.new(min: Range::HALF), value: Value.new(per: -7, stack: +3225)), # +3172 + 53（初益）
+          Row.new(forward: true, day: 8, range: Range.new, value: Value.new(per: -82, stack: +3218)),
+          Row.new(forward: true, day: 9, range: Range.new, value: Value.new(per: -224, stack: +3136)),
+          Row.new(forward: true, day: 10, range: Range.new, value: Value.new(per: -366, stack: +2912)),
+          Row.new(forward: true, day: 11, range: Range.new, value: Value.new(per: -509, stack: +2546)),
+          Row.new(forward: true, day: 12, range: Range.new, value: Value.new(per: -643, stack: +2037)),
+          Row.new(forward: true, day: 13, range: Range.new, value: Value.new(per: -748, stack: +1394)),
+          Row.new(forward: true, day: 14, range: Range.new(max: Range::LAST), value: Value.new(per: -646, stack: +646)), # 14日の小余は常に6529以下
+          Row.new(forward: false, day: 1, range: Range.new, value: Value.new(per: -830, stack: 0)),
+          Row.new(forward: false, day: 2, range: Range.new, value: Value.new(per: -726, stack: -830)),
+          Row.new(forward: false, day: 3, range: Range.new, value: Value.new(per: -598, stack: -1556)),
+          Row.new(forward: false, day: 4, range: Range.new, value: Value.new(per: -464, stack: -2154)),
+          Row.new(forward: false, day: 5, range: Range.new, value: Value.new(per: -329, stack: -2618)),
+          Row.new(forward: false, day: 6, range: Range.new, value: Value.new(per: -195, stack: -2947)),
+          Row.new(forward: false, day: 7, range: Range.new(max: Range::HALF), value: Value.new(per: -53, stack: -3142)),
+          Row.new(forward: false, day: 7, range: Range.new(min: Range::HALF), value: Value.new(per: +7, stack: -3195)), # -3142 - 53（初益）
+          Row.new(forward: false, day: 8, range: Range.new, value: Value.new(per: +82, stack: -3188)),
+          Row.new(forward: false, day: 9, range: Range.new, value: Value.new(per: +225, stack: -3106)),
+          Row.new(forward: false, day: 10, range: Range.new, value: Value.new(per: +366, stack: -2881)),
+          Row.new(forward: false, day: 11, range: Range.new, value: Value.new(per: +501, stack: -2515)),
+          Row.new(forward: false, day: 12, range: Range.new, value: Value.new(per: +628, stack: -2014)),
+          Row.new(forward: false, day: 13, range: Range.new, value: Value.new(per: +740, stack: -1386)),
+          Row.new(forward: false, day: 14, range: Range.new(max: Range::LAST), value: Value.new(per: +646, stack: -646)) # 14日の小余は常に6529以下
+        ].freeze
+        # rubocop:enable Layout/LineLength
+
+        #
+        # 月軌道の補正に必要な基本値を引き当てる
+        #
+        # @param [True, False] forward 進（遠地点より数える）/退（近地点より数える）
+        # @param [Integer] day 大余
+        # @param [Integer] minute 小余
+        #
+        # @return [Row] 補正値
+        #
+        def self.specify(forward:, day:, minute:)
+          LIST.each do |row|
+            # NOTE: 範囲が重複している場合、最初に引き当てたほうを優先する
+            return row if row.match?(forward: forward, day: day, minute: minute)
+          end
+
+          raise ArgumentError.new, "invalid parameter: #{forward}/#{day}/#{minute}"
+        end
+
+        # :reek:ControlParameter
+
+        #
+        # 小余の下げ幅を求める
+        #
+        # @param [Integer] day 大余
+        # @param [Integer] minute 小余
+        #
+        # @return [Integer] 小余の下げ幅
+        #
+        def self.minus_minute(day:, minute:)
+          return minute unless HALF_DAYS.include?(day)
+
+          return minute unless minute > Range::HALF
+
+          minute - Range::HALF
+        end
+      end
+    end
+  end
+end