x

z

單位向量

座標軸

Reset

Start

x

y

z

座標平面

三角測量(28)

1

α = 4.276056667386107 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
β = 1.4835298641951802 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
O = (8.44, -3.78)
X_{unit}: O + (cos(α), sin(α) * cos(β))
Y_{unit}: O + (-1 * sin(α), cos(α) * cos(β))
Z_{unit}: O + (0, sin(β))
u = Vector(O, X_{unit})
v = Vector(O, Y_{unit})
w = Vector(O, Z_{unit})
L = 13 (slider from 1 to 15, step 1)
a = Vector(O - L * v, O + L * v)
b = Vector(O - L * w, O + L * w)
z = Vector(O - L * u, O + L * u)
A_x: O + L * u
Z: O + L * w
c = false
d = true
Q_2: 0.2 * Corner[2] + 0.8 * Corner[1]
Q_3: (x(Q_2), y(Corner[3]))
多邊形1, e, q_2, q_3, f = Polygon(Corner[1], Q_2, Q_3, Corner[4])
g = Segment(Q_2, Q_3)
Length = 1 (slider from 1 to 10, step 1)
Height = 8 (slider from 2 to 20, step 2)
Width = 1 (slider from 1 to 10, step 1)
A_1: O + Length * u + Width * v
A_2: O - Length * u + Width * v
A_3: O - Length * u - Width * v
A_4: O + Length * u - Width * v
list1 = Sequence(A_1 + 2 * m * w, m, 1, Height / 2)
list2 = Sequence(A_2 + 2 * m * w, m, 1, Height / 2)
list3 = Sequence(A_3 + 2 * m * w, m, 1, Height / 2)
list4 = Sequence(A_4 + 2 * m * w, m, 1, Height / 2)
list5 = Sequence(Polygon[Element[list1, i], Element[list2, i], Element[list3, i], Element[list4, i]], i, 0, Height / 2)
A_5: O + Length * u + Width * v + Height * w
A_6: O - Length * u + Width * v + Height * w
A_7: O - Length * u - Width * v + Height * w
A_8: O + Length * u - Width * v + Height * w
h_1 = Segment(A_1, A_5)
h_2 = Segment(A_2, A_6)
h_3 = Segment(A_3, A_7)
h_4 = Segment(A_4, A_8)
poly1, a_3, a_4, a_1, a_2 = Polygon(A_3, A_4, A_1, A_2)
poly2, h, i, j, k = Polygon(O + L * u + L * v, O - L * u + L * v, O - L * u - L * v, O + L * u - L * v)
m = false
B_1: A_1 + (L - Length) * u
l = Segment(B_1, A_1)
n = Segment(A_5, B_1)
B_2: A_1 + (L - Width) * v
p = Segment(A_1, B_2)
q = Segment(A_5, B_2)
r = Segment(B_1, B_2)
C_1: A_1 + 2 * w
C_2: A_2 + 2 * w
C_3: A_3 + 2 * w
C_4: A_4 + 2 * w
o = false
α_1 = Angle(C_1, C_2, A_2)
list6 = Sequence(Translate[pic1, Vector[i * Vector[A_1, C_1]]], i, 0, Height / 2)