#topicpath ** 11章 外積の計算 [#v275ff39] -- Maxima では外積が定義されていない。そこで、次のように定義する。 cross( u, v ):= [ u[2]*v[3] - u[3]*v[2], u[3]*v[1] - u[1]*v[3], u[1]*v[2] - u[2]*v[1] ]; -- 外積の大きさが、二つのベクトルの大きさ a と b と二つのベクトルのなす角θを用いて a b sinθ と表されること~ (Ay*Bz-Az*By)^2 + (Az*Bx-Ax*Bz)^2 + (Ax*By-Ay*Bx)^2 + (Ax*Bx + Ay*By + Az*Bz)^2; factor(%);