我想用Lisp实现这一功能:有一三维实体G,我先把他的位置改变(改变后的实体记为G1),3 j& A6 v! n7 b( g& G: m
9 e9 I( z; T3 X: G位置改变矩阵为: cosa -sina 0 0
9 x: d4 m) D. i# k9 \) `4 t0 m+ h: U% T7 ?
sina cosa 0 0
$ g; [5 Q9 y4 Y( E+ U
/ M/ L1 q. W9 F: H3 D1 x, n" F 0 0 1 09 x$ J v! E( l, d& J, f
I3 W4 v1 o" R l) }' }
m n p 1
1 Y) d- j+ o1 t1 ~- |: ~
0 [8 Q+ z" k7 F# t/ [- N其中a,m,n,p都是已知数,那么请问能够实现这样的功能吗,即:把G乘以矩阵能得到新位置的实体G1吗? |