用法
评论
建议
取 消
确 定
(defun m:azimuth (ang) "计算某个角度(以x轴正向,逆时针)的方位角(以y轴正向,顺时针)" (cond ((= ang 0) (setq ang (* 0.5 pi))) ((= ang (* 0.5 pi)) (setq ang 0)) ((= ang pi) (setq ang (* 1.5 pi))) ((= ang (* 1.5 pi)) (setq ang pi)) ((= ang (* 2 pi)) (setq ang 0)) ((and (< ang (* 0.5 pi)) (> ang 0)) (setq ang (- (* 0.5 pi) ang))) (t (setq ang (- (* 2.5 pi) ang)))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 747 个
函数库类别: 52 种
上传记录
刷新