--[[ Get the name of the constellation by coordinates in epoch B1875
Raw data (Epoch: B1875, all values in degrees):
DE_low RA_low RA_up const
88.0000 0.0000 360.0000 UMi
86.5000 120.0000 217.5000 UMi
86.1667 315.0000 345.0000 UMi
86.0000 270.0000 315.0000 UMi
85.0000 0.0000 120.0000 Cep
82.0000 137.5000 160.0000 Cam
80.0000 0.0000 75.0000 Cep
80.0000 160.0000 217.5000 Cam
80.0000 262.5000 270.0000 UMi
80.0000 302.5000 315.0000 Dra
77.0000 0.0000 52.6250 Cep
77.0000 172.5000 203.7500 Cam
75.0000 248.0000 262.5000 UMi
75.0000 302.5000 310.0000 Cep
73.5000 119.5000 137.5000 Cam
73.5000 137.5000 170.0000 Dra
70.0000 195.0000 248.0000 UMi
68.0000 46.5000 51.2500 Cas
67.0000 306.2500 310.0000 Dra
66.5000 170.0000 180.0000 Dra
66.0000 0.0000 5.0000 Cep
66.0000 210.0000 235.0000 UMi
66.0000 353.7500 360.0000 Cep
64.0000 180.0000 202.5000 Dra
63.0000 202.5000 216.2500 Dra
63.0000 347.5000 353.7500 Cep
62.0000 91.5000 105.0000 Cam
61.5000 300.0000 306.2500 Dra
60.9167 308.0500 309.0000 Cep
60.0000 105.0000 119.5000 Cam
60.0000 119.5000 126.2500 UMa
59.5000 296.5000 300.0000 Dra
59.5000 300.0000 308.0500 Cep
59.0833 343.0000 347.5000 Cep
58.5000 0.0000 36.5000 Cas
58.0000 291.2500 296.5000 Dra
57.5000 25.5000 28.6250 Cas
57.0000 36.5000 46.5000 Cas
57.0000 46.5000 47.5000 Cam
56.2500 334.7500 343.0000 Cep
56.0000 75.0000 91.5000 Cam
55.5000 210.5000 216.2500 UMa
55.5000 216.2500 291.2500 Dra
55.0000 47.5000 50.0000 Cam
55.0000 332.0000 334.7500 Cep
54.8333 309.0000 329.5000 Cep
54.0000 0.0000 25.5000 Cas
54.0000 91.5000 97.5000 Lyn
53.0000 181.2500 202.5000 UMa
53.0000 228.7500 236.2500 Dra
52.7500 329.5000 332.0000 Cep
52.5000 50.0000 75.0000 Cam
52.5000 343.0000 350.0000 Cas
51.5000 236.2500 255.0000 Dra
50.5000 30.6250 37.7500 Per
50.5000 255.0000 273.5000 Dra
50.0000 0.0000 20.5000 Cas
50.0000 20.5000 25.0000 Per
50.0000 97.5000 102.0000 Lyn
50.0000 350.0000 360.0000 Cas
48.5000 202.5000 210.5000 UMa
48.0000 0.0000 16.7500 Cas
48.0000 353.7500 360.0000 Cas
47.5000 272.6250 273.5000 Her
47.5000 273.5000 286.2500 Dra
47.5000 286.2500 287.5000 Cyg
47.0000 25.0000 30.6250 Per
47.0000 126.2500 137.5000 UMa
46.0000 2.5000 13.0000 Cas
45.0000 180.0000 181.2500 UMa
44.5000 102.0000 110.5000 Lyn
44.0000 328.6250 329.5000 Cyg
43.7500 328.1250 328.6250 Cyg
43.5000 287.5000 291.0000 Cyg
42.0000 137.5000 152.5000 UMa
40.0000 152.5000 161.7500 UMa
40.0000 231.5000 236.2500 Boo
40.0000 236.2500 245.0000 Her
39.7500 138.7500 143.7500 Lyn
36.7500 0.0000 37.7500 And
36.7500 37.7500 38.5000 Per
36.5000 290.3750 291.0000 Lyr
36.0000 67.5000 70.3750 Per
36.0000 326.0000 328.1250 Cyg
36.0000 328.1250 330.0000 Lac
35.5000 98.0000 110.5000 Aur
35.5000 110.5000 116.2500 Lyn
35.0000 0.0000 30.0000 And
35.0000 330.0000 342.2500 Lac
34.5000 342.2500 343.0000 Lac
34.5000 343.0000 352.5000 And
34.0000 38.5000 40.7500 Per
34.0000 161.7500 165.0000 UMa
34.0000 180.0000 185.0000 CVn
33.5000 116.2500 138.7500 Lyn
33.5000 138.7500 148.2500 LMi
33.0000 10.7500 21.1250 And
33.0000 227.7500 231.5000 Boo
32.0833 352.5000 356.2500 And
32.0000 185.0000 198.7500 CVn
31.3333 356.2500 360.0000 And
30.7500 209.3750 210.5000 CVn
30.6667 36.2500 40.7500 Tri
30.6667 40.7500 67.5000 Per
30.0000 67.5000 71.2500 Aur
30.0000 272.6250 290.3750 Lyr
29.0000 165.0000 180.0000 UMa
29.0000 295.0000 313.7500 Cyg
28.5000 71.2500 88.2500 Aur
28.5000 148.2500 157.5000 LMi
28.5000 198.7500 209.3750 CVn
28.0000 0.0000 1.0000 And
28.0000 21.1250 25.0000 Tri
28.0000 88.2500 98.0000 Aur
28.0000 118.2500 120.0000 Gem
28.0000 313.7500 326.0000 Cyg
27.5000 288.8750 295.0000 Cyg
27.2500 28.7500 36.2500 Tri
27.0000 242.5000 245.0000 CrB
26.0000 226.2500 227.7500 Boo
26.0000 227.7500 242.5000 CrB
26.0000 275.5000 283.0000 Lyr
25.5000 161.2500 165.0000 LMi
25.5000 283.0000 288.8750 Lyr
25.0000 25.0000 28.7500 Tri
23.7500 10.7500 12.7500 Psc
23.5000 157.5000 161.2500 LMi
23.5000 318.7500 321.2500 Vul
22.8333 85.5000 88.2500 Tau
22.0000 1.0000 2.1250 And
22.0000 238.7500 240.5000 Ser
21.5000 88.2500 93.2500 Gem
21.2500 297.5000 303.7500 Vul
21.0833 283.0000 288.7500 Vul
21.0000 2.1250 12.7500 And
20.5000 303.7500 308.5000 Vul
20.0000 117.1250 118.2500 Gem
19.5000 308.5000 318.7500 Vul
19.1667 288.7500 297.5000 Vul
19.0000 49.2500 50.5000 Ari
18.5000 283.0000 285.0000 Sge
18.0000 85.5000 86.5000 Ori
17.5000 93.2500 94.6250 Gem
16.1667 285.0000 297.5000 Sge
16.0000 74.5000 80.0000 Tau
16.0000 238.7500 241.2500 Her
15.7500 297.5000 303.7500 Sge
15.5000 69.2500 74.5000 Tau
15.5000 80.0000 84.0000 Tau
15.0000 192.5000 202.5000 Com
14.3333 258.7500 273.7500 Her
14.0000 178.0000 192.5000 Com
13.5000 112.5000 117.1250 Gem
12.8333 251.2500 258.7500 Her
12.5000 0.0000 2.1250 Peg
12.5000 84.0000 86.5000 Tau
12.5000 105.0000 112.5000 Gem
12.5000 316.7500 320.0000 Peg
12.0000 94.6250 104.0000 Gem
12.0000 273.7500 283.0000 Her
11.8333 313.1250 315.7500 Del
11.8333 315.7500 316.7500 Peg
11.0000 172.7500 178.0000 Leo
10.0000 93.6250 94.6250 Ori
10.0000 104.0000 105.0000 Gem
10.0000 117.1250 118.8750 Cnc
10.0000 357.5000 360.0000 Peg
9.9167 25.0000 49.2500 Ari
8.5000 302.1250 304.5000 Del
8.0000 202.5000 226.2500 Boo
7.5000 341.2500 357.5000 Peg
7.0000 118.8750 138.7500 Cnc
7.0000 138.7500 161.2500 Leo
6.2500 273.7500 279.9333 Oph
6.2500 279.9333 280.0000 Aql
6.0000 312.5000 313.1250 Del
5.5000 105.0000 105.2500 CMi
4.5000 273.7500 276.3750 Ser
4.0000 241.2500 251.2500 Her
3.0000 273.7500 276.3750 Oph
2.7500 322.0000 325.0000 Peg
2.0000 0.0000 30.0000 Psc
2.0000 278.7500 283.0000 Ser
2.0000 304.5000 312.5000 Del
2.0000 312.5000 320.0000 Equ
2.0000 320.0000 322.0000 Peg
2.0000 330.0000 341.2500 Peg
1.7500 325.0000 330.0000 Peg
1.5000 105.2500 108.0000 CMi
0.0000 53.7500 69.2500 Tau
0.0000 69.2500 70.0000 Ori
0.0000 108.0000 121.2500 CMi
0.0000 220.0000 226.2500 Vir
0.0000 267.5000 273.7500 Oph
-1.7500 39.7500 49.2500 Cet
-1.7500 49.2500 53.7500 Tau
-3.2500 226.2500 244.0000 Ser
-4.0000 70.0000 76.2500 Ori
-4.0000 87.5000 93.6250 Ori
-4.0000 267.5000 269.5000 Ser
-4.0000 273.7500 278.7500 Ser
-4.0000 278.7500 283.0000 Aql
-4.0000 341.2500 357.5000 Psc
-6.0000 161.2500 172.7500 Leo
-6.0000 172.7500 177.5000 Vir
-7.0000 0.0000 5.0000 Psc
-7.0000 357.5000 360.0000 Psc
-8.0000 213.7500 220.0000 Vir
-8.0000 238.7500 244.0000 Oph
-9.0000 300.0000 308.0000 Aql
-9.0000 320.0000 328.0000 Aqr
-10.0000 257.5000 269.5000 Oph
-11.0000 87.5000 121.2500 Mon
-11.0000 73.7500 76.2500 Eri
-11.0000 76.2500 87.5000 Ori
-11.0000 121.2500 125.5000 Hya
-11.0000 143.7500 161.2500 Sex
-11.0000 177.5000 192.5000 Vir
-11.6667 263.7500 265.0000 Oph
-12.0333 283.0000 300.0000 Aql
-14.5000 72.5000 73.7500 Eri
-15.0000 308.0000 320.0000 Aqr
-16.0000 257.5000 273.7500 Ser
-16.0000 273.7500 283.0000 Sct
-17.0000 125.5000 128.7500 Hya
-18.2500 244.0000 245.6250 Oph
-19.0000 128.7500 136.2500 Hya
-19.0000 161.2500 162.5000 Crt
-19.2500 244.0000 245.6250 Sco
-20.0000 235.0000 238.7500 Lib
-22.0000 188.7500 192.5000 Crv
-22.0000 192.5000 213.7500 Vir
-24.0000 136.2500 146.2500 Hya
-24.3833 25.0000 39.7500 Cet
-24.3833 39.7500 56.2500 Eri
-24.5000 162.5000 177.5000 Crt
-24.5000 177.5000 188.7500 Crv
-24.5000 213.7500 223.7500 Lib
-24.5833 244.0000 251.2500 Oph
-25.5000 0.0000 25.0000 Cet
-25.5000 320.0000 328.0000 Cap
-25.5000 328.0000 357.5000 Aqr
-25.5000 357.5000 360.0000 Cet
-26.5000 146.2500 153.7500 Hya
-27.2500 70.5000 72.5000 Eri
-27.2500 72.5000 91.7500 Lep
-28.0000 300.0000 320.0000 Cap
-29.1667 153.7500 158.7500 Hya
-29.5000 188.7500 223.7500 Hya
-29.5000 223.7500 235.0000 Lib
-29.5000 235.0000 240.0000 Sco
-30.0000 68.7500 70.5000 Eri
-30.0000 251.2500 264.0000 Oph
-30.0000 264.0000 267.5000 Sgr
-31.1667 158.7500 162.5000 Hya
-33.0000 91.7500 110.5000 CMa
-33.0000 183.7500 188.7500 Hya
-35.0000 162.5000 183.7500 Hya
-36.0000 52.5000 56.2500 For
-36.7500 125.5000 140.5000 Pyx
-37.0000 64.0000 68.7500 Eri
-37.0000 267.5000 287.5000 Sgr
-37.0000 320.0000 345.0000 PsA
-37.0000 345.0000 350.0000 Scl
-39.5833 45.0000 52.5000 For
-39.7500 140.5000 165.0000 Ant
-40.0000 0.0000 25.0000 Scl
-40.0000 25.0000 45.0000 For
-40.0000 58.0000 64.0000 Eri
-40.0000 350.0000 360.0000 Scl
-42.0000 212.5000 223.7500 Cen
-42.0000 235.0000 240.0000 Lup
-42.0000 240.0000 246.3125 Sco
-43.0000 72.5000 75.0000 Cae
-43.0000 75.0000 98.7500 Col
-43.0000 120.0000 125.5000 Pup
-44.0000 51.2500 58.0000 Eri
-45.5000 246.3125 267.5000 Sco
-45.5000 267.5000 287.5000 CrA
-45.5000 287.5000 305.0000 Sgr
-45.5000 305.0000 320.0000 Mic
-46.0000 45.0000 51.2500 Eri
-46.5000 67.5000 72.5000 Cae
-48.0000 230.0000 235.0000 Lup
-48.1667 0.0000 35.0000 Phe
-49.0000 40.0000 45.0000 Eri
-49.0000 61.2500 64.0000 Hor
-49.0000 64.0000 67.5000 Cae
-50.0000 320.0000 330.0000 Gru
-50.7500 90.0000 120.0000 Pup
-50.7500 120.0000 122.5000 Vel
-51.0000 36.2500 40.0000 Eri
-51.0000 57.5000 61.2500 Hor
-51.5000 0.0000 27.5000 Phe
-52.5000 90.0000 92.5000 Car
-53.0000 122.5000 126.7500 Vel
-53.1667 52.5000 57.5000 Hor
-53.1667 57.5000 60.0000 Dor
-53.5000 0.0000 23.7500 Phe
-54.0000 32.5000 36.2500 Eri
-54.0000 67.5000 75.0000 Pic
-54.0000 225.7500 230.0000 Lup
-54.5000 126.7500 132.5000 Vel
-55.0000 92.5000 97.5000 Car
-55.0000 177.5000 192.5000 Cen
-55.0000 212.5000 225.7500 Lup
-55.0000 225.7500 230.0000 Nor
-56.5000 60.0000 65.0000 Dor
-56.5000 132.5000 165.0000 Vel
-56.5000 165.0000 168.7500 Cen
-57.0000 262.5000 270.0000 Ara
-57.0000 270.0000 305.0000 Tel
-57.0000 330.0000 350.0000 Gru
-57.5000 48.0000 52.5000 Hor
-57.5000 75.0000 82.5000 Pic
-58.0000 97.5000 102.5000 Car
-58.5000 0.0000 20.0000 Phe
-58.5000 20.0000 32.5000 Eri
-58.5000 350.0000 360.0000 Phe
-59.0000 65.0000 68.7500 Dor
-60.0000 230.0000 246.3125 Nor
-60.0000 305.0000 320.0000 Ind
-61.0000 82.5000 90.0000 Pic
-61.0000 227.5000 230.0000 Cir
-61.0000 246.3125 248.7500 Ara
-63.5833 223.7500 227.5000 Cir
-63.5833 248.7500 251.2500 Ara
-64.0000 90.0000 102.5000 Pic
-64.0000 102.5000 135.5000 Car
-64.0000 168.7500 177.5000 Cen
-64.0000 177.5000 192.5000 Cru
-64.0000 192.5000 218.0000 Cen
-65.0000 202.5000 205.0000 Cir
-65.0000 251.2500 252.5000 Ara
-67.5000 32.5000 48.0000 Hor
-67.5000 48.0000 68.7500 Ret
-67.5000 221.2500 223.7500 Cir
-67.5000 252.5000 262.5000 Ara
-67.5000 262.5000 270.0000 Pav
-67.5000 330.0000 350.0000 Tuc
-70.0000 68.7500 98.7500 Dor
-70.0000 205.0000 221.2500 Cir
-70.0000 221.2500 255.0000 TrA
-75.0000 0.0000 20.0000 Tuc
-75.0000 52.5000 68.7500 Hyi
-75.0000 98.7500 135.5000 Vol
-75.0000 135.5000 168.7500 Car
-75.0000 168.7500 205.0000 Mus
-75.0000 270.0000 320.0000 Pav
-75.0000 320.0000 350.0000 Ind
-75.0000 350.0000 360.0000 Tuc
-76.0000 11.2500 20.0000 Tuc
-82.5000 0.0000 52.5000 Hyi
-82.5000 115.0000 205.0000 Cha
-82.5000 205.0000 270.0000 Aps
-85.0000 52.5000 115.0000 Men
-90.0000 0.0000 360.0000 Oct
]]
--[=[ How it works:
Position alp = right ascension (RA) in degrees(!) del = declination in degrees
1) Search in the table in the left column one downward, until you find a value,
that is not northern of (= not greater than) the position.
2) Compare alp with the starting (column 2) and ending (column 3) value
of right ascension.
3) In case that alp is between those values, you can read in column 4 the
abbrevation of the constellation and the search takes end.
4) In case that alp is NOT between those values, take the next row in the table
and repeat steps 2) and 3)
]=]
local Const = { }
function Const.SearchConst(alfB, delB)
-- borders in arcmin to set exact values
local alfBmin = alfB * 60;
local delBmin = delB * 60;
local DElowmin ={ 5280, 5190, 5170, 5160, 5100, 4920, 4800, 4800, 4800, 4800, 4620, 4620, 4500, 4500, 4410, 4410, 4200, 4080, 4020, 3990, 3960, 3960, 3960, 3840, 3780, 3780, 3720, 3690, 3655, 3600, 3600, 3570, 3570, 3545, 3510, 3480, 3450, 3420, 3420, 3375, 3360, 3330, 3330, 3300, 3300, 3290, 3240, 3240, 3180, 3180, 3165, 3150, 3150, 3090, 3030, 3030, 3000, 3000, 3000, 3000, 2910, 2880, 2880, 2850, 2850, 2850, 2820, 2820, 2760, 2700, 2670, 2640, 2625, 2610, 2520, 2400, 2400, 2400, 2385, 2205, 2205, 2190, 2160, 2160, 2160, 2130, 2130, 2100, 2100, 2070, 2070, 2040, 2040, 2040, 2010, 2010, 1980, 1980, 1925, 1920, 1880, 1845, 1840, 1840, 1800, 1800, 1740, 1740, 1710, 1710, 1710, 1680, 1680, 1680, 1680, 1680, 1650, 1635, 1620, 1560, 1560, 1560, 1530, 1530, 1500, 1425, 1410, 1410, 1370, 1320, 1320, 1290, 1275, 1265, 1260, 1230, 1200, 1170, 1150, 1140, 1110, 1080, 1050, 970, 960, 960, 945, 930, 930, 900, 860, 840, 810, 770, 750, 750, 750, 750, 720, 720, 710, 710, 660, 600, 600, 600, 600, 595, 510, 480, 450, 420, 420, 375, 375, 360, 330, 270, 240, 180, 165, 120, 120, 120, 120, 120, 120, 105, 90, 0, 0, 0, 0, 0, -105, -105, -195, -240, -240, -240, -240, -240, -240, -360, -360, -420, -420, -480, -480, -540, -540, -600, -660, -660, -660, -660, -660, -660, -700, -722, -870, -900, -960, -960, -1020, -1095, -1140, -1140, -1155, -1200, -1320, -1320, -1440, -1463, -1463, -1470, -1470, -1470, -1475, -1530, -1530, -1530, -1530, -1590, -1635, -1635, -1680, -1750, -1770, -1770, -1770, -1800, -1800, -1800, -1870, -1980, -1980, -2100, -2160, -2205, -2220, -2220, -2220, -2220, -2375, -2385, -2400, -2400, -2400, -2400, -2520, -2520, -2520, -2580, -2580, -2580, -2640, -2730, -2730, -2730, -2730, -2760, -2790, -2880, -2890, -2940, -2940, -2940, -3000, -3045, -3045, -3060, -3060, -3090, -3150, -3180, -3190, -3190, -3210, -3240, -3240, -3240, -3270, -3300, -3300, -3300, -3300, -3390, -3390, -3390, -3420, -3420, -3420, -3450, -3450, -3480, -3510, -3510, -3510, -3540, -3600, -3600, -3660, -3660, -3660, -3815, -3815, -3840, -3840, -3840, -3840, -3840, -3900, -3900, -4050, -4050, -4050, -4050, -4050, -4050, -4200, -4200, -4200, -4500, -4500, -4500, -4500, -4500, -4500, -4500, -4500, -4560, -4950, -4950, -4950, -5100, -5400 }
local RAlowmin ={ 0, 7200, 18900, 16200, 0, 8250, 0, 9600, 15750, 18150, 0, 10350, 14880, 18150, 7170, 8250, 11700, 2790, 18375, 10200, 0, 12600, 21225, 10800, 12150, 20850, 5490, 18000, 18483, 6300, 7170, 17790, 18000, 20580, 0, 17475, 1530, 2190, 2790, 20085, 4500, 12630, 12975, 2850, 19920, 18540, 0, 5490, 10875, 13725, 19770, 3000, 20580, 14175, 1837.5, 15300, 0, 1230, 5850, 21000, 12150, 0, 21225, 16357.5, 16410, 17175, 1500, 7575, 150, 10800, 6120, 19717.5, 19687.5, 17250, 8250, 9150, 13890, 14175, 8325, 0, 2265, 17422.5, 4050, 19560, 19687.5, 5880, 6630, 0, 19800, 20535, 20580, 2310, 9705, 10800, 6975, 8325, 645, 13665, 21150, 11100, 21375, 12562.5, 2175, 2445, 4050, 16357.5, 9900, 17700, 4275, 8895, 11925, 0, 1267.5, 5295, 7095, 18825, 17332.5, 1725, 14550, 13575, 13665, 16530, 9675, 16980, 1500, 645, 9450, 19125, 5130, 60, 14325, 5295, 17850, 16980, 127.5, 18225, 7027.5, 18510, 17325, 2955, 16980, 5130, 5595, 17100, 4470, 14325, 17850, 4155, 4800, 11550, 15525, 10680, 6750, 15075, 0, 5040, 6300, 19005, 5677.5, 16425, 18787.5, 18945, 10365, 5617.5, 6240, 7027.5, 21450, 1500, 18127.5, 12150, 20475, 7132.5, 8325, 16425, 16796, 18750, 6300, 16425, 14475, 16425, 19320, 0, 16725, 18270, 18750, 19200, 19800, 19500, 6315, 3225, 4155, 6480, 13200, 16050, 2385, 2955, 13575, 4200, 5250, 16050, 16425, 16725, 20475, 9675, 10365, 0, 21450, 12825, 14325, 18000, 19200, 15450, 5250, 4425, 4575, 7275, 8625, 10650, 15825, 16980, 4350, 18480, 15450, 16425, 7530, 14640, 7725, 9675, 14640, 14100, 11325, 11550, 8175, 1500, 2385, 9750, 10650, 12825, 14640, 0, 19200, 19680, 21450, 8775, 4230, 4350, 18000, 9225, 11325, 13425, 14100, 4125, 15075, 15840, 9525, 5505, 11025, 9750, 3150, 7530, 3840, 16050, 19200, 20700, 2700, 8430, 0, 1500, 3480, 21000, 12750, 14100, 14400, 4350, 4500, 7200, 3075, 14778.75, 16050, 17250, 18300, 2700, 4050, 13800, 0, 2400, 3675, 3840, 19200, 5400, 7200, 2175, 3450, 0, 5400, 7350, 3150, 3450, 0, 1950, 4050, 13545, 7605, 5550, 10650, 12750, 13545, 3600, 7950, 9900, 15750, 16200, 19800, 2880, 4500, 5850, 0, 1200, 21000, 3900, 13800, 18300, 4950, 13650, 14778.75, 13425, 14925, 5400, 6150, 10125, 10650, 11550, 12150, 15075, 1950, 2880, 13275, 15150, 15750, 19800, 4125, 12300, 13275, 0, 3150, 5925, 8130, 10125, 16200, 19200, 21000, 675, 0, 6900, 12300, 3150, 0 }
local RAuprmin ={ 21600, 13050, 20700, 18900, 7200, 9600, 4500, 13050, 16200, 18900, 3157.5, 12225, 15750, 18600, 8250, 10200, 14880, 3075, 18600, 10800, 300, 14100, 21600, 12150, 12975, 21225, 6300, 18375, 18540, 7170, 7575, 18000, 18483, 20850, 2190, 17790, 1717.5, 2790, 2850, 20580, 5490, 12975, 17475, 3000, 20085, 19770, 1530, 5850, 12150, 14175, 19920, 4500, 21000, 15300, 2265, 16410, 1230, 1500, 6120, 21600, 12630, 1005, 21600, 16410, 17175, 17250, 1837.5, 8250, 780, 10875, 6630, 19770, 19717.5, 17460, 9150, 9705, 14175, 14700, 8625, 2265, 2310, 17460, 4222.5, 19687.5, 19800, 6630, 6975, 1800, 20535, 20580, 21150, 2445, 9900, 11100, 8325, 8895, 1267.5, 13890, 21375, 11925, 21600, 12630, 2445, 4050, 4275, 17422.5, 10800, 18825, 5295, 9450, 12562.5, 60, 1500, 5880, 7200, 19560, 17700, 2175, 14700, 13665, 14550, 16980, 9900, 17332.5, 1725, 765, 9675, 19275, 5295, 127.5, 14430, 5595, 18225, 17325, 765, 18510, 7095, 19125, 17850, 3030, 17100, 5190, 5677.5, 17850, 4800, 14475, 18225, 4470, 5040, 12150, 16425, 11550, 7027.5, 15525, 127.5, 5190, 6750, 19200, 6240, 16980, 18945, 19005, 10680, 5677.5, 6300, 7132.5, 21600, 2955, 18270, 13575, 21450, 8325, 9675, 16796, 16800, 18787.5, 6315, 16582.5, 15075, 16582.5, 19500, 1800, 16980, 18750, 19200, 19320, 20475, 19800, 6480, 4155, 4200, 7275, 13575, 16425, 2955, 3225, 14640, 4575, 5617.5, 16170, 16725, 16980, 21450, 10365, 10650, 300, 21600, 13200, 14640, 18480, 19680, 16170, 7275, 4575, 5250, 7530, 9675, 11550, 15900, 18000, 4425, 19200, 16425, 16980, 7725, 14737.5, 8175, 9750, 14737.5, 14325, 11550, 12825, 8775, 2385, 3375, 10650, 11325, 13425, 15075, 1500, 19680, 21450, 21600, 9225, 4350, 5505, 19200, 9525, 13425, 14100, 14400, 4230, 15840, 16050, 9750, 6630, 11325, 11025, 3375, 8430, 4125, 17250, 20700, 21000, 3150, 9900, 1500, 2700, 3840, 21600, 13425, 14400, 14778.75, 4500, 5925, 7530, 3480, 16050, 17250, 18300, 19200, 3075, 4350, 14100, 2100, 2700, 3840, 4050, 19800, 7200, 7350, 2400, 3675, 1650, 5550, 7605, 3450, 3600, 1425, 2175, 4500, 13800, 7950, 5850, 11550, 13545, 13800, 3900, 9900, 10125, 16200, 18300, 21000, 3150, 4950, 6150, 1200, 1950, 21600, 4125, 14778.75, 19200, 5400, 13800, 14925, 13650, 15075, 6150, 8130, 10650, 11550, 13080, 12300, 15150, 2880, 4125, 13425, 15750, 16200, 21000, 5925, 13275, 15300, 1200, 4125, 8130, 10125, 12300, 19200, 21000, 21600, 1200, 3150, 12300, 16200, 6900, 21600 }
local ConstTbl ={ "UMi", "UMi", "UMi", "UMi", "Cep", "Cam", "Cep", "Cam", "UMi", "Dra", "Cep", "Cam", "UMi", "Cep", "Cam", "Dra", "UMi", "Cas", "Dra", "Dra", "Cep", "UMi", "Cep", "Dra", "Dra", "Cep", "Cam", "Dra", "Cep", "Cam", "UMa", "Dra", "Cep", "Cep", "Cas", "Dra", "Cas", "Cas", "Cam", "Cep", "Cam", "UMa", "Dra", "Cam", "Cep", "Cep", "Cas", "Lyn", "UMa", "Dra", "Cep", "Cam", "Cas", "Dra", "Per", "Dra", "Cas", "Per", "Lyn", "Cas", "UMa", "Cas", "Cas", "Her", "Dra", "Cyg", "Per", "UMa", "Cas", "UMa", "Lyn", "Cyg", "Cyg", "Cyg", "UMa", "UMa", "Boo", "Her", "Lyn", "And", "Per", "Lyr", "Per", "Cyg", "Lac", "Aur", "Lyn", "And", "Lac", "Lac", "And", "Per", "UMa", "CVn", "Lyn", "LMi", "And", "Boo", "And", "CVn", "And", "CVn", "Tri", "Per", "Aur", "Lyr", "UMa", "Cyg", "Aur", "LMi", "CVn", "And", "Tri", "Aur", "Gem", "Cyg", "Cyg", "Tri", "CrB", "Boo", "CrB", "Lyr", "LMi", "Lyr", "Tri", "Psc", "LMi", "Vul", "Tau", "And", "Ser", "Gem", "Vul", "Vul", "And", "Vul", "Gem", "Vul", "Vul", "Ari", "Sge", "Ori", "Gem", "Sge", "Tau", "Her", "Sge", "Tau", "Tau", "Com", "Her", "Com", "Gem", "Her", "Peg", "Tau", "Gem", "Peg", "Gem", "Her", "Del", "Peg", "Leo", "Ori", "Gem", "Cnc", "Peg", "Ari", "Del", "Boo", "Peg", "Cnc", "Leo", "Oph", "Aql", "Del", "CMi", "Ser", "Her", "Oph", "Peg", "Psc", "Ser", "Del", "Equ", "Peg", "Peg", "Peg", "CMi", "Tau", "Ori", "CMi", "Vir", "Oph", "Cet", "Tau", "Ser", "Ori", "Ori", "Ser", "Ser", "Aql", "Psc", "Leo", "Vir", "Psc", "Psc", "Vir", "Oph", "Aql", "Aqr", "Oph", "Mon", "Eri", "Ori", "Hya", "Sex", "Vir", "Oph", "Aql", "Eri", "Aqr", "Ser", "Sct", "Hya", "Oph", "Hya", "Crt", "Sco", "Lib", "Crv", "Vir", "Hya", "Cet", "Eri", "Crt", "Crv", "Lib", "Oph", "Cet", "Cap", "Aqr", "Cet", "Hya", "Eri", "Lep", "Cap", "Hya", "Hya", "Lib", "Sco", "Eri", "Oph", "Sgr", "Hya", "CMa", "Hya", "Hya", "For", "Pyx", "Eri", "Sgr", "PsA", "Scl", "For", "Ant", "Scl", "For", "Eri", "Scl", "Cen", "Lup", "Sco", "Cae", "Col", "Pup", "Eri", "Sco", "CrA", "Sgr", "Mic", "Eri", "Cae", "Lup", "Phe", "Eri", "Hor", "Cae", "Gru", "Pup", "Vel", "Eri", "Hor", "Phe", "Car", "Vel", "Hor", "Dor", "Phe", "Eri", "Pic", "Lup", "Vel", "Car", "Cen", "Lup", "Nor", "Dor", "Vel", "Cen", "Ara", "Tel", "Gru", "Hor", "Pic", "Car", "Phe", "Eri", "Phe", "Dor", "Nor", "Ind", "Pic", "Cir", "Ara", "Cir", "Ara", "Pic", "Car", "Cen", "Cru", "Cen", "Cir", "Ara", "Hor", "Ret", "Cir", "Ara", "Pav", "Tuc", "Dor", "Cir", "TrA", "Tuc", "Hyi", "Vol", "Car", "Mus", "Pav", "Ind", "Tuc", "Tuc", "Hyi", "Cha", "Aps", "Men", "Oct" }
local alflow = 0
local alfupr = 0
local found = false
local Currentconst ="";
for i,v in ipairs(DElowmin) do
if v <= delBmin then
alflow = RAlowmin[i];
alfupr = RAuprmin[i];
if alflow <= alfBmin and alfBmin < alfupr then
found = true;
end
end
if found then
Currentconst = ConstTbl[i];
break;
end
end
return Currentconst;
end
return Const
