mk_sunmoon 0.1.1 → 0.1.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (6) hide show
  1. checksums.yaml +4 -4
  2. data/LICENSE.txt +1 -1
  3. data/lib/mk_sunmoon/compute.rb +48 -76
  4. data/lib/mk_sunmoon/const.rb +1 -0
  5. data/lib/mk_sunmoon/version.rb +1 -1
  6. metadata +2 -2
checksums.yaml CHANGED
@@ -1,7 +1,7 @@
1
1
  ---
2
2
  SHA1:
3
- metadata.gz: fedaa4c974693e551cd74527c8ec2d30d892d4cc
4
- data.tar.gz: a896f85395d724780530c003619f02eb8c2b50e4
3
+ metadata.gz: 712def1dc7bb74b6e2e4b679726ba56fcffc1d1a
4
+ data.tar.gz: acc68ffa5f24534fd3e6903ca9d3fbbd3794f730
5
5
  SHA512:
6
- metadata.gz: d55dcdfd0450cd2d0acb17a367732323bf1d6f91fa7cd989c719262d23eea8491df71e8605857de36e8691714aa38171a4fb28c6322cbe7d5e5aada50df2b623
7
- data.tar.gz: fad6ad0cea6bf0bd3832cbc005f109052ba688d010aecae8efb6f2ed14e8c698a1e07f2bbbad50e0ce83e5f6b60c1cc8f69ab8dd6d48eb4e37c1b7fc5cc1f534
6
+ metadata.gz: d77610522d299fc58d61ba65a5fc0c33c332b84b3e582267b78977a24ca1a3bbf2f7f6521cb09458cb8120647e33c47d1383f72dd53e32763a03d35943a4debe
7
+ data.tar.gz: e43d9662120d775da3a8af37cf1004c775d40aaa7408c7ec01aa596767de00471c915aba32c7c3948e1ae480b6f29b87530aa27af164c13cea45e351e7839f09
data/LICENSE.txt CHANGED
@@ -1,6 +1,6 @@
1
1
  The MIT License (MIT)
2
2
 
3
- Copyright (c) 2016 Masaru Koizumi
3
+ Copyright (c) 2016 mk-mode.com
4
4
 
5
5
  Permission is hereby granted, free of charge, to any person obtaining a copy
6
6
  of this software and associated documentation files (the "Software"), to deal
data/lib/mk_sunmoon/compute.rb CHANGED
@@ -57,13 +57,14 @@ module MkSunmoon
57
57
  # @return: dt
58
58
  #=========================================================================
59
59
  def compute_dt(year, month, day)
60
- ymd = sprintf("%04d-%02d-%02d", year, month, day)
60
+ ym = sprintf("%04d-%02d", year, month)
61
+ y = year + (month - 0.5) / 12
61
62
  case
62
63
  when year < -500
63
- t = (year-1820) / 100.0
64
+ t = (y - 1820) / 100.0
64
65
  dt = -20 + 32 * t ** 2
65
66
  when -500 <= year && year < 500
66
- t = year / 100.0
67
+ t = y / 100.0
67
68
  dt = 10583.6
68
69
  (-1014.41 + \
69
70
  ( 33.78311 + \
@@ -73,7 +74,7 @@ module MkSunmoon
73
74
  ( 0.0090316521) \
74
75
  * t) * t) * t) * t) * t) * t
75
76
  when 500 <= year && year < 1600
76
- t = (year - 1000) / 100.0
77
+ t = (y - 1000) / 100.0
77
78
  dt = 1574.2 + \
78
79
  (-556.01 + \
79
80
  ( 71.23472 + \
@@ -83,14 +84,14 @@ module MkSunmoon
83
84
  ( 0.0083572073) \
84
85
  * t) * t) * t) * t) * t) * t
85
86
  when 1600 <= year && year < 1700
86
- t = year - 1600
87
+ t = y - 1600
87
88
  dt = 120 + \
88
89
  ( -0.9808 + \
89
90
  ( -0.01532 + \
90
91
  ( 1.0 / 7129.0) \
91
92
  * t) * t) * t
92
93
  when 1700 <= year && year < 1800
