Tinvs:volumesurfacetype

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


機能
関連する BuildingElement のタイプを文字列で返す。指定されたエンティティが BuildingElement として分類されない場合、NIL を返す。
引数
  • tinEname : TinVolumeSurface エンティティの ename または VLAオブジェクト。


戻り値
TinVolumeSurfaceエンティティの(整数)型,またはNIL
以下のいずれか。
  • bcTinVolumeBaseComparison 0 - TINボリューム比較ベース
  • bcTinVolumeToElevation 1 - TINボリューム高さ
  • bcTinVolumeToDepth 2 - TINボリューム深さ



サンプル
(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:volumesurfacetype (entlast))
0

関連事項