2D 座標架
Author: 藍邦偉  老師

$ O $

$ 三角方程式(2) $

$A$

$B$

u = Vector((x(Corner[1]), 0), (x(Corner[3]), 0))
v = Vector((0, y(Corner[1])), (0, y(Corner[3])))
O = (0, 0)
Q_2: 0.75 * Corner[1] + 0.25 * Corner[2]
Q_3: (x(Q_2), y(Corner[4]))
poly1, q_1, q_2, q_4, q_3 = Polygon(Corner[1], Q_2, Q_3, Corner[4])
c_1 = Circle((0, 0), 1)
list1: {30*°, 45*°, 60*°, 120*°, 135*°, 150*°}
list2: {0.8660254037844386, 0.7071067811865475, 0.49999999999999994, -0.5000000000000004, -0.7071067811865477, -0.8660254037844386}
n = 1 (slider from 1 to 6, step 1)
L: x = If[n ≟ 1, Element[list2, 1], If[n ≟ 2, Element[list2, 2], If[n ≟ 3, Element[list2, 3], If[n ≟ 4, Element[list2, 4], If[n ≟ 5, Element[list2, 5], Element[list2, 6]]]]]]
A, B = Intersect(c_1, L)
a = Segment(O, A)
b = Segment(O, B)
α = Angle((1, 0), (0, 0), A)
β = Angle((1, 0), (0, 0), B)
text1: "$ x=" + (LaTeX[SurdText[Element[list2, n]]]) + "$
$cosθ=" + (LaTeX[SurdText[Element[list2, n]]]) + "⇒θ=？ $"