Ryan Malloy
8ca4383b2e
Add 4 refracted rise/set functions completing the rise/set feature set: - planet_next_rise/set_refracted: -0.569 deg threshold (refraction only, point source — even Jupiter at opposition is only 24 arcsec) - moon_next_rise/set_refracted: -0.833 deg threshold (refraction + mean semidiameter, same as Sun) Add IAU constellation identification from Roman (1987) CDS VI/42: - 357 boundary segments covering all 88 constellations - Precesses J2000 coordinates to B1875.0 epoch for lookup - Two overloads: constellation(equatorial) and constellation(float8, float8) - IMMUTABLE (compiled-in static data) 141 -> 147 SQL objects. 24 -> 25 regression suites. All 25 pass.
134 lines
4.3 KiB
Plaintext
134 lines
4.3 KiB
Plaintext
-- constellation.sql -- Tests for v0.14.0: IAU constellation identification
|
|
--
|
|
-- Verifies the Roman (1987) boundary lookup against well-known
|
|
-- stellar positions and solar system objects.
|
|
CREATE EXTENSION IF NOT EXISTS pg_orrery;
|
|
NOTICE: extension "pg_orrery" already exists, skipping
|
|
-- ============================================================
|
|
-- Known stars via J2000 RA/Dec overload
|
|
-- ============================================================
|
|
-- Polaris (Alpha UMi): RA 2.5303h, Dec +89.264
|
|
SELECT constellation(2.5303, 89.264) AS polaris_constellation;
|
|
polaris_constellation
|
|
-----------------------
|
|
UMi
|
|
(1 row)
|
|
|
|
-- Sirius (Alpha CMa): RA 6.7525h, Dec -16.716
|
|
SELECT constellation(6.7525, -16.716) AS sirius_constellation;
|
|
sirius_constellation
|
|
----------------------
|
|
CMa
|
|
(1 row)
|
|
|
|
-- Betelgeuse (Alpha Ori): RA 5.9195h, Dec +7.407
|
|
SELECT constellation(5.9195, 7.407) AS betelgeuse_constellation;
|
|
betelgeuse_constellation
|
|
--------------------------
|
|
Ori
|
|
(1 row)
|
|
|
|
-- Vega (Alpha Lyr): RA 18.6156h, Dec +38.784
|
|
SELECT constellation(18.6156, 38.784) AS vega_constellation;
|
|
vega_constellation
|
|
--------------------
|
|
Lyr
|
|
(1 row)
|
|
|
|
-- Antares (Alpha Sco): RA 16.4901h, Dec -26.432
|
|
SELECT constellation(16.4901, -26.432) AS antares_constellation;
|
|
antares_constellation
|
|
-----------------------
|
|
Sco
|
|
(1 row)
|
|
|
|
-- Deneb (Alpha Cyg): RA 20.6905h, Dec +45.280
|
|
SELECT constellation(20.6905, 45.280) AS deneb_constellation;
|
|
deneb_constellation
|
|
---------------------
|
|
Cyg
|
|
(1 row)
|
|
|
|
-- Rigel (Beta Ori): RA 5.2423h, Dec -8.202
|
|
SELECT constellation(5.2423, -8.202) AS rigel_constellation;
|
|
rigel_constellation
|
|
---------------------
|
|
Ori
|
|
(1 row)
|
|
|
|
-- ============================================================
|
|
-- Celestial poles
|
|
-- ============================================================
|
|
-- South celestial pole -> Octans
|
|
SELECT constellation(0.0, -90.0) AS south_pole_constellation;
|
|
south_pole_constellation
|
|
--------------------------
|
|
Oct
|
|
(1 row)
|
|
|
|
-- Near north celestial pole -> Ursa Minor
|
|
SELECT constellation(0.0, 89.0) AS north_pole_constellation;
|
|
north_pole_constellation
|
|
--------------------------
|
|
UMi
|
|
(1 row)
|
|
|
|
-- ============================================================
|
|
-- Solar system objects via equatorial overload
|
|
-- ============================================================
|
|
-- Sun at 2024 summer solstice should be in Gemini (not Cancer --
|
|
-- precession has shifted the solstice point)
|
|
SELECT constellation(sun_equatorial('2024-06-21 12:00:00+00'::timestamptz))
|
|
AS sun_solstice_constellation;
|
|
sun_solstice_constellation
|
|
----------------------------
|
|
Gem
|
|
(1 row)
|
|
|
|
-- Jupiter in Jan 2024 should be in Aries
|
|
SELECT constellation(planet_equatorial(5, '2024-01-15 12:00:00+00'::timestamptz))
|
|
AS jupiter_jan2024_constellation;
|
|
jupiter_jan2024_constellation
|
|
-------------------------------
|
|
Ari
|
|
(1 row)
|
|
|
|
-- ============================================================
|
|
-- Both overloads should agree for the same position
|
|
-- ============================================================
|
|
SELECT constellation(18.6156, 38.784)
|
|
= constellation(make_equatorial(18.6156, 38.784, 0.0))
|
|
AS overloads_agree;
|
|
overloads_agree
|
|
-----------------
|
|
t
|
|
(1 row)
|
|
|
|
-- ============================================================
|
|
-- RA boundary edge case near 0h/24h wrap
|
|
-- ============================================================
|
|
-- RA just above 0h at various declinations
|
|
SELECT constellation(0.01, 45.0) IS NOT NULL AS ra_near_zero_valid;
|
|
ra_near_zero_valid
|
|
--------------------
|
|
t
|
|
(1 row)
|
|
|
|
SELECT constellation(23.99, -30.0) IS NOT NULL AS ra_near_24_valid;
|
|
ra_near_24_valid
|
|
------------------
|
|
t
|
|
(1 row)
|
|
|
|
-- ============================================================
|
|
-- Error cases
|
|
-- ============================================================
|
|
-- RA out of range
|
|
DO $$ BEGIN PERFORM constellation(24.1, 0.0); EXCEPTION WHEN OTHERS THEN RAISE NOTICE 'RA=24.1: %', SQLERRM; END $$;
|
|
NOTICE: RA=24.1: constellation: RA must be in [0, 24), got 24.1000
|
|
DO $$ BEGIN PERFORM constellation(-0.1, 0.0); EXCEPTION WHEN OTHERS THEN RAISE NOTICE 'RA=-0.1: %', SQLERRM; END $$;
|
|
NOTICE: RA=-0.1: constellation: RA must be in [0, 24), got -0.1000
|
|
-- Dec out of range
|
|
DO $$ BEGIN PERFORM constellation(12.0, 91.0); EXCEPTION WHEN OTHERS THEN RAISE NOTICE 'Dec=91: %', SQLERRM; END $$;
|
|
NOTICE: Dec=91: constellation: Dec must be in [-90, 90], got 91.0000
|