Vle-vector-isunitlength

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Vle-vector-isunitlength vec )


機能
vec が 1.0 (1単位長) の長さを持つかどうかを返す。


引数
  • vec : 2D/3D のベクトルリスト


戻り値
単位長なら T、そうでなければ nil


サンプル
(setq vec '(1 1 0))
(vle-vector-isunitlength vec)
nil

(setq vec '(1 1 1))
(vle-vector-isunitlength vec)
nil 

(setq vec '(0 1 0))
(vle-vector-isunitlength vec)
T

(setq vec '(0 0 1))
(vle-vector-isunitlength vec)
T

(setq vec '(-1 0 0))
(vle-vector-isunitlength vec)
T


関連事項