用法
评论
建议
取 消
确 定
(defun list:get-ubound (lst) "得到表的各维数长度,最多支持到三维" (if (atom lst) (quote (0 0 0)) (list (vl-list-length lst) (apply (quote max) (mapcar (quote vl-list-length) lst)) (apply (quote max) (mapcar (quote vl-list-length) (apply (quote append) lst))))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 767 个
函数库类别: 53 种
上传记录
刷新