Théodolite - coordonnées azimutales
                    - coordonnées horaires et équatoriales

Coordonnées azimutales

Coordonnées horaires et équatoriales

Socle horizontal

socle parallèle à l'équateur

TS

AD

H

  Pour animer ou arrêter la rotation diurne :
     cliquer sur le petit bouton en bas à gauche.

  On vérifie que l'ascension droite ne change pas. 
  L'angle horaire croit avec le temps.

cazhor: 180.264
cequat: 120.8
α = 22.4 (slider from 0 to 24, step 0.1)
tsid = 25.4 (slider from 0 to 48, step 0.1)
H = Mod(tsid - α + 24, 24)
E_1: ((cequat * sqrt(2)); (((-tsid) * 15) + 225)°)
E_2: ((cequat * sqrt(2)); (((-tsid) * 15) + 315)°)
dhor = Ray((0, 0), (1; (90 - (H * 15))°))
sctalpha = CircleSector((0, 0), (112; (90 - (tsid * 15))°), (112; (90 - (H * 15))°))
sctH = CircleSector((0, 0), (125; (90 - (H * 15))°), (125; 90°))
dirobj = Vector((0, 0), (200; (90 - (H * 15))°))
a = false
b = true
ccache = Circle((0, 0), 135)
az = 55.8 (slider from 0 to 360, step 0.1)
diraz = Vector((0, 0), (200; (90 - az)°))
texte2: "Azimut : " + (floor(az)) + "°" + (floor(Mod[(az * 60), 60])) + "'" + (floor(Mod[(az * 3660), 60])) + "''"
texte3: "Ascension droite : " + (floor(α)) + "h" + (floor(Mod[(α * 60), 60])) + "min" + (floor(Mod[(α * 3660), 60])) + "s"
texte4: "Temps sidéral : " + (floor(tsid)) + "h" + (floor(Mod[(tsid * 60), 60])) + "min" + (floor(Mod[(tsid * 3600), 60])) + "s"
sctaz = CircleSector((0, 0), (135; (90 - az)°), (135; 90°))
d1 = Segment((-60, 0), (60, 0))
d2 = Segment((0, -60), (0, 60))
c1 = Circle((0, 0), 4)
c2 = Circle((0, 0), 5)
texte5: "H = T - α : " + (floor(H)) + "h" + (floor(Mod[(H * 60), 60])) + "min" + (floor(Mod[(H * 3600), 60])) + "s"
sctts = CircleSector((0, 0), (112; (90 - (tsid * 15))°), (112; (90 - (H * 15))°))
sctTS = CircleSector((0, 0), (90; (90 - (tsid * 15))°), (90; 90°))
c = false
e = false
d = false