93
- t = year - 1700
94
+ t = y - 1700
94
95
  dt = 8.83 + \
95
96
  ( 0.1603 + \
96
97
  (-0.0059285 + \
@@ -98,7 +99,7 @@ module MkSunmoon
98
99
  (-1.0 / 1174000.0) \
99
100
  * t) * t) * t) * t
100
101
  when 1800 <= year && year < 1860
101
- t = year - 1800
102
+ t = y - 1800
102
103
  dt = 13.72 + \
103
104
  (-0.332447 + \
104
105
  ( 0.0068612 + \
@@ -109,7 +110,7 @@ module MkSunmoon
109
110
  ( 0.000000000875) \
110
111
  * t) * t) * t) * t) * t) * t) * t
111
112
  when 1860 <= year && year < 1900
112
- t = year - 1860
113
+ t = y - 1860
113
114
  dt = 7.62 + \
114
115
  ( 0.5737 + \
115
116
  (-0.251754 + \
@@ -118,7 +119,7 @@ module MkSunmoon
118
119
  ( 1.0 / 233174.0) \
119
120
  * t) * t) * t) * t) * t
120
121
  when 1900 <= year && year < 1920
121
- t = year - 1900
122
+ t = y - 1900
122
123
  dt = -2.79 + \
123
124
  ( 1.494119 + \
124
125
  (-0.0598939 + \
@@ -126,14 +127,14 @@ module MkSunmoon
126
127
  (-0.000197 ) \
127
128
  * t) * t) * t) * t
128
129
  when 1920 <= year && year < 1941
129
- t = year - 1920
130
+ t = y - 1920
130
131
  dt = 21.20 + \
131
132
  ( 0.84493 + \
132
133
  (-0.076100 + \
133
134
  ( 0.0020936) \
134
135
  * t) * t) * t
135
136
  when 1941 <= year && year < 1961
136
- t = year - 1950
137
+ t = y - 1950
137
138
  dt = 29.07 + \
138
139
  ( 0.407 + \
139
140
  (-1 / 233.0 + \
@@ -141,44 +142,30 @@ module MkSunmoon
141
142
  * t) * t) * t
142
143
  when 1961 <= year && year < 1986
143
144
  case
144
- when ymd < sprintf("%04d-%02d-%02d", 1972, 1, 1)
145
- t = year - 1975
145
+ when ym < sprintf("%04d-%02d", 1972, 1)
146
+ t = y - 1975
146
147
  dt = 45.45 + \
147
148
  ( 1.067 + \
148
149
  (-1 / 260.0 + \
149
150
  (-1 / 718.0) \
150
151
  * t) * t) * t
