3d 圖ㄧ
Author: Jui-Tang chen
Date: 2015,3,26

Scal：3D軸的長度
View3d：3D軸的旋轉
平面轉3D請用i,j,k為單位向量

O = (0, 0)
View3d = (10.806747288918173, 1.6594312281425223)
Scal = 9 (slider from 0 to 10, step 0.1)
a: π * x(View3d - O) / (2 * Scal)
b': -π * y(View3d - O) / Scal
b = If(b' > π / 2, 1.5707963267948966, If[b' < (-π) / 2, -1.5707963267948966, b'])
j: (cos(a - 3 * π / 4), -sin(a - 3 * π / 4) * sin(b))
i: (sin(a - 3 * π / 4), cos(a - 3 * π / 4) * sin(b))
k: (0, cos(b))
U_x: O + Scal * i
u = Vector(O, U_x)
U_z: O + Scal * k
v = Vector(O, U_z)
U_y: O + Scal * j
w = Vector(O, U_y)
u' = Mirror(u, O)
w' = Mirror(w, O)
v' = Mirror(v, O)
list1 = Sequence(O + s * i, s, 1, Scal - 1)
list2 = Sequence(O + s * j, s, 1, Scal - 1)
list3 = Sequence(O + s * k, s, 1, Scal - 1)
list1' = Mirror(list1, O)
list2' = Mirror(list2, O)
list3' = Mirror(list3, O)