我想用Lisp实现这一功能:有一三维实体G,我先把他的位置改变(改变后的实体记为G1),
/ e* t0 Q3 R) p6 e8 [3 K/ n1 C8 c
位置改变矩阵为: cosa -sina 0 0& ?% N& V+ y) U, @9 y1 `
0 b0 G+ x6 y1 t) r1 f, N
sina cosa 0 0% J+ n; Y) Y" M, g
1 f6 u: [8 Y; G- z 0 0 1 0) p1 c. \2 u# l! y3 f
" A; [; A- G* B% \+ @ @ m n p 1! _4 l, j9 N; T G: G0 `$ j* c5 J
6 I3 N3 j q. V2 H2 G3 `
其中a,m,n,p都是已知数,那么请问能够实现这样的功能吗,即:把G乘以矩阵能得到新位置的实体G1吗? |