151
- when ymd < sprintf("%04d-%02d-%02d", 1972, 7, 1)
152
- dt = 32.184 + 10
153
- when ymd < sprintf("%04d-%02d-%02d", 1973, 1, 1)
154
- dt = 32.184 + 11
155
- when ymd < sprintf("%04d-%02d-%02d", 1974, 1, 1)
156
- dt = 32.184 + 12
157
- when ymd < sprintf("%04d-%02d-%02d", 1975, 1, 1)
158
- dt = 32.184 + 13
159
- when ymd < sprintf("%04d-%02d-%02d", 1976, 1, 1)
160
- dt = 32.184 + 14
161
- when ymd < sprintf("%04d-%02d-%02d", 1977, 1, 1)
162
- dt = 32.184 + 15
163
- when ymd < sprintf("%04d-%02d-%02d", 1978, 1, 1)
164
- dt = 32.184 + 16
165
- when ymd < sprintf("%04d-%02d-%02d", 1979, 1, 1)
166
- dt = 32.184 + 17
167
- when ymd < sprintf("%04d-%02d-%02d", 1980, 1, 1)
168
- dt = 32.184 + 18
169
- when ymd < sprintf("%04d-%02d-%02d", 1981, 7, 1)
170
- dt = 32.184 + 19
171
- when ymd < sprintf("%04d-%02d-%02d", 1982, 7, 1)
172
- dt = 32.184 + 20
173
- when ymd < sprintf("%04d-%02d-%02d", 1983, 7, 1)
174
- dt = 32.184 + 21
175
- when ymd < sprintf("%04d-%02d-%02d", 1985, 7, 1)
176
- dt = 32.184 + 22
177
- when ymd < sprintf("%04d-%02d-%02d", 1988, 1, 1)
178
- dt = 32.184 + 23
152
+ when ym < sprintf("%04d-%02d", 1972, 7); dt = Const::TT_TAI + 10
153
+ when ym < sprintf("%04d-%02d", 1973, 1); dt = Const::TT_TAI + 11
154
+ when ym < sprintf("%04d-%02d", 1974, 1); dt = Const::TT_TAI + 12
155
+ when ym < sprintf("%04d-%02d", 1975, 1); dt = Const::TT_TAI + 13
156
+ when ym < sprintf("%04d-%02d", 1976, 1); dt = Const::TT_TAI + 14
157
+ when ym < sprintf("%04d-%02d", 1977, 1); dt = Const::TT_TAI + 15
158
+ when ym < sprintf("%04d-%02d", 1978, 1); dt = Const::TT_TAI + 16
159
+ when ym < sprintf("%04d-%02d", 1979, 1); dt = Const::TT_TAI + 17
160
+ when ym < sprintf("%04d-%02d", 1980, 1); dt = Const::TT_TAI + 18
161
+ when ym < sprintf("%04d-%02d", 1981, 7); dt = Const::TT_TAI + 19
162
+ when ym < sprintf("%04d-%02d", 1982, 7); dt = Const::TT_TAI + 20
163
+ when ym < sprintf("%04d-%02d", 1983, 7); dt = Const::TT_TAI + 21
164
+ when ym < sprintf("%04d-%02d", 1985, 7); dt = Const::TT_TAI + 22
165
+ when ym < sprintf("%04d-%02d", 1988, 1); dt = Const::TT_TAI + 23
179
166
  end
180
167
  when 1986 <= year && year < 2005
181
- # t = year - 2000
168
+ #t = y - 2000
182
169
  #dt = 63.86 + \
183
170
  # ( 0.3345 + \
184
171
  # (-0.060374 + \
@@ -187,41 +174,26 @@ module MkSunmoon
187
174
  # ( 0.00002373599) \
188
175
  # * t) * t) * t) * t) * t
189
176
  case
190
- when ymd < sprintf("%04d-%02d-%02d", 1988, 1, 1)
191
- dt = 32.184 + 23
192
- when ymd < sprintf("%04d-%02d-%02d", 1990, 1, 1)
193
- dt = 32.184 + 24
194
- when ymd < sprintf("%04d-%02d-%02d", 1991, 1, 1)
195
- dt = 32.184 + 25
196
- when ymd < sprintf("%04d-%02d-%02d", 1992, 7, 1)
197
- dt = 32.184 + 26
198
- when ymd < sprintf("%04d-%02d-%02d", 1993, 7, 1)
199
- dt = 32.184 + 27
200
- when ymd < sprintf("%04d-%02d-%02d", 1994, 7, 1)
201
- dt = 32.184 + 28
202
- when ymd < sprintf("%04d-%02d-%02d", 1996, 1, 1)
203
- dt = 32.184 + 29
204
- when ymd < sprintf("%04d-%02d-%02d", 1997, 7, 1)
205
- dt = 32.184 + 30
206
- when ymd < sprintf("%04d-%02d-%02d", 1999, 1, 1)
207
- dt = 32.184 + 31
208
- when ymd < sprintf("%04d-%02d-%02d", 2006, 1, 1)
209
- dt = 32.184 + 32
177
+ when ym < sprintf("%04d-%02d", 1988, 1); dt = Const::TT_TAI + 23
178
+ when ym < sprintf("%04d-%02d", 1990, 1); dt = Const::TT_TAI + 24
179
+ when ym < sprintf("%04d-%02d", 1991, 1); dt = Const::TT_TAI + 25
180
+ when ym < sprintf("%04d-%02d", 1992, 7); dt = Const::TT_TAI + 26
181
+ when ym < sprintf("%04d-%02d", 1993, 7); dt = Const::TT_TAI + 27
182
+ when ym < sprintf("%04d-%02d", 1994, 7); dt = Const::TT_TAI + 28
183
+ when ym < sprintf("%04d-%02d", 1996, 1); dt = Const::TT_TAI + 29
184
+ when ym < sprintf("%04d-%02d", 1997, 7); dt = Const::TT_TAI + 30
185
+ when ym < sprintf("%04d-%02d", 1999, 1); dt = Const::TT_TAI + 31
186
+ when ym < sprintf("%04d-%02d", 2006, 1); dt = Const::TT_TAI + 32
210
187
  end
