  Variations de la déclinaison de l'étoile polaire
  en latitudes écliptiques
  de -100 000 à + 100 000 ans
  (Stellarium)

temps (milliers d'années)

(degrés)

A1: -100
A2: A1 + 10
A3: A2 + 10
A4: A3 + 10
A5: A4 + 10
A6: A5 + 10
A7: A6 + 10
A8: A7 + 10
A9: A8 + 10
A10: A9 + 10
A11: A10 + 10
A12: A11 + 10
A13: A12 + 10
A14: A13 + 10
A15: A14 + 10
A16: A15 + 10
A17: A16 + 10
A18: A17 + 10
A19: A18 + 10
A20: A19 + 10
A21: A20 + 10
D1: 67
E1: 13
F1: 33.1
D2: 65
E2: 56
F2: 29.2
D3: 66
E3: 2
F3: 58.1
D4: 67
E4: 11
F4: 2.9
D5: 68
E5: 14
F5: 3.1
D6: 68
E6: 9
F6: 24.1
D7: 66
E7: 52
F7: 17.4
D8: 65
E8: 11
F8: 33.6
D9: 64
E9: 14
F9: 22.9
D10: 64
E10: 40
F10: 0
D11: 65
E11: 50
F11: 37
D12: 66
E12: 57
F12: 40
D13: 67
E13: 16
F13: 35.9
D14: 66
E14: 43
F14: 18.7
D15: 65
E15: 33
F15: 39.6
D16: 64
E16: 53
F16: 41.9
D17: 65
E17: 3
F17: 58.5
D18: 66
E18: 18
F18: 29.5
D19: 67
E19: 33
F19: 3.9
D20: 68
E20: 20
F20: 21.2
D21: 67
E21: 17
F21: 30.7
C1: D1 + E1 / 60 + F1 / 3600
C2: D2 + E2 / 60 + F2 / 3600
C3: D3 + E3 / 60 + F3 / 3600
C4: D4 + E4 / 60 + F4 / 3600
C5: D5 + E5 / 60 + F5 / 3600
C6: D6 + E6 / 60 + F6 / 3600
C7: D7 + E7 / 60 + F7 / 3600
C8: D8 + E8 / 60 + F8 / 3600
C9: D9 + E9 / 60 + F9 / 3600
C10: D10 + E10 / 60 + F10 / 3600
C11: D11 + E11 / 60 + F11 / 3600
C12: D12 + E12 / 60 + F12 / 3600
C13: D13 + E13 / 60 + F13 / 3600
C14: D14 + E14 / 60 + F14 / 3600
C15: D15 + E15 / 60 + F15 / 3600
C16: D16 + E16 / 60 + F16 / 3600
C17: D17 + E17 / 60 + F17 / 3600
C18: D18 + E18 / 60 + F18 / 3600
C19: D19 + E19 / 60 + F19 / 3600
C20: D20 + E20 / 60 + F20 / 3600
C21: D21 + E21 / 60 + F21 / 3600
moy = Mean(C1:C21)
B1: C1 - moy
B2: C2 - moy
B3: C3 - moy
B4: C4 - moy
B5: C5 - moy
B6: C6 - moy
B7: C7 - moy
B8: C8 - moy
B9: C9 - moy
B10: C10 - moy
B11: C11 - moy
B12: C12 - moy
B13: C13 - moy
B14: C14 - moy
B15: C15 - moy
B16: C16 - moy
B17: C17 - moy
B18: C18 - moy
B19: C19 - moy
B20: C20 - moy
B21: C21 - moy
lat: {B1, B2, B3, B4, B5, B6, B7, B8, B9, B10, B11, B12, B13, B14, B15, B16, B17, B18, B19, B20, B21}
dates: {A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14, A15, A16, A17, A18, A19, A20, A21}
sPts = Sequence((Element[dates, i], Element[lat, i]), i, 1, Length[dates])