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

lks042

我想用Lisp实现这一功能：有一三维实体G，我先把他的位置改变（改变后的实体记为G1)，
8 i3 X7 d5 D* x1 b* d4 I) C
( k% T* q; a3 `% h( w; y" O位置改变矩阵为：   cosa     -sina     0      0
. l5 j# m6 h) V$ P7 k/ f, R) ^+ d
2 b: I& n7 e5 t+ i                                     sina       cosa    0      0

                                        0           0       1      0

                                        m          n       p      1
! U$ D1 g$ x& X# A/ c
+ s0 U8 Y7 \. L7 ~+ m, B+ a其中a,m,n,p都是已知数，那么请问能够实现这样的功能吗，即：把G乘以矩阵能得到新位置的实体G1吗？