Tinvs:getfillvolume

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Tinvs:getfillvolume tinEname )


機能
tinEname TinVolumeSurface エンティティに関連付けられた "充填量"(体積) を返す。


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


戻り値
tinEname エンティティによって作成されたソリッド体積、 または 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:getfillvolume (entlast))
28339.5650643218 ; m㎡

関連事項