餘弦函數
Author: 藍邦偉  老師

θ

餘弦函數

y=cosx

A = Point(xAxis)
c = Circle(A, 1)
O = Intersect(xAxis, yAxis)
θ = 0 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
e: x = (θ * 3.141592653589793 / 180)°
f(x) = cos(x)
C = Point(c)
g = Segment(C, A)
C'_1 = Rotate(C, θ, A)
h = Segment(C'_1, A)
P = Rotate(C, θ, A)
γ = Angle(C, A, P)
P_1: (θ, cos(θ))
a = OrthogonalLine(P, xAxis)
i = OrthogonalLine(P_1, xAxis)
B = Intersect(i, xAxis)
D = Intersect(a, xAxis)
j = Segment(B, P_1)
k = Segment(D, P)
l = Segment(O, B)
u = Vector((x(Corner[1]), 0), (x(Corner[2]), 0))
v = Vector((0, y(Corner[1])), (0, y(Corner[3])))
n = Segment(O, B)