Aller au contenu

Connaitre la constellation à partir des coordonnées (VBA Excel)

Fred_76

Par Fred_76
dans Logiciels

 Partager

Messages recommandés

Fred_76

Fred_76

Posté
Posté

Bonjour

 

Voici un petit code VBA tiré d'un code en javascript lui-même issu d'un code en C qui permet de calculer la constellation à laquelle appartient un point de coordonnées (RA, Déc) à une époque donnée.

 

 '// David Moews, 2008-VI-14; revised 2008-VIII-2
'/*
' * precess() is adapted from program.c, from
' * ftp://cdsarc.u-strasbg.fr/pub/cats/VI/42/program.c
' * which is from
' * CDS (Centre de donnees astronomiques de Strasbourg) catalog VI/42; also see
' *
' * Identification of a constellation from a position,
' * Nancy G. Roman,
' * PUBLICATIONS OF THE ASTRONOMICAL SOCIETY OF THE PACIFIC,
' * 99 (July 1987), pp. 695-699.
' *
' * Program.c says:
' * This program is a translation with a few adaptations of the
' * Fortran program.f, made by FO @ CDS  (francois@simbad.u-strasbg.fr)
' * in November 1996.
' * Module.excel says:
' * This program has been ported from javascript to VBA for Excel in october 2013
' */

Private Type tcoord
   ra As Double
   dec As Double
End Type

Private Const pi As Double = 3.14159265358979

