PICercle
Author: Mentrard
Date: JANVIER 2008

 \frac{ π } { 2}

 \frac{ 3π } { 2}

π

Centre = Intersect(xAxis, yAxis)
D_2: Centre + (1.0, 0.0)
E_2: Centre + 4.0 * (1.0, 0.0)
q_2 = Segment(D_2, E_2)
p_2 = Ray(D_2, E_2)
B = Point(q_2)
c = Circle(Centre, B)
Part = 2 (slider from 1 to 32, step 1)
C = Rotate(B, (360.0 / Part)°, Centre)
α = Angle(B, Centre, C)
D = Rotate(C, (360.0 / Part)°, Centre)
A = Angle(C, Centre, D)
E = Rotate(D, A, Centre)
β = Angle(D, Centre, E)
F = Rotate(E, A, Centre)
γ = Angle(E, Centre, F)
G = Rotate(F, A, Centre)
δ = Angle(F, Centre, G)
H = Rotate(G, A, Centre)
ε = Angle(G, Centre, H)
I = Rotate(H, A, Centre)
ζ = Angle(H, Centre, I)
J = Rotate(I, A, Centre)
η = Angle(I, Centre, J)
K = Rotate(J, A, Centre)
θ = Angle(J, Centre, K)
L_2 = Rotate(K, A, Centre)
ι = Angle(K, Centre, L_2)
M = Rotate(L_2, A, Centre)
κ = Angle(L_2, Centre, M)
N = Rotate(M, A, Centre)
λ = Angle(M, Centre, N)
O = Rotate(N, A, Centre)
μ = Angle(N, Centre, O)
P = Rotate(O, A, Centre)
ν = Angle(O, Centre, P)
Q = Rotate(P, A, Centre)
ξ = Angle(P, Centre, Q)
R = Rotate(Q, A, Centre)
ο = Angle(Q, Centre, R)
S = Rotate(R, A, Centre)
ρ = Angle(R, Centre, S)
T = Rotate(S, A, Centre)
σ = Angle(S, Centre, T)
U = Rotate(T, A, Centre)
τ = Angle(T, Centre, U)
V = Rotate(U, A, Centre)
υ = Angle(U, Centre, V)
W = Rotate(V, A, Centre)
φ = Angle(V, Centre, W)
Y = Rotate(W, A, Centre)
χ = Angle(W, Centre, Y)
Z = Rotate(Y, A, Centre)
ψ = Angle(Y, Centre, Z)
B_1 = Rotate(Z, A, Centre)
ω = Angle(Z, Centre, B_1)
C_1 = Rotate(B_1, A, Centre)
α_1 = Angle(B_1, Centre, C_1)
D_1 = Rotate(C_1, A, Centre)
β_1 = Angle(C_1, Centre, D_1)
E_1 = Rotate(D_1, A, Centre)
γ_1 = Angle(D_1, Centre, E_1)
F_1 = Rotate(E_1, A, Centre)
δ_1 = Angle(E_1, Centre, F_1)
G_1 = Rotate(F_1, A, Centre)
ε_1 = Angle(F_1, Centre, G_1)
H_1 = Rotate(G_1, A, Centre)
ζ_1 = Angle(G_1, Centre, H_1)
I_1 = Rotate(H_1, A, Centre)
η_1 = Angle(H_1, Centre, I_1)
J_1 = Rotate(I_1, A, Centre)
θ_1 = Angle(I_1, Centre, J_1)
K_1 = Rotate(J_1, A, Centre)
ι_1 = Angle(J_1, Centre, K_1)
L_1 = Rotate(K_1, A, Centre)
κ_1 = Angle(K_1, Centre, L_1)
M_1 = Rotate(L_1, A, Centre)
λ_1 = Angle(L_1, Centre, M_1)
N_1 = Rotate(M_1, A, Centre)
μ_1 = Angle(M_1, Centre, N_1)
O_1 = Rotate(N_1, A, Centre)
ν_1 = Angle(N_1, Centre, O_1)
P_1 = Rotate(O_1, A, Centre)
ξ_1 = Angle(O_1, Centre, P_1)
Q_1 = Rotate(P_1, A, Centre)
ο_1 = Angle(P_1, Centre, Q_1)
R_1 = Rotate(Q_1, A, Centre)
ρ_1 = Angle(Q_1, Centre, R_1)
S_1 = Rotate(R_1, A, Centre)
σ_1 = Angle(R_1, Centre, S_1)
T_1 = Rotate(S_1, A, Centre)
τ_1 = Angle(S_1, Centre, T_1)
U_1 = Rotate(T_1, A, Centre)
υ_1 = Angle(T_1, Centre, U_1)
V_1 = Rotate(U_1, A, Centre)
φ_1 = Angle(U_1, Centre, V_1)
W_1 = Rotate(V_1, A, Centre)
χ_1 = Angle(V_1, Centre, W_1)
Y_1 = Rotate(W_1, A, Centre)
ψ_1 = Angle(W_1, Centre, Y_1)
Z_1 = Rotate(Y_1, A, Centre)
ω_1 = Angle(Y_1, Centre, Z_1)
A_2 = Rotate(Z_1, A, Centre)
α_2 = Angle(Z_1, Centre, A_2)
B_2 = Rotate(A_2, A, Centre)
β_2 = Angle(A_2, Centre, B_2)
n_2 = Segment(Centre, C)
C_2 = Rotate(B_2, A, Centre)
γ_2 = Angle(B_2, Centre, C_2)
a1 = Segment(Centre, D)
b1 = Segment(Centre, E)
c1 = Segment(F, Centre)
d1 = Segment(G, Centre)
e1 = Segment(H, Centre)
f1 = Segment(I, Centre)
g1 = Segment(J, Centre)
h1 = Segment(K, Centre)
i1 = Segment(H_1, Centre)
j1 = Segment(J_1, Centre)
k1 = Segment(M, Centre)
l1 = Segment(N, Centre)
m1 = Segment(O, Centre)
n1 = Segment(L_2, Centre)
q1 = Segment(Q, Centre)
r1 = Segment(R, Centre)
s1 = Segment(S, Centre)
t1 = Segment(T, Centre)
a2 = Segment(U, Centre)
b2 = Segment(V, Centre)
c2 = Segment(W, Centre)
d2 = Segment(Y, Centre)
e2 = Segment(Z, Centre)
f2 = Segment(B_1, Centre)
g2 = Segment(C_1, Centre)
h2 = Segment(D_1, Centre)
i2 = Segment(E_1, Centre)
j2 = Segment(F_1, Centre)
k2 = Segment(G_1, Centre)
l2 = Segment(I_1, Centre)
d = CircleSector(Centre, B, C)
a = Segment(P, Centre)
b = Line(Centre, yAxis)
e = Line(Centre, xAxis)
L, A1 = Intersect(c, b)
B1, C1 = Intersect(c, e)
f = Segment(L, A1)
g = Segment(B, C1)
Pair = Mod(Part, 2.0)
T1: " \frac{ " + "π" + " } { " + (Part / 2.0) + "}"
T2: " \frac{ " + "2π" + " } { " + Part + "}"