Vénus

Mars

Jupiter

Saturne

Soleil et Lune

Mercure

Grille

hpix = 0.00465
npy = 960
ccdh: hpix * npy
npx = 1280
lpix = 0.00465
ccdl: lpix * npx
focale = 300 (slider from 0 to 8000, step 5)
asol = 1800
B: (ccdl / 2, (-ccdh) / 2)
D: ((-ccdl) / 2, ccdh / 2)
C: (ccdl / 2, ccdh / 2)
A: ((-ccdl) / 2, (-ccdh) / 2)
CCD, a, b, c, d = Polygon(A, B, C, D)
rsol: focale * tan(asol / 3600 * π / 180 / 2)
c_{sol} = Circle((0, -0.0029313404853812397), rsol)
aven1 = 62.5
aven2 = 9.6
rven1: focale * tan(aven1 / 3600 * π / 180 / 2)
c_{ven1} = Circle((0, 0), rven1)
f_{venus} = true
rven2: focale * tan(aven2 / 3600 * π / 180 / 2)
c_{ven2} = Circle((0, 0), rven2)
mars1 = 24.3
mars2 = 3.5
rmars1: focale * tan(mars1 / 3600 * π / 180 / 2)
c_{mars1} = Circle((0, 0), rmars1)
rmars2: focale * tan(mars2 / 3600 * π / 180 / 2)
c_{mars2} = Circle((0, 0), rmars2)
f_{mars} = true
jup1 = 49.7
jup2 = 30.4
rjup1: focale * tan(jup1 / 3600 * π / 180 / 2)
rjup2: focale * tan(jup2 / 3600 * π / 180 / 2)
c_{jup1} = Circle((0, 0), rjup1)
c_{jup2} = Circle((0, 0), rjup2)
f_{jupiter} = true
asat1 = 20.2
asat2 = 15
rsat1: focale * tan(asat1 / 3600 * π / 180 / 2)
rsat2: focale * tan(asat2 / 3600 * π / 180 / 2)
c_{sat1} = Circle((0, 0), rsat1)
c_{sat2} = Circle((0, 0), rsat2)
f_{saturne} = true
A': ((-lpix) / 2, (-hpix) / 2)
B': (lpix / 2, (-hpix) / 2)
C': (lpix / 2, hpix / 2)
D': ((-lpix) / 2, hpix / 2)
PIXEL, a', b', c', d' = Polygon(A', B', C', D')
diam = 60 (slider from 0 to 1000, step 5)
rdif: tan(1.22 * 5.0E-4 / diam) * focale
c_{dif} = Circle((0, 0), rdif / 2)
f_{soleil} = true
amer1 = 12.9
amer2 = 4.6
rmer1: focale * tan(amer1 / 3600 * π / 180 / 2)
rmer2: focale * tan(amer2 / 3600 * π / 180 / 2)
c_{mer1} = Circle((0, 0), rmer1)
c_{mer2} = Circle((0, 0), rmer2)
f_{mercure} = true
hgrille = Sequence(Segment[((-ccdl) / 2, i), (ccdl / 2, i)], i, (-ccdh) / 2, ccdh / 2, hpix)
vgrille = Sequence(Segment[(j, (-ccdh) / 2), (j, ccdh / 2)], j, (-ccdl) / 2, ccdl / 2, lpix)
tdif: 1.22 * 5.5E-4 / diam * 3600 * 180 / π
f_{grille} = false
apix: atan(lpix / focale) * 180 / π * 3600
texte1: "1 pixel = " + apix + "''   CCD=(" + (atan(ccdl / focale) * 180 / π * 60) + "' x " + (atan(ccdh / focale) * 180 / π * 60) + "')"
texte3: "CCD : " + ccdl + " mm x " + ccdh + " mm   -  pixel : " + (lpix * 1000) + "'' / " + (hpix * 1000) + "''
             " + npx + " x " + npy + ""
dimvenus: "" + (rven1 * 2 / lpix) + "et " + (rven2 * 2 / lpix) + ""
dimmars: "" + (rmars1 * 2 / lpix) + " et " + (rmars2 * 2 / lpix) + ""
dimjup: "" + (rjup1 * 2 / lpix) + " et " + (rjup2 * 2 / lpix) + ""
dimsat: "" + (rsat1 * 2 / lpix) + " et " + (rsat2 * 2 / lpix) + ""
dimmer: "" + (rmer1 * 2 / lpix) + " et " + (rmer2 * 2 / lpix) + ""
texte2: "Tache d'Airy : " + tdif + "''"