「Tinvs:getcutvolume」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (Tinvs:getcutvolume ''tinEname'' ) ; 機能 : tinEname TinVolumeSurface エンティティに関連付けられた "カットボリュ…」)
 
編集の要約なし
 
27行目: 27行目:
(tinvs:createby2surfacesandpoints tin1 tin2 boundary)
(tinvs:createby2surfacesandpoints tin1 tin2 boundary)
(Tinvs:getcutvolume (entlast))
(Tinvs:getcutvolume (entlast))
0.0 ; ボリューム作ってないので
0.0 ; カットされてないので
</pre>
</pre>



2023年2月21日 (火) 08:32時点における最新版

構文
(Tinvs:getcutvolume tinEname )


機能
tinEname TinVolumeSurface エンティティに関連付けられた "カットボリューム"(体積) を返す。


引数
  • tinEname : TinVolumeSurface エンティティの ename または VLAオブジェクト。


戻り値
TinVolumeSurface エンティティによって作成されたソリッド体積、 または NIL


サンプル
(vl-load-tin)
(setq tin1 (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin1 '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))
(setq tin2 (tin:createTin '(100 100) '(200 100 100) 1000))
(tin:addpoints tin2 '((10 80 25) (50 50 30) (10 10 22) (80 20 27) (70 60 23) (40 70 40) ))
(setq boundary '((18.1 20.9)(60.7 20.9)(60.7 54.8 1) (18.1 54.8)))
(tinvs:createby2surfacesandpoints tin1 tin2 boundary)
(Tinvs:getcutvolume (entlast))
0.0 ; カットされてないので

関連事項