No. | Nom | Commande |
---|---|---|
1 | Angle dalm | |
2 | Nombre nalm | 90° / dalm |
3 | Angle ε | |
4 | Nombre rcap | |
5 | Point F | (rcap; ε + 90°) |
6 | Point D | (rcap, 0) |
7 | Segment sg2 | Segment[D, F] |
8 | Point G | Intersection[sg2, axeY] |
9 | Point A | |
10 | Nombre requ | Longueur[Vecteur[A, G]] |
11 | Cercle cequ | Cercle[A, requ] |
12 | Point I | (requ, 0) |
13 | Cercle ccap | Cercle[A, rcap] |
14 | Angle φ | |
15 | Liste lp1 | Séquence[180° - φ - i, i, 0°, 90°, dalm] 180 / π |
16 | Liste P1 | Séquence[Intersection[axeY, DemiDroite[I, Vecteur[A, (1; π - Elément[lp1, i] / 2 π / 180)]]], i, 1, nalm - 1] |
17 | Liste lp2 | Séquence[i - φ, i, 0°, 90°, dalm] 180 / π |
18 | Liste P2 | Séquence[Intersection[axeY, DemiDroite[I, Vecteur[A, (1; (180 - Elément[lp2, i] / 2) π / 180)]]], i, 1, nalm - 1] |
19 | Liste calmi | Séquence[Cercle[MilieuCentre[Elément[P1, i], Elément[P2, i]], Distance[Elément[P1, i], Elément[P2, i]] / 2], i, 1, nalm - 1] |
20 | Point IT5 | Intersection[ccap, Elément[calmi, 1]] |
20 | Point IT6 | Intersection[ccap, Elément[calmi, 1]] |
21 | Angle θ5 | Angle[(1, 0), A, IT5] |
22 | Point IT3 | Intersection[cequ, Elément[calmi, 1]] |
22 | Point IT4 | Intersection[cequ, Elément[calmi, 1]] |
23 | Angle θ4 | Angle[(1, 0), A, IT4] |
24 | Angle θ3 | Angle[(1, 0), A, IT3] |
25 | Angle dθequ | θ4 - θ3 |
26 | Angle θ6 | Angle[(1, 0), A, IT6] |
27 | Angle dθcap | θ6 - θ5 |
28 | Segment sg1 | Segment[A, F] |
29 | Point H | Intersection[cequ, sg1] |
30 | Segment sg3 | Segment[H, I] |
31 | Point K | Intersection[sg3, axeY] |
32 | Nombre rcan | Longueur[Vecteur[A, K]] |
33 | Cercle ccan | Cercle[A, rcan] |
34 | Point IT1 | Intersection[ccan, Elément[calmi, 1]] |
34 | Point IT2 | Intersection[ccan, Elément[calmi, 1]] |
35 | Angle θ2 | Angle[(1, 0), A, IT2] |
36 | Angle θ1 | Angle[(1, 0), A, IT1] |
37 | Angle dθcan | θ2 - θ1 |
38 | Nombre r | |
39 | Cercle cint | Cercle[A, r] |
40 | Point IT7 | Intersection[cint, Elément[calmi, 1]] |
40 | Point IT8 | Intersection[cint, Elément[calmi, 1]] |
41 | Angle θ8 | Si[r > requ, Angle[(1, 0), A, IT8], 360° + Angle[(1, 0), A, IT8]] |
42 | Angle θ7 | Angle[(1, 0), A, IT7] |
43 | Angle daz | |
44 | Nombre naz | 180° / daz - 1 |
45 | Point z' | Intersection[axeY, DemiDroite[I, Vecteur[A, (1; 270° - (90° - φ) / 2)]]] |
46 | Point z | Intersection[axeY, DemiDroite[I, Vecteur[A, (1; 180° - (90° - φ) / 2)]]] |
47 | Liste Pa | Séquence[Intersection[Médiatrice[z, z'], Droite[z, Vecteur[A, (1; 360° - i)]]], i, daz, 180°, daz] |
48 | Liste razim | Séquence[Longueur[Vecteur[z, Elément[Pa, i]]], i, 1, naz] |
49 | Point B | Intersection[ccap, DemiDroite[A, (0, 1)]] |
50 | Point C | Intersection[ccap, DemiDroite[A, (0, -1)]] |
51 | Liste cazim | Séquence[Cercle[Elément[Pa, i], Elément[razim, i]], i, 1, naz] |
52 | Arc dmcg | DemiCercle[C, B] |
53 | Arc dmcd | DemiCercle[B, C] |
54 | Liste yP1 | y(P1) |
55 | Nombre nalmi | NbSi[x > rcap, yP1] |
56 | Point E | Intersection[ccap, DemiDroite[A, (-1, 0)]] |
57 | Point L | Intersection[ccan, DemiDroite[A, (0, -1)]] |
58 | Valeur booléenne a | |
59 | Point S | Intersection[cequ, DemiDroite[A, (0, -1)]] |
60 | Liste arch1 | Séquence[ArcCercleCirconscrit[Intersection[dmcg, Elément[calmi, i]], Elément[P2, i], Intersection[dmcd, Elément[calmi, i]]], i, 1, nalmi] |
61 | Liste IAcapg | Séquence[Intersection[dmcg, Elément[cazim, i]], i, 1, naz] |
62 | Point IHcapd | Intersection[dmcd, Elément[calmi, 1]] |
63 | Nombre yIHcap | y(Intersection[dmcd, Elément[calmi, 1]]) |
64 | Liste yacap | Séquence[y(Elément[IAcapg, i]), i, 1, naz] |
65 | Nombre complexe i | |
66 | Nombre naz1 | NbSi[x < y(IHcapd), yacap] |
67 | Point IHcapg | Intersection[dmcg, Elément[calmi, 1]] |
68 | Liste IAcapd | Séquence[Intersection[dmcd, Elément[cazim, i]], i, 1, naz] |
69 | Nombre naz2 | naz - naz1 |
70 | Liste IAH | Séquence[Intersection[Elément[cazim, i], Elément[arch1, 1]], i, 1, naz1] |
71 | Liste IAH2 | Séquence[(-x(Elément[IAH, i]), y(Elément[IAH, i])), i, 1, naz1] |
72 | Liste arcazg | Séquence[ArcCercleCirconscrit[Elément[IAH, i], z, Elément[IAcapd, i]], i, 1, naz2] |
73 | Liste arcazd | Séquence[ArcCercleCirconscrit[Elément[IAcapg, naz - i + 1], z, Elément[IAH2, i]], i, 1, naz2] |
74 | Liste arcazh | Séquence[ArcCercleCirconscrit[Elément[IAH, i], z, Elément[IAH2, naz - i + 1]], i, naz2 + 1, naz1] |
75 | Valeur booléenne b | |
76 | Valeur booléenne c | |
77 | Nombre aa | y(z') |
78 | Arc archor | ArcCercleCirconscrit[Intersection[dmcg, Elément[calmi, 1]], Elément[P2, 1], Intersection[dmcd, Elément[calmi, 1]]] |
79 | Segment axeEO | Segment[E, D] |
80 | Segment axeNS | Segment[B, C] |
81 | Droite zzmed | Médiatrice[z, z'] |
82 | Texte texte1 | |
83 | Texte texte2 | |
84 | Texte texte4 | |
85 | Texte texte3 | |
86 | Point P1c | Intersection[axeY, DemiDroite[I, Vecteur[A, (1; 180° - (180° - φ + 18°) / 2)]]] |
87 | Point P2c | Intersection[axeY, DemiDroite[I, Vecteur[A, (1; 180° - ((-(18))° - φ) / 2)]]] |
88 | Cercle ccresp | Cercle[MilieuCentre[P1c, P2c], Distance[P1c, P2c] / 2] |
89 | Arc arccrep | ArcCercleCirconscrit[Intersection[dmcg, ccresp], P2c, Intersection[dmcd, ccresp]] |
90 | Nombre hg1 | |
91 | Nombre hg2 | |
92 | Cercle cgra1 | Cercle[A, rcap + hg1 / 2] |
93 | Cercle cgra2 | Cercle[A, rcap + hg1] |
94 | Cercle cgra3 | Cercle[A, rcap + hg1 + hg2] |
95 | Liste grd2 | Séquence[Segment[Intersection[cgra2, DemiDroite[A, (1; α)]], Intersection[cgra1, DemiDroite[A, (1; α)]]], α, 0°, 360°, 1°] |
96 | Liste grd3 | Séquence[Segment[Intersection[cgra2, DemiDroite[A, (1; α)]], Intersection[cgra3, DemiDroite[A, (1; α)]]], α, 0°, 360°, 15°] |
97 | Liste grd1 | Séquence[Segment[Intersection[ccap, DemiDroite[A, (1; α)]], Intersection[cgra1, DemiDroite[A, (1; α)]]], α, 0°, 360°, 5°] |
98 | Liste arch2 | Séquence[Cercle[MilieuCentre[Elément[P1, i], Elément[P2, i]], Distance[Elément[P1, i], Elément[P2, i]] / 2], i, nalmi + 1, nalm - 1] |
99 | Cercle caxe | Cercle[A, 1] |
100 | Cercle cdecoup | Cercle[A, rcap + hg1 + hg2 + 0.5] |
101 | Image image1 | |
102 | Liste PTcan | Séquence[(rcan; θ1 + i dθcan / 12), i, 1, 11] |
103 | Liste PTequ | Séquence[(requ; θ3 + i dθequ / 12), i, 1, 11] |
104 | Liste PTcap | Séquence[(rcap; θ5 + i dθcap / 12), i, 1, 11] |
105 | Valeur booléenne d | |
106 | Liste arctemp1 | Séquence[ArcCercleCirconscrit[Elément[PTcan, i], Elément[PTequ, i], Elément[PTcap, i]], i, 1, 5] |
107 | Texte texte5 | "φ=" + (floor(φ)) + (floor((x((φ 180 / π, 0)) - floor(x((φ 180, 0)) / π)) 60)) + "'" |
108 | Liste arctemp2 | Séquence[ArcCercleCirconscrit[Elément[PTcan, i], Elément[PTequ, i], Elément[PTcap, i]], i, 7, 11] |
109 | Angle zzzz | (Si[θ8 > π, θ8, 360° + θ8] - θ7) / 12 |
110 | Angle dθint | θ8 - θ7 |
111 | Liste PTint | Séquence[(r; θ7 + i dθint / 12), i, 1, 11] |
112 | Liste Z | Séquence[(r; θ7 + (θ8 - θ7 + 2 π) i / 12), i, 1, 11] |
113 | Liste θcan | Séquence[i (θ2 - θ1) / 12 + θ1, i, 1, 11] |
114 | Liste θcap | Séquence[i (θ6 d - θ5) / 12 + θ5, i, 1, 11] |
115 | Liste θequ | Séquence[i (θ4 - θ3) / 12 + θ3, i, 1, 11] |
116 | Liste θint | Séquence[i (θ8 - θ7) / 12 + θ7, i, 1, 11] |