Tinvs:createby2surfacesandpoints

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Tinvs:createby2surfacesandpoints tinEname1 tinEname2 boundary )


機能
tinEname1 と tinEname2 の TinSurface エンティティ、および clipEnt クリッピングエンティティから TinVolumeSurface を作成し、 midOrdinateDist 平滑化によってラスタライズする。


引数
  • tinEname1 : 最初の TinSurface エンティティのename または VLAオブジェクト。
  • tinEname2  : 2つ目の TinSurface エンティティのename または VLAオブジェクト。
  • boundary : 切り抜き多角形の 2D/3D点リストのリスト


戻り値
TinVolumeSurface エンティティの ename または 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)
<Entity name: 492fb590>


関連事項