我想用Lisp实现这一功能:有一三维实体G,我先把他的位置改变(改变后的实体记为G1),1 [# T8 K- w6 X) O0 l+ v5 A$ E; H
; s* y, c5 \& x$ M" R- N4 d位置改变矩阵为: cosa -sina 0 0. g% r7 O( {! o+ u' F. a0 f
/ w* c8 E ]9 E; }. Z% N$ Z
sina cosa 0 0) y( q6 T! K8 V( ~- p- r \1 g1 I
* ~- ^& \. j& c7 g) _, m h
0 0 1 0( L3 D# t& g( `3 r& q
" X- Q8 g$ D% N; p: U) a- i( `
m n p 1
" s/ F# l' _8 C$ `
- q- F9 m: e% c+ K: m其中a,m,n,p都是已知数,那么请问能够实现这样的功能吗,即:把G乘以矩阵能得到新位置的实体G1吗? |