Glücksrad mit 6 Feldern, bei dem eine Haarklemme im Uhrzeigersinn 
um einen Pin rotiert. Das Glücksrad liegt auf einer schiefen Ebene.
Es wird beschrieben durch die Verteilungsfunktion 
P(φ≤x)=F(x)=(x-k·cos(x))/(2π). 
Die Materialkonstante k bestimmt, wie man die Felder einteilen muss, 
damit sie je mit Wahrscheinlichkeit 1/6 auftreten. 

φ = 0

φ = π (180°)

Info

k = 0.65 (slider from 0 to 1, step 0.01)
I(x) = (x - (k * cos(x))) / ((2 * π))
f(x) = (1 + (k * sin(x))) / ((2 * π))
g(x) = If[0 ≤ x ≤ 6.283185307179586, f]
F(x) = I(x) - I(0)
A_1 = Point(yAxis)
l1 = Solve(F(x) = 0.5)
f_1(x) = y(A_1)
A = Intersect(F, f_1, (0.001516515333533183, 2.4147987052874909E-4))
A_2: (0, y(A_1) + 1 / 6)
A_3: (0, y(A_2) + 1 / 6)
A_4: (0, y(A_3) + 1 / 6)
A_5: (0, y(A_4) + 1 / 6)
A_6: (0, y(A_5) + 1 / 6)
A_7: (0, y(A_6) + 1 / 6)
f_2(x) = y(A_1) + 1 / 6
f_3(x) = y(A_1) + 2 / 6
f_4(x) = y(A_1) + 3 / 6
f_5(x) = y(A_1) + 4 / 6
f_6(x) = y(A_1) + 5 / 6
f_7(x) = y(A_1) + 1
B = Intersect(f_2, F, (0.8349867132370873, 0.16690814708572824))
C = Intersect(f_3, F, (1.4950805881192122, 0.3335748137523949))
D = Intersect(f_4, F, (2.1418000123794574, 0.5002414804190616))
E = Intersect(f_5, F, (2.907965905754484, 0.6669081470857282))
F_{1} = Intersect(f_6, F, (4.368131348255736, 0.833574813752395))
H = Intersect(f_7, F, (6.28470182251312, 1.0002414804190616))
M: (0, 0)
c = Circle(M, 1)
P_1: ((-sin(x(A))), (-cos(x(A))))
P_2: ((-sin(x(B))), (-cos(x(B))))
P_3: ((-sin(x(C))), (-cos(x(C))))
P_4: ((-sin(x(D))), (-cos(x(D))))
P_5: ((-sin(x(E))), (-cos(x(E))))
P_6: ((-sin(x(F_{1}))), (-cos(x(F_{1}))))
P_7: ((-sin(x(H))), (-cos(x(H))))
h = Segment(M, P_1)
i = Segment(M, P_2)
j = Segment(M, P_3)
l = Segment(M, P_4)
m = Segment(M, P_5)
n = Segment(M, P_6)
α = Angle(P_2, M, P_1)
β = Angle(P_3, M, P_2)
γ = Angle(P_4, M, P_3)
δ = Angle(P_5, M, P_4)
ε = Angle(P_6, M, P_5)
ζ = Angle(P_1, M, P_6)
Text1: "" + α + ""
Text2: "" + β + ""
Text3: "" + γ + ""
Text4: "" + δ + ""
Text5: "" + ε + ""
Text6: "" + ζ + ""
Text8 = LaTeX(F, true, true)
O: (0, 1)
a = false