``` ;|函数名称:        XD::Vec:Dot 调用格式:        (XD::Vec:Dot  v1 v2) 参数说明:        v1 ------ 向量 v2 ------ 向量 返回值:        实数 函数简介:        向量点积函数 来源:        原创 函数作者:        marting 适用版本:        不限  最后更新时间:        2017-06-05 备注:        向量-- 用点表示向量点积的几何意义：等于两向量夹角的余弦|;(defun XD::Vec:Dot (v1 v2)  (apply '+ (mapcar '* v1 v2))) ```