``` ;|函数名称:XD::Vec:Length 调用格式:(XD::Vec:Length v) 参数说明:         v ------ 向量 返回值: 实数函数 简介: 向量长度 函数来源:  原创 函数作者:        marting 适用版本:        不限  最后更新时间:        2017-06-05 备注:        向量-- 用点表示|; (defun XD::Vec:Length ( v )(sqrt(apply '+(mapcar '\* v v)))) ```