请问lisp能实现这个功能吗？

lks042

我想用Lisp实现这一功能：有一三维实体G，我先把他的位置改变（改变后的实体记为G1)，
8 l" ]$ I8 i) u+ q! r  r
. ~: E$ s, t" R; r, N位置改变矩阵为：   cosa     -sina     0      0
8 }  j+ ]- F& ?+ p& ^
                                     sina       cosa    0      0
$ C" Q/ G* y% @7 |" [
* s; N5 j! r5 x% O" j4 V                                        0           0       1      0
" Q  `" p$ O  |! }) c# h4 ^' b! n
; ?9 U" w/ v! W2 l                                        m          n       p      1

. {$ S1 N9 ?2 l$ i3 x其中a,m,n,p都是已知数，那么请问能够实现这样的功能吗，即：把G乘以矩阵能得到新位置的实体G1吗？