211
188
  when 2005 <= year && year < 2050
212
189
  case
213
- when ymd < sprintf("%04d-%02d-%02d", 2006, 1, 1)
214
- dt = 32.184 + 32
215
- when ymd < sprintf("%04d-%02d-%02d", 2009, 1, 1)
216
- dt = 32.184 + 33
217
- when ymd < sprintf("%04d-%02d-%02d", 2012, 7, 1)
218
- dt = 32.184 + 34
219
- when ymd < sprintf("%04d-%02d-%02d", 2015, 7, 1)
220
- dt = 32.184 + 35
221
- when ymd < sprintf("%04d-%02d-%02d", 2017, 7, 1) # <= 第27回うるう秒実施までの暫定措置
222
- dt = 32.184 + 36
190
+ when ym < sprintf("%04d-%02d", 2006, 1); dt = Const::TT_TAI + 32
191
+ when ym < sprintf("%04d-%02d", 2009, 1); dt = Const::TT_TAI + 33
192
+ when ym < sprintf("%04d-%02d", 2012, 7); dt = Const::TT_TAI + 34
193
+ when ym < sprintf("%04d-%02d", 2015, 7); dt = Const::TT_TAI + 35
194
+ when ym < sprintf("%04d-%02d", 2018, 1); dt = Const::TT_TAI + 36 # <= 第27回うるう秒実施までの暫定措置
223
195
  else
224
- t = year - 2000
196
+ t = y - 2000
225
197
  dt = 62.92 + \
226
198
  ( 0.32217 + \
227
199
  ( 0.005589) \
@@ -229,10 +201,10 @@ module MkSunmoon
229
201
  end
230
202
  when 2050 <= year && year <= 2150
231
203
  dt = -20 \
232
- + 32 * ((year - 1820) / 100.0) ** 2
233
- - 0.5628 * (2150 - year)
204
+ + 32 * ((y - 1820) / 100.0) ** 2
205
+ - 0.5628 * (2150 - y)
234
206
  when 2150 < year
235
- t = (year - 1820) / 100.0
207
+ t = (y - 1820) / 100.0
236
208
  dt = -20 + 32 * t ** 2
237
209
  end
238
210
  return dt
data/lib/mk_sunmoon/const.rb CHANGED
@@ -15,6 +15,7 @@ module MkSunmoon
15
15
  CONVERGE = 0.00005
16
16
  REFRACTION = 0.585556
17
17
  INCLINATION = 0.0353333
18
+ TT_TAI = 32.184
18
19
  end
19
20
  end
20
21
 
data/lib/mk_sunmoon/version.rb CHANGED
@@ -1,3 +1,3 @@
1
1
  module MkSunmoon
2
- VERSION = "0.1.1"
2
+ VERSION = "0.1.2"
3
3
  end
metadata CHANGED
@@ -1,14 +1,14 @@
1
1
  --- !ruby/object:Gem::Specification
2
2
  name: mk_sunmoon
3
3
  version: !ruby/object:Gem::Version
4
- version: 0.1.1
4
+ version: 0.1.2
5
5
  platform: ruby
6
6
  authors:
7
7
  - komasaru
8
8
  autorequire:
9
9
  bindir: exe
10
10
  cert_chain: []
11
- date: 2016-06-13 00:00:00.000000000 Z
11
+ date: 2016-06-15 00:00:00.000000000 Z
12
12
  dependencies:
13
13
  - !ruby/object:Gem::Dependency
14
14
  name: bundler