Scheme语言的map函数求行列式的积

Question

利用scheme的map函数求解行列式的积
例如 '((1 2)(3 4))
'((5 7)(6 8))
得到结果（1*5+2*7 1*6+2*8）
（3*5+4*7 3*6+4*8）
最终结果（（19 22）（43 50））

Answer 1

http://my.oschina.net/zhoukuo/blog/349453