Acet-geom-is-arc

提供:GizmoLabs - だいたい CAD LISP なサイト
2025年8月11日 (月) 15:45時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-is-arc ''p1'' ''p2'' ''p3'' ''p4'' ''fuz'' ) ; 機能 : 与えられた4点 p1 p2 p3 p4 が有効な円弧/円を定義しているかどうかを検証する。 ; 引数 :* p1 … 座標点リスト。 :* p2 … 座標点リスト。 :* p3 … 座標点リスト。 :* p4 … 座標点リスト。 :* fuz … 許容差の実数。NILの場合は許容差0.0が使用される。 ; 戻り値 : 4点が円弧/円に属する場…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(acet-geom-is-arc p1 p2 p3 p4 fuz )


機能
与えられた4点 p1 p2 p3 p4 が有効な円弧/円を定義しているかどうかを検証する。


引数
  • p1 … 座標点リスト。
  • p2 … 座標点リスト。
  • p3 … 座標点リスト。
  • p4 … 座標点リスト。
  • fuz … 許容差の実数。NILの場合は許容差0.0が使用される。


戻り値
4点が円弧/円に属する場合はTを返し、そうでない場合はNILを返す。
動いてないかも?


サンプル
(acet-geom-is-arc '(0 0 0) '(1 0 0) '(2 0 0) '(3 0 0) nil)
nil

(acet-geom-is-arc (getpoint) (getpoint) (getpoint) (getpoint) nil)
T

関連事項