Private Function precess(coord As tcoord, epoch1 As Double, epoch2 As Double) As tcoord

 Dim cdr As Double, csr As Double
 Dim x10 As Double, x11 As Double, x12 As Double
 Dim x20 As Double, x21 As Double, x22 As Double
 Dim r00 As Double, r01 As Double, r02 As Double
 Dim r10 As Double, r11 As Double, r12 As Double
 Dim r20 As Double, r21 As Double, r22 As Double

 Dim t As Double, st As Double, a As Double, b As Double, c As Double
 Dim sina As Double, sinb As Double, sinc As Double
 Dim cosa As Double, cosb As Double, cosc As Double

 Dim ra1 As Double, dec1 As Double
 Dim ra2 As Double, dec2 As Double

 cdr = pi / 180#
 csr = cdr / 3600#

 ra1 = coord.ra
 dec1 = coord.dec
 a = Cos(dec1)

 x10 = a * Cos(ra1)
 x11 = a * Sin(ra1)
 x12 = Sin(dec1)

 t = 0.001 * (epoch2 - epoch1)
 st = 0.001 * (epoch1 - 1900#)

 a = csr * t * (23042.53 + st * (139.75 + 0.06 * st) + t * (30.23 - 0.27 * st + 18# * t))
 b = csr * t * t * (79.27 + 0.66 * st + 0.32 * t) + a
 c = csr * t * (20046.85 - st * (85.33 + 0.37 * st) + t * (-42.67 - 0.37 * st - 41.8 * t))

 sina = Sin(a):  sinb = Sin(:  sinc = Sin(c)
 cosa = Cos(a):  cosb = Cos(:  cosc = Cos(c)

 r00 = cosa * cosb * cosc - sina * sinb
 r01 = -cosa * sinb - sina * cosb * cosc
 r02 = -cosb * sinc
 r10 = sina * cosb + cosa * sinb * cosc
 r11 = cosa * cosb - sina * sinb * cosc
 r12 = -sinb * sinc
 r20 = cosa * sinc
 r21 = -sina * sinc
 r22 = cosc

 x20 = r00 * x10 + r01 * x11 + r02 * x12
 x21 = r10 * x10 + r11 * x11 + r12 * x12
 x22 = r20 * x10 + r21 * x11 + r22 * x12

 ra2 = WorksheetFunction.Atan2(x20, x21)

 If ra2 < 0# Then ra2 = ra2 + 2# * pi

 precess.ra = ra2
 precess.dec = WorksheetFunction.Asin(x22)

End Function

'*** ra en hr et dec en deg
Public Function nom_const(xra As Double, xdec As Double, epoch As Double) As String

   Dim constelxy(357, 3) As Double
   Dim consteln(357) As String


'/*
' * From ftp://cdsarc.u-strasbg.fr/pub/cats/VI/42/data.dat .
' * This table gives the constellation boundaries.
' * Each constellation is bounded by lines of constant RA or constant declination,
' * in the 1875 equinox coordinate system.
' *
' * Each line of the table consists of
' * (1) lower right ascension boundary (hours)
' * (2) upper right ascension boundary (hours)
' * (3) lower (southern) declination boundary (degrees)
' * (4) constellation abbreviation (3 letters)
' */

   constelxy(0, 0) = 0#: constelxy(0, 1) = 24#: constelxy(0, 2) = 88#: consteln(0) = "UMi"
   constelxy(1, 0) = 8#: constelxy(1, 1) = 14.5: constelxy(1, 2) = 86.5: consteln(1) = "UMi"
   constelxy(2, 0) = 21#: constelxy(2, 1) = 23#: constelxy(2, 2) = 86.1667: consteln(2) = "UMi"
   constelxy(3, 0) = 18#: constelxy(3, 1) = 21#: constelxy(3, 2) = 86#: consteln(3) = "UMi"
   constelxy(4, 0) = 0#: constelxy(4, 1) = 8#: constelxy(4, 2) = 85#: consteln(4) = "Cep"
   constelxy(5, 0) = 9.1667: constelxy(5, 1) = 10.6667: constelxy(5, 2) = 82#: consteln(5) = "Cam"
   constelxy(6, 0) = 0#: constelxy(6, 1) = 5#: constelxy(6, 2) = 80#: consteln(6) = "Cep"
   constelxy(7, 0) = 10.6667: constelxy(7, 1) = 14.5: constelxy(7, 2) = 80#: consteln(7) = "Cam"
   constelxy(8, 0) = 17.5: constelxy(8, 1) = 18#: constelxy(8, 2) = 80#: consteln(8) = "UMi"
   constelxy(9, 0) = 20.1667: constelxy(9, 1) = 21#: constelxy(9, 2) = 80#: consteln(9) = "Dra"
   constelxy(10, 0) = 0#: constelxy(10, 1) = 3.5083: constelxy(10, 2) = 77#: consteln(10) = "Cep"
   constelxy(11, 0) = 11.5: constelxy(11, 1) = 13.5833: constelxy(11, 2) = 77#: consteln(11) = "Cam"
   constelxy(12, 0) = 16.5333: constelxy(12, 1) = 17.5: constelxy(12, 2) = 75#: consteln(12) = "UMi"
   constelxy(13, 0) = 20.1667: constelxy(13, 1) = 20.6667: constelxy(13, 2) = 75#: consteln(13) = "Cep"
   constelxy(14, 0) = 7.9667: constelxy(14, 1) = 9.1667: constelxy(14, 2) = 73.5: consteln(14) = "Cam"
   constelxy(15, 0) = 9.1667: constelxy(15, 1) = 11.3333: constelxy(15, 2) = 73.5: consteln(15) = "Dra"
   constelxy(16, 0) = 13#: constelxy(16, 1) = 16.5333: constelxy(16, 2) = 70#: consteln(16) = "UMi"
   constelxy(17, 0) = 3.1: constelxy(17, 1) = 3.4167: constelxy(17, 2) = 68#: consteln(17) = "Cas"
   constelxy(18, 0) = 20.4167: constelxy(18, 1) = 20.6667: constelxy(18, 2) = 67#: consteln(18) = "Dra"
   constelxy(19, 0) = 11.3333: constelxy(19, 1) = 12#: constelxy(19, 2) = 66.5: consteln(19) = "Dra"
   constelxy(20, 0) = 0#: constelxy(20, 1) = 0.3333: constelxy(20, 2) = 66#: consteln(20) = "Cep"
   constelxy(21, 0) = 14#: constelxy(21, 1) = 15.6667: constelxy(21, 2) = 66#: consteln(21) = "UMi"
   constelxy(22, 0) = 23.5833: constelxy(22, 1) = 24#: constelxy(22, 2) = 66#: consteln(22) = "Cep"
   constelxy(23, 0) = 12#: constelxy(23, 1) = 13.5: constelxy(23, 2) = 64#: consteln(23) = "Dra"
   constelxy(24, 0) = 13.5: constelxy(24, 1) = 14.4167: constelxy(24, 2) = 63#: consteln(24) = "Dra"
   constelxy(25, 0) = 23.1667: constelxy(25, 1) = 23.5833: constelxy(25, 2) = 63#: consteln(25) = "Cep"
   constelxy(26, 0) = 6.1: constelxy(26, 1) = 7#: constelxy(26, 2) = 62#: consteln(26) = "Cam"
   constelxy(27, 0) = 20#: constelxy(27, 1) = 20.4167: constelxy(27, 2) = 61.5: consteln(27) = "Dra"
   constelxy(28, 0) = 20.5367: constelxy(28, 1) = 20.6: constelxy(28, 2) = 60.9167: consteln(28) = "Cep"
   constelxy(29, 0) = 7#: constelxy(29, 1) = 7.9667: constelxy(29, 2) = 60#: consteln(29) = "Cam"
   constelxy(30, 0) = 7.9667: constelxy(30, 1) = 8.4167: constelxy(30, 2) = 60#: consteln(30) = "UMa"
   constelxy(31, 0) = 19.7667: constelxy(31, 1) = 20#: constelxy(31, 2) = 59.5: consteln(31) = "Dra"
   constelxy(32, 0) = 20#: constelxy(32, 1) = 20.5367: constelxy(32, 2) = 59.5: consteln(32) = "Cep"
   constelxy(33, 0) = 22.8667: constelxy(33, 1) = 23.1667: constelxy(33, 2) = 59.0833: consteln(33) = "Cep"
   constelxy(34, 0) = 0#: constelxy(34, 1) = 2.4333: constelxy(34, 2) = 58.5: consteln(34) = "Cas"
   constelxy(35, 0) = 19.4167: constelxy(35, 1) = 19.7667: constelxy(35, 2) = 58#: consteln(35) = "Dra"
   constelxy(36, 0) = 1.7: constelxy(36, 1) = 1.9083: constelxy(36, 2) = 57.5: consteln(36) = "Cas"
   constelxy(37, 0) = 2.4333: constelxy(37, 1) = 3.1: constelxy(37, 2) = 57#: consteln(37) = "Cas"
   constelxy(38, 0) = 3.1: constelxy(38, 1) = 3.1667: constelxy(38, 2) = 57#: consteln(38) = "Cam"
   constelxy(39, 0) = 22.3167: constelxy(39, 1) = 22.8667: constelxy(39, 2) = 56.25: consteln(39) = "Cep"
   constelxy(40, 0) = 5#: constelxy(40, 1) = 6.1: constelxy(40, 2) = 56#: consteln(40) = "Cam"
   constelxy(41, 0) = 14.0333: constelxy(41, 1) = 14.4167: constelxy(41, 2) = 55.5: consteln(41) = "UMa"
   constelxy(42, 0) = 14.4167: constelxy(42, 1) = 19.4167: constelxy(42, 2) = 55.5: consteln(42) = "Dra"
   constelxy(43, 0) = 3.1667: constelxy(43, 1) = 3.3333: constelxy(43, 2) = 55#: consteln(43) = "Cam"
   constelxy(44, 0) = 22.1333: constelxy(44, 1) = 22.3167: constelxy(44, 2) = 55#: consteln(44) = "Cep"
   constelxy(45, 0) = 20.6: constelxy(45, 1) = 21.9667: constelxy(45, 2) = 54.8333: consteln(45) = "Cep"
   constelxy(46, 0) = 0#: constelxy(46, 1) = 1.7: constelxy(46, 2) = 54#: consteln(46) = "Cas"
   constelxy(47, 0) = 6.1: constelxy(47, 1) = 6.5: constelxy(47, 2) = 54#: consteln(47) = "Lyn"
   constelxy(48, 0) = 12.0833: constelxy(48, 1) = 13.5: constelxy(48, 2) = 53#: consteln(48) = "UMa"
   constelxy(49, 0) = 15.25: constelxy(49, 1) = 15.75: constelxy(49, 2) = 53#: consteln(49) = "Dra"
   constelxy(50, 0) = 21.9667: constelxy(50, 1) = 22.1333: constelxy(50, 2) = 52.75: consteln(50) = "Cep"
   constelxy(51, 0) = 3.3333: constelxy(51, 1) = 5#: constelxy(51, 2) = 52.5: consteln(51) = "Cam"
   constelxy(52, 0) = 22.8667: constelxy(52, 1) = 23.3333: constelxy(52, 2) = 52.5: consteln(52) = "Cas"
   constelxy(53, 0) = 15.75: constelxy(53, 1) = 17#: constelxy(53, 2) = 51.5: consteln(53) = "Dra"
   constelxy(54, 0) = 2.0417: constelxy(54, 1) = 2.5167: constelxy(54, 2) = 50.5: consteln(54) = "Per"
   constelxy(55, 0) = 17#: constelxy(55, 1) = 18.2333: constelxy(55, 2) = 50.5: consteln(55) = "Dra"
   constelxy(56, 0) = 0#: constelxy(56, 1) = 1.3667: constelxy(56, 2) = 50#: consteln(56) = "Cas"
   constelxy(57, 0) = 1.3667: constelxy(57, 1) = 1.6667: constelxy(57, 2) = 50#: consteln(57) = "Per"
   constelxy(58, 0) = 6.5: constelxy(58, 1) = 6.8: constelxy(58, 2) = 50#: consteln(58) = "Lyn"
   constelxy(59, 0) = 23.3333: constelxy(59, 1) = 24#: constelxy(59, 2) = 50#: consteln(59) = "Cas"
   constelxy(60, 0) = 13.5: constelxy(60, 1) = 14.0333: constelxy(60, 2) = 48.5: consteln(60) = "UMa"
   constelxy(61, 0) = 0#: constelxy(61, 1) = 1.1167: constelxy(61, 2) = 48#: consteln(61) = "Cas"
   constelxy(62, 0) = 23.5833: constelxy(62, 1) = 24#: constelxy(62, 2) = 48#: consteln(62) = "Cas"
   constelxy(63, 0) = 18.175: constelxy(63, 1) = 18.2333: constelxy(63, 2) = 47.5: consteln(63) = "Her"
   constelxy(64, 0) = 18.2333: constelxy(64, 1) = 19.0833: constelxy(64, 2) = 47.5: consteln(64) = "Dra"
   constelxy(65, 0) = 19.0833: constelxy(65, 1) = 19.1667: constelxy(65, 2) = 47.5: consteln(65) = "Cyg"
   constelxy(66, 0) = 1.6667: constelxy(66, 1) = 2.0417: constelxy(66, 2) = 47#: consteln(66) = "Per"
   constelxy(67, 0) = 8.4167: constelxy(67, 1) = 9.1667: constelxy(67, 2) = 47#: consteln(67) = "UMa"
   constelxy(68, 0) = 0.1667: constelxy(68, 1) = 0.8667: constelxy(68, 2) = 46#: consteln(68) = "Cas"
   constelxy(69, 0) = 12#: constelxy(69, 1) = 12.0833: constelxy(69, 2) = 45#: consteln(69) = "UMa"
   constelxy(70, 0) = 6.8: constelxy(70, 1) = 7.3667: constelxy(70, 2) = 44.5: consteln(70) = "Lyn"
   constelxy(71, 0) = 21.9083: constelxy(71, 1) = 21.9667: constelxy(71, 2) = 44#: consteln(71) = "Cyg"
   constelxy(72, 0) = 21.875: constelxy(72, 1) = 21.9083: constelxy(72, 2) = 43.75: consteln(72) = "Cyg"
   constelxy(73, 0) = 19.1667: constelxy(73, 1) = 19.4: constelxy(73, 2) = 43.5: consteln(73) = "Cyg"
   constelxy(74, 0) = 9.1667: constelxy(74, 1) = 10.1667: constelxy(74, 2) = 42#: consteln(74) = "UMa"
   constelxy(75, 0) = 10.1667: constelxy(75, 1) = 10.7833: constelxy(75, 2) = 40#: consteln(75) = "UMa"
   constelxy(76, 0) = 15.4333: constelxy(76, 1) = 15.75: constelxy(76, 2) = 40#: consteln(76) = "Boo"
   constelxy(77, 0) = 15.75: constelxy(77, 1) = 16.3333: constelxy(77, 2) = 40#: consteln(77) = "Her"
   constelxy(78, 0) = 9.25: constelxy(78, 1) = 9.5833: constelxy(78, 2) = 39.75: consteln(78) = "Lyn"
   constelxy(79, 0) = 0#: constelxy(79, 1) = 2.5167: constelxy(79, 2) = 36.75: consteln(79) = "And"
   constelxy(80, 0) = 2.5167: constelxy(80, 1) = 2.5667: constelxy(80, 2) = 36.75: consteln(80) = "Per"
   constelxy(81, 0) = 19.3583: constelxy(81, 1) = 19.4: constelxy(81, 2) = 36.5: consteln(81) = "Lyr"
   constelxy(82, 0) = 4.5: constelxy(82, 1) = 4.6917: constelxy(82, 2) = 36#: consteln(82) = "Per"
   constelxy(83, 0) = 21.7333: constelxy(83, 1) = 21.875: constelxy(83, 2) = 36#: consteln(83) = "Cyg"
   constelxy(84, 0) = 21.875: constelxy(84, 1) = 22#: constelxy(84, 2) = 36#: consteln(84) = "Lac"
   constelxy(85, 0) = 6.5333: constelxy(85, 1) = 7.3667: constelxy(85, 2) = 35.5: consteln(85) = "Aur"
   constelxy(86, 0) = 7.3667: constelxy(86, 1) = 7.75: constelxy(86, 2) = 35.5: consteln(86) = "Lyn"
   constelxy(87, 0) = 0#: constelxy(87, 1) = 2#: constelxy(87, 2) = 35#: consteln(87) = "And"
   constelxy(88, 0) = 22#: constelxy(88, 1) = 22.8167: constelxy(88, 2) = 35#: consteln(88) = "Lac"
   constelxy(89, 0) = 22.8167: constelxy(89, 1) = 22.8667: constelxy(89, 2) = 34.5: consteln(89) = "Lac"
   constelxy(90, 0) = 22.8667: constelxy(90, 1) = 23.5: constelxy(90, 2) = 34.5: consteln(90) = "And"
   constelxy(91, 0) = 2.5667: constelxy(91, 1) = 2.7167: constelxy(91, 2) = 34#: consteln(91) = "Per"
   constelxy(92, 0) = 10.7833: constelxy(92, 1) = 11#: constelxy(92, 2) = 34#: consteln(92) = "UMa"
   constelxy(93, 0) = 12#: constelxy(93, 1) = 12.3333: constelxy(93, 2) = 34#: consteln(93) = "CVn"
   constelxy(94, 0) = 7.75: constelxy(94, 1) = 9.25: constelxy(94, 2) = 33.5: consteln(94) = "Lyn"
   constelxy(95, 0) = 9.25: constelxy(95, 1) = 9.8833: constelxy(95, 2) = 33.5: consteln(95) = "LMi"
   constelxy(96, 0) = 0.7167: constelxy(96, 1) = 1.4083: constelxy(96, 2) = 33#: consteln(96) = "And"
   constelxy(97, 0) = 15.1833: constelxy(97, 1) = 15.4333: constelxy(97, 2) = 33#: consteln(97) = "Boo"
   constelxy(98, 0) = 23.5: constelxy(98, 1) = 23.75: constelxy(98, 2) = 32.0833: consteln(98) = "And"
   constelxy(99, 0) = 12.3333: constelxy(99, 1) = 13.25: constelxy(99, 2) = 32#: consteln(99) = "CVn"
   constelxy(100, 0) = 23.75: constelxy(100, 1) = 24#: constelxy(100, 2) = 31.3333: consteln(100) = "And"
   constelxy(101, 0) = 13.9583: constelxy(101, 1) = 14.0333: constelxy(101, 2) = 30.75: consteln(101) = "CVn"
   constelxy(102, 0) = 2.4167: constelxy(102, 1) = 2.7167: constelxy(102, 2) = 30.6667: consteln(102) = "Tri"
   constelxy(103, 0) = 2.7167: constelxy(103, 1) = 4.5: constelxy(103, 2) = 30.6667: consteln(103) = "Per"
   constelxy(104, 0) = 4.5: constelxy(104, 1) = 4.75: constelxy(104, 2) = 30#: consteln(104) = "Aur"
   constelxy(105, 0) = 18.175: constelxy(105, 1) = 19.3583: constelxy(105, 2) = 30#: consteln(105) = "Lyr"
   constelxy(106, 0) = 11#: constelxy(106, 1) = 12#: constelxy(106, 2) = 29#: consteln(106) = "UMa"
   constelxy(107, 0) = 19.6667: constelxy(107, 1) = 20.9167: constelxy(107, 2) = 29#: consteln(107) = "Cyg"
   constelxy(108, 0) = 4.75: constelxy(108, 1) = 5.8833: constelxy(108, 2) = 28.5: consteln(108) = "Aur"
   constelxy(109, 0) = 9.8833: constelxy(109, 1) = 10.5: constelxy(109, 2) = 28.5: consteln(109) = "LMi"
   constelxy(110, 0) = 13.25: constelxy(110, 1) = 13.9583: constelxy(110, 2) = 28.5: consteln(110) = "CVn"
   constelxy(111, 0) = 0#: constelxy(111, 1) = 0.0667: constelxy(111, 2) = 28#: consteln(111) = "And"
   constelxy(112, 0) = 1.4083: constelxy(112, 1) = 1.6667: constelxy(112, 2) = 28#: consteln(112) = "Tri"
   constelxy(113, 0) = 5.8833: constelxy(113, 1) = 6.5333: constelxy(113, 2) = 28#: consteln(113) = "Aur"
   constelxy(114, 0) = 7.8833: constelxy(114, 1) = 8#: constelxy(114, 2) = 28#: consteln(114) = "Gem"
   constelxy(115, 0) = 20.9167: constelxy(115, 1) = 21.7333: constelxy(115, 2) = 28#: consteln(115) = "Cyg"
   constelxy(116, 0) = 19.2583: constelxy(116, 1) = 19.6667: constelxy(116, 2) = 27.5: consteln(116) = "Cyg"
   constelxy(117, 0) = 1.9167: constelxy(117, 1) = 2.4167: constelxy(117, 2) = 27.25: consteln(117) = "Tri"
   constelxy(118, 0) = 16.1667: constelxy(118, 1) = 16.3333: constelxy(118, 2) = 27#: consteln(118) = "CrB"
   constelxy(119, 0) = 15.0833: constelxy(119, 1) = 15.1833: constelxy(119, 2) = 26#: consteln(119) = "Boo"
   constelxy(120, 0) = 15.1833: constelxy(120, 1) = 16.1667: constelxy(120, 2) = 26#: consteln(120) = "CrB"
   constelxy(121, 0) = 18.3667: constelxy(121, 1) = 18.8667: constelxy(121, 2) = 26#: consteln(121) = "Lyr"
   constelxy(122, 0) = 10.75: constelxy(122, 1) = 11#: constelxy(122, 2) = 25.5: consteln(122) = "LMi"
   constelxy(123, 0) = 18.8667: constelxy(123, 1) = 19.2583: constelxy(123, 2) = 25.5: consteln(123) = "Lyr"
   constelxy(124, 0) = 1.6667: constelxy(124, 1) = 1.9167: constelxy(124, 2) = 25#: consteln(124) = "Tri"
   constelxy(125, 0) = 0.7167: constelxy(125, 1) = 0.85: constelxy(125, 2) = 23.75: consteln(125) = "Psc"
   constelxy(126, 0) = 10.5: constelxy(126, 1) = 10.75: constelxy(126, 2) = 23.5: consteln(126) = "LMi"
   constelxy(127, 0) = 21.25: constelxy(127, 1) = 21.4167: constelxy(127, 2) = 23.5: consteln(127) = "Vul"
   constelxy(128, 0) = 5.7: constelxy(128, 1) = 5.8833: constelxy(128, 2) = 22.8333: consteln(128) = "Tau"
   constelxy(129, 0) = 0.0667: constelxy(129, 1) = 0.1417: constelxy(129, 2) = 22#: consteln(129) = "And"
   constelxy(130, 0) = 15.9167: constelxy(130, 1) = 16.0333: constelxy(130, 2) = 22#: consteln(130) = "Ser"
   constelxy(131, 0) = 5.8833: constelxy(131, 1) = 6.2167: constelxy(131, 2) = 21.5: consteln(131) = "Gem"
   constelxy(132, 0) = 19.8333: constelxy(132, 1) = 20.25: constelxy(132, 2) = 21.25: consteln(132) = "Vul"
   constelxy(133, 0) = 18.8667: constelxy(133, 1) = 19.25: constelxy(133, 2) = 21.0833: consteln(133) = "Vul"
   constelxy(134, 0) = 0.1417: constelxy(134, 1) = 0.85: constelxy(134, 2) = 21#: consteln(134) = "And"
   constelxy(135, 0) = 20.25: constelxy(135, 1) = 20.5667: constelxy(135, 2) = 20.5: consteln(135) = "Vul"
   constelxy(136, 0) = 7.8083: constelxy(136, 1) = 7.8833: constelxy(136, 2) = 20#: consteln(136) = "Gem"
   constelxy(137, 0) = 20.5667: constelxy(137, 1) = 21.25: constelxy(137, 2) = 19.5: consteln(137) = "Vul"
   constelxy(138, 0) = 19.25: constelxy(138, 1) = 19.8333: constelxy(138, 2) = 19.1667: consteln(138) = "Vul"
   constelxy(139, 0) = 3.2833: constelxy(139, 1) = 3.3667: constelxy(139, 2) = 19#: consteln(139) = "Ari"
   constelxy(140, 0) = 18.8667: constelxy(140, 1) = 19#: constelxy(140, 2) = 18.5: consteln(140) = "Sge"
   constelxy(141, 0) = 5.7: constelxy(141, 1) = 5.7667: constelxy(141, 2) = 18#: consteln(141) = "Ori"
   constelxy(142, 0) = 6.2167: constelxy(142, 1) = 6.3083: constelxy(142, 2) = 17.5: consteln(142) = "Gem"
   constelxy(143, 0) = 19#: constelxy(143, 1) = 19.8333: constelxy(143, 2) = 16.1667: consteln(143) = "Sge"
   constelxy(144, 0) = 4.9667: constelxy(144, 1) = 5.3333: constelxy(144, 2) = 16#: consteln(144) = "Tau"
   constelxy(145, 0) = 15.9167: constelxy(145, 1) = 16.0833: constelxy(145, 2) = 16#: consteln(145) = "Her"
   constelxy(146, 0) = 19.8333: constelxy(146, 1) = 20.25: constelxy(146, 2) = 15.75: consteln(146) = "Sge"
   constelxy(147, 0) = 4.6167: constelxy(147, 1) = 4.9667: constelxy(147, 2) = 15.5: consteln(147) = "Tau"
   constelxy(148, 0) = 5.3333: constelxy(148, 1) = 5.6: constelxy(148, 2) = 15.5: consteln(148) = "Tau"
   constelxy(149, 0) = 12.8333: constelxy(149, 1) = 13.5: constelxy(149, 2) = 15#: consteln(149) = "Com"
   constelxy(150, 0) = 17.25: constelxy(150, 1) = 18.25: constelxy(150, 2) = 14.3333: consteln(150) = "Her"
   constelxy(151, 0) = 11.8667: constelxy(151, 1) = 12.8333: constelxy(151, 2) = 14#: consteln(151) = "Com"
   constelxy(152, 0) = 7.5: constelxy(152, 1) = 7.8083: constelxy(152, 2) = 13.5: consteln(152) = "Gem"
   constelxy(153, 0) = 16.75: constelxy(153, 1) = 17.25: constelxy(153, 2) = 12.8333: consteln(153) = "Her"
   constelxy(154, 0) = 0#: constelxy(154, 1) = 0.1417: constelxy(154, 2) = 12.5: consteln(154) = "Peg"
   constelxy(155, 0) = 5.6: constelxy(155, 1) = 5.7667: constelxy(155, 2) = 12.5: consteln(155) = "Tau"
   constelxy(156, 0) = 7#: constelxy(156, 1) = 7.5: constelxy(156, 2) = 12.5: consteln(156) = "Gem"
   constelxy(157, 0) = 21.1167: constelxy(157, 1) = 21.3333: constelxy(157, 2) = 12.5: consteln(157) = "Peg"
   constelxy(158, 0) = 6.3083: constelxy(158, 1) = 6.9333: constelxy(158, 2) = 12#: consteln(158) = "Gem"
   constelxy(159, 0) = 18.25: constelxy(159, 1) = 18.8667: constelxy(159, 2) = 12#: consteln(159) = "Her"
   constelxy(160, 0) = 20.875: constelxy(160, 1) = 21.05: constelxy(160, 2) = 11.8333: consteln(160) = "Del"
   constelxy(161, 0) = 21.05: constelxy(161, 1) = 21.1167: constelxy(161, 2) = 11.8333: consteln(161) = "Peg"
   constelxy(162, 0) = 11.5167: constelxy(162, 1) = 11.8667: constelxy(162, 2) = 11#: consteln(162) = "Leo"
   constelxy(163, 0) = 6.2417: constelxy(163, 1) = 6.3083: constelxy(163, 2) = 10#: consteln(163) = "Ori"
   constelxy(164, 0) = 6.9333: constelxy(164, 1) = 7#: constelxy(164, 2) = 10#: consteln(164) = "Gem"
   constelxy(165, 0) = 7.8083: constelxy(165, 1) = 7.925: constelxy(165, 2) = 10#: consteln(165) = "Cnc"
   constelxy(166, 0) = 23.8333: constelxy(166, 1) = 24#: constelxy(166, 2) = 10#: consteln(166) = "Peg"
   constelxy(167, 0) = 1.6667: constelxy(167, 1) = 3.2833: constelxy(167, 2) = 9.9167: consteln(167) = "Ari"
   constelxy(168, 0) = 20.1417: constelxy(168, 1) = 20.3: constelxy(168, 2) = 8.5: consteln(168) = "Del"
   constelxy(169, 0) = 13.5: constelxy(169, 1) = 15.0833: constelxy(169, 2) = 8#: consteln(169) = "Boo"
   constelxy(170, 0) = 22.75: constelxy(170, 1) = 23.8333: constelxy(170, 2) = 7.5: consteln(170) = "Peg"
   constelxy(171, 0) = 7.925: constelxy(171, 1) = 9.25: constelxy(171, 2) = 7#: consteln(171) = "Cnc"
   constelxy(172, 0) = 9.25: constelxy(172, 1) = 10.75: constelxy(172, 2) = 7#: consteln(172) = "Leo"
   constelxy(173, 0) = 18.25: constelxy(173, 1) = 18.6622: constelxy(173, 2) = 6.25: consteln(173) = "Oph"
   constelxy(174, 0) = 18.6622: constelxy(174, 1) = 18.8667: constelxy(174, 2) = 6.25: consteln(174) = "Aql"
   constelxy(175, 0) = 20.8333: constelxy(175, 1) = 20.875: constelxy(175, 2) = 6#: consteln(175) = "Del"
   constelxy(176, 0) = 7#: constelxy(176, 1) = 7.0167: constelxy(176, 2) = 5.5: consteln(176) = "CMi"
   constelxy(177, 0) = 18.25: constelxy(177, 1) = 18.425: constelxy(177, 2) = 4.5: consteln(177) = "Ser"
   constelxy(178, 0) = 16.0833: constelxy(178, 1) = 16.75: constelxy(178, 2) = 4#: consteln(178) = "Her"
   constelxy(179, 0) = 18.25: constelxy(179, 1) = 18.425: constelxy(179, 2) = 3#: consteln(179) = "Oph"
   constelxy(180, 0) = 21.4667: constelxy(180, 1) = 21.6667: constelxy(180, 2) = 2.75: consteln(180) = "Peg"
   constelxy(181, 0) = 0#: constelxy(181, 1) = 2#: constelxy(181, 2) = 2#: consteln(181) = "Psc"
   constelxy(182, 0) = 18.5833: constelxy(182, 1) = 18.8667: constelxy(182, 2) = 2#: consteln(182) = "Ser"
   constelxy(183, 0) = 20.3: constelxy(183, 1) = 20.8333: constelxy(183, 2) = 2#: consteln(183) = "Del"
   constelxy(184, 0) = 20.8333: constelxy(184, 1) = 21.3333: constelxy(184, 2) = 2#: consteln(184) = "Equ"
   constelxy(185, 0) = 21.3333: constelxy(185, 1) = 21.4667: constelxy(185, 2) = 2#: consteln(185) = "Peg"
   constelxy(186, 0) = 22#: constelxy(186, 1) = 22.75: constelxy(186, 2) = 2#: consteln(186) = "Peg"
   constelxy(187, 0) = 21.6667: constelxy(187, 1) = 22#: constelxy(187, 2) = 1.75: consteln(187) = "Peg"
   constelxy(188, 0) = 7.0167: constelxy(188, 1) = 7.2: constelxy(188, 2) = 1.5: consteln(188) = "CMi"
   constelxy(189, 0) = 3.5833: constelxy(189, 1) = 4.6167: constelxy(189, 2) = 0#: consteln(189) = "Tau"
   constelxy(190, 0) = 4.6167: constelxy(190, 1) = 4.6667: constelxy(190, 2) = 0#: consteln(190) = "Ori"
   constelxy(191, 0) = 7.2: constelxy(191, 1) = 8.0833: constelxy(191, 2) = 0#: consteln(191) = "CMi"
   constelxy(192, 0) = 14.6667: constelxy(192, 1) = 15.0833: constelxy(192, 2) = 0#: consteln(192) = "Vir"
   constelxy(193, 0) = 17.8333: constelxy(193, 1) = 18.25: constelxy(193, 2) = 0#: consteln(193) = "Oph"
   constelxy(194, 0) = 2.65: constelxy(194, 1) = 3.2833: constelxy(194, 2) = -1.75: consteln(194) = "Cet"
   constelxy(195, 0) = 3.2833: constelxy(195, 1) = 3.5833: constelxy(195, 2) = -1.75: consteln(195) = "Tau"
   constelxy(196, 0) = 15.0833: constelxy(196, 1) = 16.2667: constelxy(196, 2) = -3.25: consteln(196) = "Ser"
   constelxy(197, 0) = 4.6667: constelxy(197, 1) = 5.0833: constelxy(197, 2) = -4#: consteln(197) = "Ori"
   constelxy(198, 0) = 5.8333: constelxy(198, 1) = 6.2417: constelxy(198, 2) = -4#: consteln(198) = "Ori"
   constelxy(199, 0) = 17.8333: constelxy(199, 1) = 17.9667: constelxy(199, 2) = -4#: consteln(199) = "Ser"
   constelxy(200, 0) = 18.25: constelxy(200, 1) = 18.5833: constelxy(200, 2) = -4#: consteln(200) = "Ser"
   constelxy(201, 0) = 18.5833: constelxy(201, 1) = 18.8667: constelxy(201, 2) = -4#: consteln(201) = "Aql"
   constelxy(202, 0) = 22.75: constelxy(202, 1) = 23.8333: constelxy(202, 2) = -4#: consteln(202) = "Psc"
   constelxy(203, 0) = 10.75: constelxy(203, 1) = 11.5167: constelxy(203, 2) = -6#: consteln(203) = "Leo"
   constelxy(204, 0) = 11.5167: constelxy(204, 1) = 11.8333: constelxy(204, 2) = -6#: consteln(204) = "Vir"
   constelxy(205, 0) = 0#: constelxy(205, 1) = 0.3333: constelxy(205, 2) = -7#: consteln(205) = "Psc"
   constelxy(206, 0) = 23.8333: constelxy(206, 1) = 24#: constelxy(206, 2) = -7#: consteln(206) = "Psc"
   constelxy(207, 0) = 14.25: constelxy(207, 1) = 14.6667: constelxy(207, 2) = -8#: consteln(207) = "Vir"
   constelxy(208, 0) = 15.9167: constelxy(208, 1) = 16.2667: constelxy(208, 2) = -8#: consteln(208) = "Oph"
   constelxy(209, 0) = 20#: constelxy(209, 1) = 20.5333: constelxy(209, 2) = -9#: consteln(209) = "Aql"
   constelxy(210, 0) = 21.3333: constelxy(210, 1) = 21.8667: constelxy(210, 2) = -9#: consteln(210) = "Aqr"
   constelxy(211, 0) = 17.1667: constelxy(211, 1) = 17.9667: constelxy(211, 2) = -10#: consteln(211) = "Oph"
   constelxy(212, 0) = 5.8333: constelxy(212, 1) = 8.0833: constelxy(212, 2) = -11#: consteln(212) = "Mon"
   constelxy(213, 0) = 4.9167: constelxy(213, 1) = 5.0833: constelxy(213, 2) = -11#: consteln(213) = "Eri"
   constelxy(214, 0) = 5.0833: constelxy(214, 1) = 5.8333: constelxy(214, 2) = -11#: consteln(214) = "Ori"
   constelxy(215, 0) = 8.0833: constelxy(215, 1) = 8.3667: constelxy(215, 2) = -11#: consteln(215) = "Hya"
   constelxy(216, 0) = 9.5833: constelxy(216, 1) = 10.75: constelxy(216, 2) = -11#: consteln(216) = "Sex"
   constelxy(217, 0) = 11.8333: constelxy(217, 1) = 12.8333: constelxy(217, 2) = -11#: consteln(217) = "Vir"
   constelxy(218, 0) = 17.5833: constelxy(218, 1) = 17.6667: constelxy(218, 2) = -11.6667: consteln(218) = "Oph"
   constelxy(219, 0) = 18.8667: constelxy(219, 1) = 20#: constelxy(219, 2) = -12.0333: consteln(219) = "Aql"
   constelxy(220, 0) = 4.8333: constelxy(220, 1) = 4.9167: constelxy(220, 2) = -14.5: consteln(220) = "Eri"
   constelxy(221, 0) = 20.5333: constelxy(221, 1) = 21.3333: constelxy(221, 2) = -15#: consteln(221) = "Aqr"
   constelxy(222, 0) = 17.1667: constelxy(222, 1) = 18.25: constelxy(222, 2) = -16#: consteln(222) = "Ser"
   constelxy(223, 0) = 18.25: constelxy(223, 1) = 18.8667: constelxy(223, 2) = -16#: consteln(223) = "Sct"
   constelxy(224, 0) = 8.3667: constelxy(224, 1) = 8.5833: constelxy(224, 2) = -17#: consteln(224) = "Hya"
   constelxy(225, 0) = 16.2667: constelxy(225, 1) = 16.375: constelxy(225, 2) = -18.25: consteln(225) = "Oph"
   constelxy(226, 0) = 8.5833: constelxy(226, 1) = 9.0833: constelxy(226, 2) = -19#: consteln(226) = "Hya"
   constelxy(227, 0) = 10.75: constelxy(227, 1) = 10.8333: constelxy(227, 2) = -19#: consteln(227) = "Crt"
   constelxy(228, 0) = 16.2667: constelxy(228, 1) = 16.375: constelxy(228, 2) = -19.25: consteln(228) = "Sco"
   constelxy(229, 0) = 15.6667: constelxy(229, 1) = 15.9167: constelxy(229, 2) = -20#: consteln(229) = "Lib"
   constelxy(230, 0) = 12.5833: constelxy(230, 1) = 12.8333: constelxy(230, 2) = -22#: consteln(230) = "Crv"
   constelxy(231, 0) = 12.8333: constelxy(231, 1) = 14.25: constelxy(231, 2) = -22#: consteln(231) = "Vir"
   constelxy(232, 0) = 9.0833: constelxy(232, 1) = 9.75: constelxy(232, 2) = -24#: consteln(232) = "Hya"
   constelxy(233, 0) = 1.6667: constelxy(233, 1) = 2.65: constelxy(233, 2) = -24.3833: consteln(233) = "Cet"
   constelxy(234, 0) = 2.65: constelxy(234, 1) = 3.75: constelxy(234, 2) = -24.3833: consteln(234) = "Eri"
   constelxy(235, 0) = 10.8333: constelxy(235, 1) = 11.8333: constelxy(235, 2) = -24.5: consteln(235) = "Crt"
   constelxy(236, 0) = 11.8333: constelxy(236, 1) = 12.5833: constelxy(236, 2) = -24.5: consteln(236) = "Crv"
   constelxy(237, 0) = 14.25: constelxy(237, 1) = 14.9167: constelxy(237, 2) = -24.5: consteln(237) = "Lib"
   constelxy(238, 0) = 16.2667: constelxy(238, 1) = 16.75: constelxy(238, 2) = -24.5833: consteln(238) = "Oph"
   constelxy(239, 0) = 0#: constelxy(239, 1) = 1.6667: constelxy(239, 2) = -25.5: consteln(239) = "Cet"
   constelxy(240, 0) = 21.3333: constelxy(240, 1) = 21.8667: constelxy(240, 2) = -25.5: consteln(240) = "Cap"
   constelxy(241, 0) = 21.8667: constelxy(241, 1) = 23.8333: constelxy(241, 2) = -25.5: consteln(241) = "Aqr"
   constelxy(242, 0) = 23.8333: constelxy(242, 1) = 24#: constelxy(242, 2) = -25.5: consteln(242) = "Cet"
   constelxy(243, 0) = 9.75: constelxy(243, 1) = 10.25: constelxy(243, 2) = -26.5: consteln(243) = "Hya"
   constelxy(244, 0) = 4.7: constelxy(244, 1) = 4.8333: constelxy(244, 2) = -27.25: consteln(244) = "Eri"
   constelxy(245, 0) = 4.8333: constelxy(245, 1) = 6.1167: constelxy(245, 2) = -27.25: consteln(245) = "Lep"
   constelxy(246, 0) = 20#: constelxy(246, 1) = 21.3333: constelxy(246, 2) = -28#: consteln(246) = "Cap"
   constelxy(247, 0) = 10.25: constelxy(247, 1) = 10.5833: constelxy(247, 2) = -29.1667: consteln(247) = "Hya"
   constelxy(248, 0) = 12.5833: constelxy(248, 1) = 14.9167: constelxy(248, 2) = -29.5: consteln(248) = "Hya"
   constelxy(249, 0) = 14.9167: constelxy(249, 1) = 15.6667: constelxy(249, 2) = -29.5: consteln(249) = "Lib"
   constelxy(250, 0) = 15.6667: constelxy(250, 1) = 16#: constelxy(250, 2) = -29.5: consteln(250) = "Sco"
   constelxy(251, 0) = 4.5833: constelxy(251, 1) = 4.7: constelxy(251, 2) = -30#: consteln(251) = "Eri"
   constelxy(252, 0) = 16.75: constelxy(252, 1) = 17.6: constelxy(252, 2) = -30#: consteln(252) = "Oph"
   constelxy(253, 0) = 17.6: constelxy(253, 1) = 17.8333: constelxy(253, 2) = -30#: consteln(253) = "Sgr"
   constelxy(254, 0) = 10.5833: constelxy(254, 1) = 10.8333: constelxy(254, 2) = -31.1667: consteln(254) = "Hya"
   constelxy(255, 0) = 6.1167: constelxy(255, 1) = 7.3667: constelxy(255, 2) = -33#: consteln(255) = "CMa"
   constelxy(256, 0) = 12.25: constelxy(256, 1) = 12.5833: constelxy(256, 2) = -33#: consteln(256) = "Hya"
   constelxy(257, 0) = 10.8333: constelxy(257, 1) = 12.25: constelxy(257, 2) = -35#: consteln(257) = "Hya"
   constelxy(258, 0) = 3.5: constelxy(258, 1) = 3.75: constelxy(258, 2) = -36#: consteln(258) = "For"
   constelxy(259, 0) = 8.3667: constelxy(259, 1) = 9.3667: constelxy(259, 2) = -36.75: consteln(259) = "Pyx"
   constelxy(260, 0) = 4.2667: constelxy(260, 1) = 4.5833: constelxy(260, 2) = -37#: consteln(260) = "Eri"
   constelxy(261, 0) = 17.8333: constelxy(261, 1) = 19.1667: constelxy(261, 2) = -37#: consteln(261) = "Sgr"
   constelxy(262, 0) = 21.3333: constelxy(262, 1) = 23#: constelxy(262, 2) = -37#: consteln(262) = "PsA"
   constelxy(263, 0) = 23#: constelxy(263, 1) = 23.3333: constelxy(263, 2) = -37#: consteln(263) = "Scl"
   constelxy(264, 0) = 3#: constelxy(264, 1) = 3.5: constelxy(264, 2) = -39.5833: consteln(264) = "For"
   constelxy(265, 0) = 9.3667: constelxy(265, 1) = 11#: constelxy(265, 2) = -39.75: consteln(265) = "Ant"
   constelxy(266, 0) = 0#: constelxy(266, 1) = 1.6667: constelxy(266, 2) = -40#: consteln(266) = "Scl"
   constelxy(267, 0) = 1.6667: constelxy(267, 1) = 3#: constelxy(267, 2) = -40#: consteln(267) = "For"
   constelxy(268, 0) = 3.8667: constelxy(268, 1) = 4.2667: constelxy(268, 2) = -40#: consteln(268) = "Eri"
   constelxy(269, 0) = 23.3333: constelxy(269, 1) = 24#: constelxy(269, 2) = -40#: consteln(269) = "Scl"
   constelxy(270, 0) = 14.1667: constelxy(270, 1) = 14.9167: constelxy(270, 2) = -42#: consteln(270) = "Cen"
   constelxy(271, 0) = 15.6667: constelxy(271, 1) = 16#: constelxy(271, 2) = -42#: consteln(271) = "Lup"
   constelxy(272, 0) = 16#: constelxy(272, 1) = 16.4208: constelxy(272, 2) = -42#: consteln(272) = "Sco"
   constelxy(273, 0) = 4.8333: constelxy(273, 1) = 5#: constelxy(273, 2) = -43#: consteln(273) = "Cae"
   constelxy(274, 0) = 5#: constelxy(274, 1) = 6.5833: constelxy(274, 2) = -43#: consteln(274) = "Col"
   constelxy(275, 0) = 8#: constelxy(275, 1) = 8.3667: constelxy(275, 2) = -43#: consteln(275) = "Pup"
   constelxy(276, 0) = 3.4167: constelxy(276, 1) = 3.8667: constelxy(276, 2) = -44#: consteln(276) = "Eri"
   constelxy(277, 0) = 16.4208: constelxy(277, 1) = 17.8333: constelxy(277, 2) = -45.5: consteln(277) = "Sco"
   constelxy(278, 0) = 17.8333: constelxy(278, 1) = 19.1667: constelxy(278, 2) = -45.5: consteln(278) = "CrA"
   constelxy(279, 0) = 19.1667: constelxy(279, 1) = 20.3333: constelxy(279, 2) = -45.5: consteln(279) = "Sgr"
   constelxy(280, 0) = 20.3333: constelxy(280, 1) = 21.3333: constelxy(280, 2) = -45.5: consteln(280) = "Mic"
   constelxy(281, 0) = 3#: constelxy(281, 1) = 3.4167: constelxy(281, 2) = -46#: consteln(281) = "Eri"
   constelxy(282, 0) = 4.5: constelxy(282, 1) = 4.8333: constelxy(282, 2) = -46.5: consteln(282) = "Cae"
   constelxy(283, 0) = 15.3333: constelxy(283, 1) = 15.6667: constelxy(283, 2) = -48#: consteln(283) = "Lup"
   constelxy(284, 0) = 0#: constelxy(284, 1) = 2.3333: constelxy(284, 2) = -48.1667: consteln(284) = "Phe"
   constelxy(285, 0) = 2.6667: constelxy(285, 1) = 3#: constelxy(285, 2) = -49#: consteln(285) = "Eri"
   constelxy(286, 0) = 4.0833: constelxy(286, 1) = 4.2667: constelxy(286, 2) = -49#: consteln(286) = "Hor"
   constelxy(287, 0) = 4.2667: constelxy(287, 1) = 4.5: constelxy(287, 2) = -49#: consteln(287) = "Cae"
   constelxy(288, 0) = 21.3333: constelxy(288, 1) = 22#: constelxy(288, 2) = -50#: consteln(288) = "Gru"
   constelxy(289, 0) = 6#: constelxy(289, 1) = 8#: constelxy(289, 2) = -50.75: consteln(289) = "Pup"
   constelxy(290, 0) = 8#: constelxy(290, 1) = 8.1667: constelxy(290, 2) = -50.75: consteln(290) = "Vel"
   constelxy(291, 0) = 2.4167: constelxy(291, 1) = 2.6667: constelxy(291, 2) = -51#: consteln(291) = "Eri"
   constelxy(292, 0) = 3.8333: constelxy(292, 1) = 4.0833: constelxy(292, 2) = -51#: consteln(292) = "Hor"
   constelxy(293, 0) = 0#: constelxy(293, 1) = 1.8333: constelxy(293, 2) = -51.5: consteln(293) = "Phe"
   constelxy(294, 0) = 6#: constelxy(294, 1) = 6.1667: constelxy(294, 2) = -52.5: consteln(294) = "Car"
   constelxy(295, 0) = 8.1667: constelxy(295, 1) = 8.45: constelxy(295, 2) = -53#: consteln(295) = "Vel"
   constelxy(296, 0) = 3.5: constelxy(296, 1) = 3.8333: constelxy(296, 2) = -53.1667: consteln(296) = "Hor"
   constelxy(297, 0) = 3.8333: constelxy(297, 1) = 4#: constelxy(297, 2) = -53.1667: consteln(297) = "Dor"
   constelxy(298, 0) = 0#: constelxy(298, 1) = 1.5833: constelxy(298, 2) = -53.5: consteln(298) = "Phe"
   constelxy(299, 0) = 2.1667: constelxy(299, 1) = 2.4167: constelxy(299, 2) = -54#: consteln(299) = "Eri"
   constelxy(300, 0) = 4.5: constelxy(300, 1) = 5#: constelxy(300, 2) = -54#: consteln(300) = "Pic"
   constelxy(301, 0) = 15.05: constelxy(301, 1) = 15.3333: constelxy(301, 2) = -54#: consteln(301) = "Lup"
   constelxy(302, 0) = 8.45: constelxy(302, 1) = 8.8333: constelxy(302, 2) = -54.5: consteln(302) = "Vel"
   constelxy(303, 0) = 6.1667: constelxy(303, 1) = 6.5: constelxy(303, 2) = -55#: consteln(303) = "Car"
   constelxy(304, 0) = 11.8333: constelxy(304, 1) = 12.8333: constelxy(304, 2) = -55#: consteln(304) = "Cen"
   constelxy(305, 0) = 14.1667: constelxy(305, 1) = 15.05: constelxy(305, 2) = -55#: consteln(305) = "Lup"
   constelxy(306, 0) = 15.05: constelxy(306, 1) = 15.3333: constelxy(306, 2) = -55#: consteln(306) = "Nor"
   constelxy(307, 0) = 4#: constelxy(307, 1) = 4.3333: constelxy(307, 2) = -56.5: consteln(307) = "Dor"
   constelxy(308, 0) = 8.8333: constelxy(308, 1) = 11#: constelxy(308, 2) = -56.5: consteln(308) = "Vel"
   constelxy(309, 0) = 11#: constelxy(309, 1) = 11.25: constelxy(309, 2) = -56.5: consteln(309) = "Cen"
   constelxy(310, 0) = 17.5: constelxy(310, 1) = 18#: constelxy(310, 2) = -57#: consteln(310) = "Ara"
   constelxy(311, 0) = 18#: constelxy(311, 1) = 20.3333: constelxy(311, 2) = -57#: consteln(311) = "Tel"
   constelxy(312, 0) = 22#: constelxy(312, 1) = 23.3333: constelxy(312, 2) = -57#: consteln(312) = "Gru"
   constelxy(313, 0) = 3.2: constelxy(313, 1) = 3.5: constelxy(313, 2) = -57.5: consteln(313) = "Hor"
   constelxy(314, 0) = 5#: constelxy(314, 1) = 5.5: constelxy(314, 2) = -57.5: consteln(314) = "Pic"
   constelxy(315, 0) = 6.5: constelxy(315, 1) = 6.8333: constelxy(315, 2) = -58#: consteln(315) = "Car"
   constelxy(316, 0) = 0#: constelxy(316, 1) = 1.3333: constelxy(316, 2) = -58.5: consteln(316) = "Phe"
   constelxy(317, 0) = 1.3333: constelxy(317, 1) = 2.1667: constelxy(317, 2) = -58.5: consteln(317) = "Eri"
   constelxy(318, 0) = 23.3333: constelxy(318, 1) = 24#: constelxy(318, 2) = -58.5: consteln(318) = "Phe"
   constelxy(319, 0) = 4.3333: constelxy(319, 1) = 4.5833: constelxy(319, 2) = -59#: consteln(319) = "Dor"
   constelxy(320, 0) = 15.3333: constelxy(320, 1) = 16.4208: constelxy(320, 2) = -60#: consteln(320) = "Nor"
   constelxy(321, 0) = 20.3333: constelxy(321, 1) = 21.3333: constelxy(321, 2) = -60#: consteln(321) = "Ind"
   constelxy(322, 0) = 5.5: constelxy(322, 1) = 6#: constelxy(322, 2) = -61#: consteln(322) = "Pic"
   constelxy(323, 0) = 15.1667: constelxy(323, 1) = 15.3333: constelxy(323, 2) = -61#: consteln(323) = "Cir"
   constelxy(324, 0) = 16.4208: constelxy(324, 1) = 16.5833: constelxy(324, 2) = -61#: consteln(324) = "Ara"
   constelxy(325, 0) = 14.9167: constelxy(325, 1) = 15.1667: constelxy(325, 2) = -63.5833: consteln(325) = "Cir"
   constelxy(326, 0) = 16.5833: constelxy(326, 1) = 16.75: constelxy(326, 2) = -63.5833: consteln(326) = "Ara"
   constelxy(327, 0) = 6#: constelxy(327, 1) = 6.8333: constelxy(327, 2) = -64#: consteln(327) = "Pic"
   constelxy(328, 0) = 6.8333: constelxy(328, 1) = 9.0333: constelxy(328, 2) = -64#: consteln(328) = "Car"
   constelxy(329, 0) = 11.25: constelxy(329, 1) = 11.8333: constelxy(329, 2) = -64#: consteln(329) = "Cen"
   constelxy(330, 0) = 11.8333: constelxy(330, 1) = 12.8333: constelxy(330, 2) = -64#: consteln(330) = "Cru"
   constelxy(331, 0) = 12.8333: constelxy(331, 1) = 14.5333: constelxy(331, 2) = -64#: consteln(331) = "Cen"
   constelxy(332, 0) = 13.5: constelxy(332, 1) = 13.6667: constelxy(332, 2) = -65#: consteln(332) = "Cir"
   constelxy(333, 0) = 16.75: constelxy(333, 1) = 16.8333: constelxy(333, 2) = -65#: consteln(333) = "Ara"
   constelxy(334, 0) = 2.1667: constelxy(334, 1) = 3.2: constelxy(334, 2) = -67.5: consteln(334) = "Hor"
   constelxy(335, 0) = 3.2: constelxy(335, 1) = 4.5833: constelxy(335, 2) = -67.5: consteln(335) = "Ret"
   constelxy(336, 0) = 14.75: constelxy(336, 1) = 14.9167: constelxy(336, 2) = -67.5: consteln(336) = "Cir"
   constelxy(337, 0) = 16.8333: constelxy(337, 1) = 17.5: constelxy(337, 2) = -67.5: consteln(337) = "Ara"
   constelxy(338, 0) = 17.5: constelxy(338, 1) = 18#: constelxy(338, 2) = -67.5: consteln(338) = "Pav"
   constelxy(339, 0) = 22#: constelxy(339, 1) = 23.3333: constelxy(339, 2) = -67.5: consteln(339) = "Tuc"
   constelxy(340, 0) = 4.5833: constelxy(340, 1) = 6.5833: constelxy(340, 2) = -70#: consteln(340) = "Dor"
   constelxy(341, 0) = 13.6667: constelxy(341, 1) = 14.75: constelxy(341, 2) = -70#: consteln(341) = "Cir"
   constelxy(342, 0) = 14.75: constelxy(342, 1) = 17#: constelxy(342, 2) = -70#: consteln(342) = "TrA"
   constelxy(343, 0) = 0#: constelxy(343, 1) = 1.3333: constelxy(343, 2) = -75#: consteln(343) = "Tuc"
   constelxy(344, 0) = 3.5: constelxy(344, 1) = 4.5833: constelxy(344, 2) = -75#: consteln(344) = "Hyi"
   constelxy(345, 0) = 6.5833: constelxy(345, 1) = 9.0333: constelxy(345, 2) = -75#: consteln(345) = "Vol"
   constelxy(346, 0) = 9.0333: constelxy(346, 1) = 11.25: constelxy(346, 2) = -75#: consteln(346) = "Car"
   constelxy(347, 0) = 11.25: constelxy(347, 1) = 13.6667: constelxy(347, 2) = -75#: consteln(347) = "Mus"
   constelxy(348, 0) = 18#: constelxy(348, 1) = 21.3333: constelxy(348, 2) = -75#: consteln(348) = "Pav"
   constelxy(349, 0) = 21.3333: constelxy(349, 1) = 23.3333: constelxy(349, 2) = -75#: consteln(349) = "Ind"
   constelxy(350, 0) = 23.3333: constelxy(350, 1) = 24#: constelxy(350, 2) = -75#: consteln(350) = "Tuc"
   constelxy(351, 0) = 0.75: constelxy(351, 1) = 1.3333: constelxy(351, 2) = -76#: consteln(351) = "Tuc"
   constelxy(352, 0) = 0#: constelxy(352, 1) = 3.5: constelxy(352, 2) = -82.5: consteln(352) = "Hyi"
   constelxy(353, 0) = 7.6667: constelxy(353, 1) = 13.6667: constelxy(353, 2) = -82.5: consteln(353) = "Cha"
   constelxy(354, 0) = 13.6667: constelxy(354, 1) = 18#: constelxy(354, 2) = -82.5: consteln(354) = "Aps"
   constelxy(355, 0) = 3.5: constelxy(355, 1) = 7.6667: constelxy(355, 2) = -85#: consteln(355) = "Men"
   constelxy(356, 0) = 0#: constelxy(356, 1) = 24#: constelxy(356, 2) = -90#: consteln(356) = "Oct"

   Dim convh As Double, convd As Double
   Dim newcoords As tcoord
   Dim i As Integer
   Dim yra As Double, ydec As Double

   convh = pi / 12#
   convd = pi / 180#

   newcoords.ra = xra * convh
   newcoords.dec = xdec * convd

   newcoords = precess(newcoords, epoch, 1875#)

   yra = newcoords.ra / convh
   ydec = newcoords.dec / convd

   nom_const = "n/a"
   For i = 0 To 357
       If Not (ydec < constelxy(i, 2) Or yra < constelxy(i, 0) Or yra >= constelxy(i, 1)) Then
           nom_const = consteln(i)
           Exit For
       End If
   Next i

End Function

 

Pour l'utiliser, je vous laisse le soin d'aller voir l'aide de VBA pour Excel. Il suffit de créer un nouveau module et d'y copier coller le code.

 

On se retrouve alors avec une nouvelle fonction dont la syntaxe est :

 

Nom_const(ra en heures, dec en degrés, époque)

 

Cette fonction retourne les 3 initiales officielles de la constallation.

 

Par exemple :

 

M31 a pour coordonnées en J2000 :

RA = 00h42.7m (=0.711666667)

DEC = +41°16' (=41.26666667).

 

La constellation sera :

=nom_const(0.7116667, 41.26667, 2000)

qui retourne And

 

 

Et voilà !

 

A+

 

Fred

jgricourt

jgricourt

Posté
Posté

Ah bah ça tombe bien je cherchais un truc comme ça pour exploiter les boundaries des constellations que l'on peut récupérer dans Simbad ... je vais le traduire directe en Java merci pour le partage ! :)

Fred_76

Fred_76

Posté
  • Auteur
Posté
Java et JavaScript sont deux choses bien différentes ;)

 

C'est quand même bien similaire surtout pour du code de base comme celui ci.

Rejoignez la conversation !

Vous pouvez répondre maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous pour poster avec votre compte.

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

×
 Partager
Aller sur la liste des sujets

  • En ligne récemment   0 membre est en ligne

    • Aucun utilisateur enregistré regarde cette page.
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer.